Export the definitions.

This commit is contained in:
Sergiu Ivanov 2020-12-18 13:04:07 +01:00
parent 03dc7eb0e5
commit 00b01b924d

View file

@ -23,6 +23,10 @@
(module+ test
(require typed/rackunit))
(provide compose-n
compose-3 compose-4 compose-5 compose-6 compose-7 compose-8 compose-9
multi-compose)
(: compose-n (All (a) (-> (-> a a) * (-> a a))))
(define (compose-n . funcs)
(λ (x)