Lisp 从函数返回作为另一个参数

Question

我有以下函数，我想使用它们的返回值作为父函数的参数来调用多个其他函数。

目前有效:

(defun feet-to-m (A)
    (setf B (feet-to-inches A)) 
    (setf C (inches-to-cm B))   
    (setf D (cm-to-m C)))

我想知道 Lisp 是否有嵌套函数的能力，这样下面的函数就可以工作，或者更有效的方法:

(defun feet-to-m (A)
    (cm-to-m (inches-to-cm (feet-to-inches (A)))))

Answer 1

您的代码应该几乎可以正常工作。您只需删除 A 周围的括号。您的直觉是正确的，这正是像 Lisp 这样的函数式语言应该使用的范例。您给出的第一个示例更多地是如何使用 Java、C++ 等命令式语言进行编码。

(defun feet-to-m (A)
    (cm-to-m (inches-to-cm (feet-to-inches A))))