Fetching contributors…
Cannot retrieve contributors at this time
9 lines (7 sloc) 115 Bytes
(define (fib n)
(if (< n 2)
n
(+ (fib (- n 2)) (fib (- n 1)))))
(display (fib 20))
(newline)
(quit)