return to first page linux journal archive
keywordscontents

Listing 1. Fibonacci calculator

(define (fib x)
   (if (< x 2)
          x
	         (+ (fib (- x 1)) (fib (- x 2)))))
Back to article