Listing 1. Fibonacci calculator

(define (fib x)
   (if (< x 2)
          x
            (+ (fib (- x 1)) (fib (- x 2)))))
Archive Index Issue Table of Contents Article
Copyright © 1994 - 2019 Linux Journal. All rights reserved.