fib.lisp

(defun fib (n)
  (if(or (= 0 n) (= 1 n)) n
    (+ (fib (- n 1)) (fib (- n 2)))))

(defun start ()
  (loop for x from 0 to 35 collect
	(format t "n = ~d => ~d~%" x (fib x))))
(start)
(quit)