(defun fixpoint ( x y)
(funcall y (funcall x x y) )
)
(setq chen (fixpoint 'fixpoint
(lambda (yin )
(progn
(print 'a)
(lambda (yang )
(progn
(print 'b)
(funcall yin yang ))))))
)
(funcall chen chen)
本文通过具体的Lisp代码示例介绍了如何使用函数式编程技术实现递归调用,并展示了Y组合子的应用。该示例涉及高阶函数、闭包及函数递归等概念。
&spm=1001.2101.3001.5002&articleId=6317785&d=1&t=3&u=02cccbab150c40eba5f85e94a159366e)
138

被折叠的 条评论
为什么被折叠?



