#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