LINUX.ORG.RU

История изменений

Исправление 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)))