Export the definitions.
This commit is contained in:
parent
03dc7eb0e5
commit
00b01b924d
|
@ -23,6 +23,10 @@
|
||||||
(module+ test
|
(module+ test
|
||||||
(require typed/rackunit))
|
(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))))
|
(: compose-n (All (a) (-> (-> a a) * (-> a a))))
|
||||||
(define (compose-n . funcs)
|
(define (compose-n . funcs)
|
||||||
(λ (x)
|
(λ (x)
|
||||||
|
|
Loading…
Reference in New Issue