zahl

Log | Files | Refs | README

fib.scm (91B)


      1 (defn! fib (n)
      2   (if (< n 2)
      3     n
      4     (+ (fib (- n 1)) (fib (- n 2)))))
      5 (print! (fib 30))