Проверьте наличие элемента в lisp

Question

Чтобы выполнить упражнение, мне нужно проверить, есть ли элемент в списке или нет. Я знаю, что в lisp есть функция member, но наш инструктор очень строг и не позволяет нам использовать вещи, которые еще не были охвачены в ходе курса.

Что бы способ проверить, если атом находится в списке, используя только cond, nil, car, not, cdr, +, equal, defun?

---

Edit: После комментария Doseke в; вот попытка:

(defun presence (list item) 
    (cond 
     ((atom list) nil) 
     ((equal (car list) item) t) 
     ((consp list) (presence (cdr list) item)) 
     (t nil) 
    ) 
    ) 

редактировать: Я изменил название, чтобы он соответствовал моему актуальному вопросу

Answer 1

Поскольку вы ограничены в используемых функциях, это может быть что-то вроде этого, я предполагаю, что:

(defun member-2 (x xs) 
    (cond ((not xs) nil) 
     ((equal x (car xs)) xs) 
     (t (member-2 x (cdr xs)))))