Next: , Previous: , Up: Benchmark Sources   [Contents][Index]


4.3.2 Recfib

(define (recfib x)
  (if (< x 2)
      x
      (+ (recfib (- x 1))
         (recfib (- x 2)))))