Het rozenblad
 


lsystem: 0
derivation length: 25

#define LA 5     /* initial length - main segment */
#define RA 1.15  /* growth rate - main segment */
#define LB 1.3   /* initial length - lateral segment */
#define RB 1.25  /* growth rate - lateral segment */ 
#define LC 3     /* initial length - marginal notch */
#define RC 1.19  /* growth rate - - marginal notch */ 

axiom: -[{A0(0).}][{A1(0).}] 

A0(t) : * --> .G(LA,RA).[+B(t)G(LC,RC,t).}][+B(t){.]A0(t+1)
A1(t) : * --> .G(LA,RA).[-B(t)G(LC,RC,t).}][-B(t){.]A1(t+1)
B(t)   : t>0  --> G(LB,RB) B(t-1)
G(s,r) : *    --> G(s*r,r)
G(s,r,t) : t>1 --> G(s*r,r,t-1)

endlsystem