5 lines
102 B
Scheme
5 lines
102 B
Scheme
|
(define (fib n)
|
||
|
|
(let loop ((a 0) (b 1) (n n))
|
||
|
|
(if (= n 0) a
|
||
|
|
(loop b (+ a b) (- n 1)))))
|