RosettaCodeData/Task/First-class-functions-Use-numbers-analogously/Fantom/first-class-functions-use-numbers-analogously-1.fantom
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

20 lines
386 B
Text

class Main
{
static |Float -> Float| combine (Float n1, Float n2)
{
return |Float m -> Float| { n1 * n2 * m }
}
public static Void main ()
{
Float x := 2f
Float xi := 0.5f
Float y := 4f
Float yi := 0.25f
Float z := x + y
Float zi := 1 / (x + y)
echo (combine(x, xi)(0.5f))
echo (combine(y, yi)(0.5f))
echo (combine(z, zi)(0.5f))
}
}