Числа Фибоначи - итерация

Отражает идею динамического программирования (не совсем корректный термин) — оптимизации путём:

Решение демонстрирует распространенный шаблон (pattern) рекурсивного программирования итеративного процесса.

(defun fib-iter (a b count)
  ;; Вспомогательная функция
  ;; а - накапливающий параметр
  ;; b - последнее обработанное значение
  (if (= count 0)
       b
       (fib-iter (+ a b) a (- count 1))))

(defun fib2 (n)
  ;; Целевая функция
  (fib-iter 1 0 n))