Welcome to the CHICKEN Scheme pasting service
compose vs o added by chickendan on Tue Apr 16 18:34:41 2019
;; csc -O5 fib.scm && time ./fib (import (srfi 1) (chicken fixnum)) (define (fib n) (if (or (fx= n 0) (fx= n 1)) n (fx+ (fib (fx- n 1)) (fib (fx- n 2))))) (for-each (compose print fib) (iota 38)) ; (for-each (o print fib) (iota 38))