startshape PLANT
CF::Background = [b (-frame())]
CF::FrameTime = 0.75
CF::Frame = 0.9
shape PLANT {
	EITHER [x -2 b frame() time 0 infinity()]
	EITHER [x 2 b frame() time 0 infinity()]
}

shape BOTH {
	BL [rotate 30]
	BL [rotate -30 flip 90]
}

shape EITHER 
rule {BL[]}
rule {BL[flip 90]}

shape BL {
	CIRCLE []
	WL [size 0.95 y 1.6 time 0.5 0 timescale 0.95]
}

shape WL
rule {BL [rotate 3]}
rule {BL [rotate 4]}
rule {BL [rotate 5]}
rule {BL [rotate 6]}
rule {BL [rotate 7]}
rule {BL [rotate 3]}
rule {BL [rotate 4]}
rule {BL [rotate 5]}
rule {BL [rotate 6]}
rule {BL [rotate 7]}
rule {BOTH []}
rule {BL [rotate -10 flip 90]}

