let pow2(a) = 2.**a let pow3(a) = 3.**a let pow4(a) = 4.**a let pow5(a) = 5.**a let pow9(a) = 9.**a let pow25(a) = 25.**a let pow27(a) = 27.**a let pow81(a) = 81.**a let ipow2(a) = log(a)/log(2.) let ipow3(a) = log(a)/log(3.) let ipow4(a) = log(a)/log(4.) let ipow5(a) = log(a)/log(5.) let ipow9(a) = log(a)/log(9.) let ipow25(a) = log(a)/log(25.) let ipow27(a) = log(a)/log(27.) let ipow81(a) = log(a)/log(81.) o pen Impact clear() x <- 0. while x < 200. do dot (x, pow3(x) / (3. ** 30.) ) green x <- x + 1.
|
iMPaCT try f# >