startshape ASS
rule ASS{ AS[] BSS[z -10] BSSS[z -10] }
rule AS{ A[hue 20 b 1 sat 70] AS[r 31 s 0.995] }
rule A{ CIRCLE[b -1 s 4 z -1] CIRCLE[] A[x 0.1 s 0.999 r 1 hue .1] } rule A{ CIRCLE[b -1 s 2 z -1] CIRCLE[] A[x 0.1 s 0.999 r -1] }
rule A 0.004{ CIRCLE[z 3 s 18 b -1] CIRCLE[z 4 s 15 hue -40] CIRCLE[z 5 s 13 b -1]
} rule B{ 120*[r 3] BS [] }
rule BSS{ 180*[r 2] BS[] }
rule BSSS{ 144*[r 2.5] BS[] }
rule BS{ CIRCLE[] BS[x 0.1 s 0.998] }