Рекурсия естественна, поскольку часто можно свести операции над деревьями к операциям над их ветвями, которые сами сводятся к операциям над ветвями ветвей, и так далее, пока мы не достигнем листьев. дерева.
(defun count-leaves (x) (cond ((null x) 0) ((atom x) 1) (t (+ (count-leaves (first x)) (count-leaves (rest x))))))