chibi-scheme/tests/snow/repo1/leonardo/fibonacci.scm
2015-04-09 01:16:52 +09:00

4 lines
78 B
Scheme

(define (fib n)
(if (< n 2)
1
(+ (fib (- n 1)) (fib (- n 2)))))