startshape seed

rule block
{
	box { }
}

rule block
{
	SQUARE { }
}

rule block
{
	cantor_cross { }
}


rule box
{
	SQUARE {}
	SQUARE {b 1 s 0.9}
}

rule seed
{
	block {}
	corner_ur {	x 0.75 y 0.75 s 0.5}
	corner_ur {	x -0.75 y .75 s 0.5 r 90}
	corner_ur {	x -0.75 y -0.75 s 0.5 r 180}
	corner_ur {	x 0.75 y -0.75 s 0.5 r 270}
}

rule corner_ur
{
	block {}
	corner_ur {	x 0.75 y 0.75 s 0.5 }
	corner_ur {	x -0.75 y 0.75 s 0.5 r 90}
	corner_ur {	x 0.75 y -0.75 s 0.5 r -90}
}

rule cantor_cross
{
	SQUARE {}
	SQUARE {s .3333 b 1}
	SQUARE {s .3333 b 1 y -0.3333}
	SQUARE {s .3333 b 1 y 0.3333}
	SQUARE {s .3333 b 1 x -0.3333}
	SQUARE {s .3333 b 1 x 0.3333}
	cantor_cross {s .3333 y 0.3333 x 0.3333 }
	cantor_cross {s .3333 y -0.3333 x 0.3333 }
	cantor_cross {s .3333 y 0.3333 x -0.3333 }
	cantor_cross {s .3333 y -0.3333 x -0.3333 }
}