K druhému číslu pripočítame rekurzívne jednotku toľko krát, aká je hodnota prvého čísla.
; Predpokladám, že čísla sú kladné (defun sucet (c1 c2) (cond ((= c1 0) c2) (T (+ 1 (sucet (- c1 1) c2))) ) ) ; Príklad: (sucet 7 3) -> 10