Loops 未定义的函数A有什么问题？（口齿不清）

必须编写一个程序，要求用户输入，直到他们输入0为止。然后必须输出输入的数字的最小值。我是lisp新手，我在控制台中不断得到未定义的函数A，但A在代码中是一个变量

(defun find_min ( x y )
  (if(< x y)
     (+ x 0)
     (+ y 0)))

(defun minOfNums()
  (loop 
     (princ "Enter number: ")
     (setq a (read))        
     (princ "Enter number: ")
     (setq min (find_min (a (read))))
     (terpri)
     (when (= a 0) (return a)))
  (write min))

（定义查找最小值（x y）
（如果（

（minOfNums）

在

（setq min（find_min（a（read）））

中调用函数

a

，结果是从用户处读取对象。它应该（可能）是

（setq min（find_min a（read））

---

如果没有其他内容，那么

find_min

函数需要两个参数，而编写的代码只传递一个参数。

是什么导致您在第一个函数中向x和y添加零？你为什么要做一个循环？另外请注意，

min

未定义，您应该引入带有

let

绑定的变量a和min可能未定义。（a…）是函数调用，其中函数未定义。输出可能会被缓冲，因此打印然后读取通常是不够的。