Lisp sigma函数递归 - 帮我跟踪它.我在逻辑上得到它,我只需要理解这个例子,这样我就可以完成我的任务.我不确定第4和第5行发生了什么,x
正在设置的是什么.如果我的输入是(sigma f 1 2)
我的输出20
,那么另一个例子就是(sigma f 1 5)
.如果你能帮我追踪它.我会发布sigma
下面的定义.谢谢您的帮助.
(defun sigma (f m n)
(if (> m n)
0
(let ((x (sigma f (+ m 1) n)))
(+ (funcall f m)
x))))
Run Code Online (Sandbox Code Playgroud) common-lisp ×1