第二章习题 2.52 - 2.72 的解答。
E-2.52: 跳过……
E-2.53: 直接运行一下结果就出来了。
E-2.54:
(define (my-equal? a b)
(if (and (pair? a) (pair? b))
(and (my-equal? (car a) (car b))
(my-equal? (cdr a) (cdr b)))
(eq? a b)))
; ----------------------------------------------
(my-equal? '(this is a
… 阅读全文…