RosettaCodeData/Task/Function-composition/Qi/function-composition-1.qi
2023-07-01 13:44:08 -04:00

5 lines
101 B
Text

(define compose
F G -> (/. X
(F (G X))))
((compose (+ 1) (+ 2)) 3) \ (Outputs 6) \