8 lines
235 B
Plaintext
8 lines
235 B
Plaintext
|
#axiom
|
||
|
C(0)
|
||
|
#rules
|
||
|
C(n) : n<100 -> C(n+1)[+(137.5*n)f(0.03*n^0.5)B]
|
||
|
C(n) : n<200 -> C(n+1)[+(137.5*n)f(0.03*n^0.5)Y]
|
||
|
C(n) : n<300 -> C(n+1)[+(137.5*n)f(0.03*n^0.5)A]
|
||
|
C(n) : n>=300 ; n<=360 -> C(n+1)[+(137.5*n)f(0.03*n^0.5)P]
|
||
|
#end rules
|