【SICP练习】82 练习2.54

最新推荐文章于 2021-04-29 12:14:30 发布

转载最新推荐文章于 2021-04-29 12:14:30 发布 · 59 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：https://my.oschina.net/nomasp/blog/503331

本文详细介绍了Scheme语言中用于判断两个元素是否相等的函数实现，包括基本符号、列表以及错误处理的递归方法。通过具体代码示例，阐述了如何在不同数据类型下进行相等性比较。

这些关于Scheme的基本知识在【Scheme归纳】系列博文总都有介绍。

(define (equal? x y) (cond ((and (symbol? x) (symbol? y)) (symbol-equal? x y)) ((and (list? x) (list? y)) (list-equal? x y)) (else (error “Error: You just input wrong type.”)) (define (symbol-equal? x y) (eq? x y)) (define (list-equal? x y) (cond ((and (null? x) (null? y)) #t) ((or (null? x) (null? y)) #f) ((equal? (car x) (car y)) (equal? (cdr x) (cdr y))) (else #f)))

在倒数第二行中运用了递归。

感谢访问，希望对您有所帮助。欢迎关注或收藏、评论或点赞。

为使本文得到斧正和提问，转载请注明出处：
http://blog.youkuaiyun.com/nomasp

转载于:https://my.oschina.net/nomasp/blog/503331