Error: unbound function - EQUALP - Lisp
Формулировка задачи:
Доброго всем вечера.
Столкнулась с проблемой, что XLISP-PLUS 3.04 на запрос (equalp 3.0 3) и подобные ему отвечает ошибкой error: unbound function - EQUALP. Хотя, если верить описанию функции, должен возвращать Т. В чем может быть причина такого поведения и как исправить?
Заранее спасибо
Решение задачи: «Error: unbound function - EQUALP»
textual
Листинг программы
- (defun equalp (x y)
- (COND ((ATOM x) (EQ x y))
- ((ATOM y) NIL)
- ((equalp (CAR x) (CAR y)) (equalp (CDR x) (CDR y)))
- (T NIL)))
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д