Исправление monk, (текущая версия) :
Было бы point-free вместо всяких
Можно и
(define f-comp
(compose
(curry + 1)
(curry + 2)
(curry + 1)))
Только тогда скорость становится уже в 10 раз, а не 1.5:
cpu time: 728 real time: 730 gc time: 0
cpu time: 6056 real time: 6046 gc time: 132
Исходная версия monk, :
Было бы point-free вместо всяких
Можно и
(define f-comp
(compose
(curry + 1)
(curry + 2)
(curry + 1)))