Отражает идею динамического программирования (не совсем корректный термин) — оптимизации путём:
Решение демонстрирует распространенный шаблон (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))