'F'->'f' =) Trying to get in the habit to be disciplined with this. It certainly helps as I write larger and more complex bits of code.
/Lindsay
(de fibonacci (N)
(let (F (list 2 1 1))
(cond
((= N 0) 0)
((= N 1) (caddr F))
((= N 2) (cadr F))
(T
(do (- N 3)
(rot F)
(set F (+ (cadr F) (caddr F))) )
(car F) ) ) ) )
>
