使用 Lisp 简单描述加法运算

栏目: Lisp · 发布时间: 8年前

内容简介:使用 Lisp 简单描述加法运算

使用 Lisp 简单描述加法运算

最近在看 MIT 公开课-计算机程序的构造和解释,即使你像我一样根本没学过 lisp 也能看懂下面这段代码,这段代码展示了怎么实现加法运算,这种我们几乎从来不会去想为什么的问题,这几行简单的代码告诉我们如何计算出 3 + 4 的值

皮亚诺 算术定义的求 x 和 y 之和的过程

; Define a [+] processor 
(define (+ x y) 
    (if (= x 0) 
        y 
        (+ (-1+x) (1+y)))) 
 
; x = 3, y = 4 
(+ 3 4) 
(if (= 3 0) 4 (+ (-1+3) (1+4))) 
(+ (-1+3) (1+4)) 
(+ 2 5) 
(if (= 2 0) 5 (+ (-1+2) (1+5))) 
(+ (-1+2) (1+5)) 
(+ 1 6) 
(if (= 1 0) 6 (+ (-1+1) (1+6))) 
(+ (-1+1) (1+6)) 
(+ 0 7) 
(if (= 0 0) 7 (-1+0) (1+7)) 
7 

以上就是本文的全部内容,希望本文的内容对大家的学习或者工作能带来一定的帮助,也希望大家多多支持 码农网

查看所有标签

猜你喜欢:

本站部分资源来源于网络,本站转载出于传递更多信息之目的,版权归原作者或者来源机构所有,如转载稿涉及版权问题,请联系我们

Imperfect C++中文版

Imperfect C++中文版

威尔逊 / 荣耀、刘未鹏 / 人民邮电出版社 / 2006-1 / 75.0

汇集实用的C++编程解决方案,C++虽然是一门非凡的语言,但并不完美。Matthew Wilson使用C++十年有余,其间发现C++存在一些固有的限制,需要一些颇具技术性的工作进行弥补。本书不仅指出了C++的缺失,更为你编写健壮、灵活、高效、可维护的代码提供了实用的技术和工具。Wilson向你展示了如何克服C++的复杂性,穿越C++庞大的范式阵列。夺回对代码的控制权,从而获得更理想的结果。一起来看看 《Imperfect C++中文版》 这本书的介绍吧!

XML、JSON 在线转换
XML、JSON 在线转换

在线XML、JSON转换工具

Markdown 在线编辑器
Markdown 在线编辑器

Markdown 在线编辑器

正则表达式在线测试
正则表达式在线测试

正则表达式在线测试