RosettaCodeData/Task/Function-composition/Qi/function-composition-2.qi

4 lines
82 B
Plaintext

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