fib.lisp 84 Bytes
Newer Older
1
2
3
4
5
6
7

(defun fib (n)
  (if (< n 2)
      n
    (+ (fib (- n 1))
       (fib (- n 2)))))