list 应该是一个 lambda 表达式

Question

我刚刚开始学习 LISP，我只是在思考它的逻辑，但是我遇到了一个错误，我找不到解决方案。我确定这是因为我我在某处误用了括号，或者我在一般情况下误用了一个函数，但我已经盯着它看了一个小时，没有任何进展！

(defun not-touching (pos player move)
   (let (legal? t)
    if ((not (eq (member move '(0 1 2 3 4 7 8 11 12 13 14 15)) nil))
        (mapcar #'(lambda(x) (if (not (member move x) nil)
                                (cond ((and (eq (nth (- (position move x) 1) x) nil)
                                        (not (eq (nth (+ (position move x) 1) x) player))) t)   
                                    ((and (not (eq (nth (- (position move x) 1) x) player))
                                        (not (eq (nth (+ (position move x) 1) x) player))) t)
                                    ((and (not (eq (nth (- (position move x) 1) x) player))
                                        (eq (nth (+ (position move x) 1) x) nil)) t)
                                    (t setf legal? nil))
                                nil)) *outside-lines*))
    legal?))

我得到的错误如下所示：

SYSTEM::%EXPAND-FORM: (NOT (EQ (MEMBER MOVE '(0 1 2 3 4 7 8 11 12 13 14 15)) NIL)) should be
  a lambda expression

任何帮助将不胜感激！

Answer 1

如果你想编程，你需要学习编程语言的语法。

请参阅Common Lisp Hyperspec 了解 Common Lisp 语法。 Common Lisp 的每个函数/宏/特殊运算符/...都在 Common Lisp Hyperspec 及其语法中进行了描述。

查看 LET、IF 的语法。

LET 需要一个绑定列表。

IF, SETF 是一种形式。需要括号括起来。

NOT 只接受一个参数。