DEFCLASS определяет класс

Определим класс объектов - точек на плоскости в декартовых координатах.

(defclass cart ()                ; имя класса и надклассы
 ((x :initarg :x :reader cart-x)   ; дескриптор слота x
  (y :initarg :y :reader cart-y))) ; дескриптор слота y

Дескриптор слота определяет

x Имя слота - символ.
:x Ключ для именованного аргумента инициализации для создания объекта.
cart-x Селектор для извлечения значения, может совпадать с именем слота.