6 lines
116 B
Racket
6 lines
116 B
Racket
|
(define (fib n)
|
||
|
|
(let loop ((cnt 0) (a 0) (b 1))
|
||
|
|
(if (= n cnt)
|
||
|
|
a
|
||
|
|
(loop (+ cnt 1) b (+ a b)))))
|