Next: , Previous: Destruct, Up: Benchmark Sources


4.3.2 Recfib

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