RosettaCodeData/Task/First-class-functions/Ursala/first-class-functions.ursala
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

9 lines
151 B
Text

#import std
#import flo
functions = <sin,cos,times^/~& sqr>
inverses = <asin,acos,math..cbrt>
#cast %eL
main = (gang (+)*p\functions inverses) 0.5