Особый оператор COND

(cond (p₁ form₁₁...form_1k)
...
     (p_m form_m1...form_mk)
     [(T form₁...form_n)])

Последняя ветвь может отсутствовать: это равносильно (T NIL) и если ни одно из условий p₁,..., p_m не выполнено, вся форма cond возвращает NIL.

Пример

(defun abs1 (x)
  (cond ((< x 0) (- x))
        ((= x 0) 0)
        ((> x 0) x))

Правильный отступ облегчает восприятие текста программы и поиск ошибок!