RosettaCodeData/Task/First-class-functions/Maxima/first-class-functions.maxima
2026-02-01 16:33:20 -08:00

4 lines
175 B
Text

a: [sin, cos, lambda([x], x^3)]$
b: [asin, acos, lambda([x], x^(1/3))]$
compose(f, g) := buildq([f, g], lambda([x], f(g(x))))$
map(lambda([fun], fun(x)), map(compose, a, b));