Login
7 branches 0 tags
Ben (X13/Arch) Make use of lMap in image reader/write 454cdb8 1 year ago 1231 Commits
nujel / benchmark / recfib / fib.nuj
#!/usr/bin/env nujel

(defn fib (n)
      (cond ((zero? n) 0)
            ((= 1 n) 1)
            (#t (+ (fib (- n 1)) (fib (- n 2))))))

(pfmtln "fib(30) is: {}\nGC Runs: {}" (fib 30) (garbage-collection-runs))