fork download
  1. ; one step, two step
  2.  
  3. (define (f n)
  4. (if (< n 2) 1
  5. (+ (f (- n 1)) (f (- n 2)))))
  6.  
  7. (display (map f '(1 2 3 4 5 6 7 8 9 10))) (newline)
Success #stdin #stdout 0.01s 42848KB
stdin
Standard input is empty
stdout
(1 2 3 5 8 13 21 34 55 89)