sicp 习题2.27

(define x (list (list 1 2) (list 3 4)))

上面的list 原来其实就是一个二叉树，但是初次学习，看了40分钟竟然也没有意识到。

最后还是看了看题解，二叉树的遍历而已。 

lisp的一个表几乎就可以表示许多数据结构，链表，二叉树，甚至图。 这和其他语言真的很不一样。

下面是代码:

#lang planet neil/sicp
(define x (list (list 1 2) (list 3 4)))(define (deep-reverse tree)(cond ((null? tree) '())((not (pair? tree)) tree)(else(reverse (list (deep-reverse (car tree))           (deep-reverse (cadr tree)))))))

Welcome to DrRacket, version 5.3.3 [3m].
Language: planet neil/sicp; memory limit: 512 MB.
> (deep-reverse x)
(mcons
 (mcons 4 (mcons 3 '()))
 (mcons (mcons 2 (mcons 1 '())) '()))
>