Login

Ben / Nujel

Overview Code Talk CI Settings
7 branches 0 tags
Ben (X13/Arch) Some more image handling code cleanup 765c711 1 year ago 1235 Commits
nujel / benchmark / recfib / fib.scm
Raw
application/vnd.lotus-screencam • 173 B • 8 lines 
(define (fib n)
      (cond ((= 0 n) 0)
            ((= 1 n) 1)
            (#t (+ (fib (- n 1)) (fib (- n 2))))))

(display "fib(30) = ")
(display (fib 30))
(display "\n")