第二章习题 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 

…

阅读全文…