# --- L-System Parser/Mutator --- Lj Lapre ---------------------------------- 10 30 40 # c(12)A # A=aaSaaSA S='(.8)!(.9) a=tF[&'(.8)!LBL]>(137)[z&'(.7)!LBL]>(137) B=tF[-'(.8)!(.9)$LCL]'!(.9)C C=tF[+'(.8)!(.9)$LBL]'!(.9)B # L=[~c(8){+(30)f(20)-(120)f(20)-(120)f(20)}] @