lisp - 检查 lisp 中是否存在某个项目

Question

为了完成一个练习，我需要检查一个元素是否在列表中。我知道 lisp 中有函数 member，但是我们的讲师非常严格，不让我们使用类(class)中没有涉及的东西。

仅使用 cond、nil、car、 来检查原子是否在列表中的方法是什么不, cdr, +, equal, defun?

---

编辑:在 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)))))