lama_byterun/regression/test098.expr
2020-01-05 03:33:17 +03:00

7 lines
No EOL
124 B
Text

infixr "**" before "*" (f, g) {
fun (x) { f (g (x))}
}
local x = read ();
write ((fun (x) { x+2} ** fun (x) { x+3})(7))