5 lines
116 B
Racket
5 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)))))
|