/*
	Dotted Tree 1
	www.lazymoon.org
	dottedtree.cfdg
*/


startshape petree
background {b -1}

rule petree {
virus{}
virus{hue 50}
}

rule virus {
stem{flip 0 b 1 sat 1 hue 0}
stem{flip 90 b 1 sat 1 hue 0}
}

rule stem {
CIRCLE{}
stem{s 0.99 x 0.99 r 1}
}
rule stem {
CIRCLE{}
stem{s 0.99 x 0.99 r 5}
}
rule stem 0.03 {
	splice{ hue 5 }
}

rule splice {
	point {}
	stem{flip 45}
	stem{flip -45}
}
rule splice {
	point {}
	stem{flip 0}
	stem{flip -45}
	stem{flip 45}
}

rule point {
SQUARE{ r 45 s 4 }
}