| 1 |
// fig 3.5, page 74 |
| 2 |
|
| 3 |
capsella_bursalis(n) => attr (delta,18) attr (width, 1.8) attr (color, '0 1 0) I(9) a(13), n; |
| 4 |
|
| 5 |
a(0) => [&(70)L]/(137.5)I(10)A; |
| 6 |
a(t) => [&(70)L]/(137.5)I(10)a(t-1); |
| 7 |
A => [&(18)u(4)FFI(10)I(5)X(5)KKKK]/(137.5)I(8)A; |
| 8 |
I(0) => F; |
| 9 |
I(t) => FI(t-1); |
| 10 |
u(0) => &(9); |
| 11 |
u(t) => &(9)u(t-1); |
| 12 |
L => [attr(color, '0.4 1 0) |
| 13 |
[{.-FI(7)&(10)+FI(7) attr(color,'1 1 0.2) +FI(7)}] |
| 14 |
[{.+FI(7)&(10)-FI(7) attr(color,'1 1 0.2) -FI(7)}] |
| 15 |
]; |
| 16 |
K => [attr(color, '0.9 0.2 0) |
| 17 |
[&{.+FI(2)--FI(2)}] |
| 18 |
[&{.-FI(2)++FI(2)}]/(90) |
| 19 |
]; |
| 20 |
X(0) => ^(50)[[-GGGG++[GGG[++G{.].].].++GGGG.--GGG.--G.}]%; |
| 21 |
|
