; one step, two step
(define (f n)
(if (< n 2) 1
(+ (f (- n 1)) (f (- n 2)))))
(display (map f '(1 2 3 4 5 6 7 8 9 10))) (newline)
OyBvbmUgc3RlcCwgdHdvIHN0ZXAKCihkZWZpbmUgKGYgbikKICAoaWYgKDwgbiAyKSAxCiAgICAoKyAoZiAoLSBuIDEpKSAoZiAoLSBuIDIpKSkpKQogICAgCihkaXNwbGF5IChtYXAgZiAnKDEgMiAzIDQgNSA2IDcgOCA5IDEwKSkpIChuZXdsaW5lKQ==