Chapter 12 练习 (Exercises)

1. 画三个不同的树，能够被打印成 ((A) (A) (A)) 。写一个表达式来生成它们。
2. 假设 make-queue ， enqueue 和 dequeue 是按照图 12.7 中的定义，用箱子表式法画出下面每一步所得到的队列的结构图：

> (setf q (make-queue))
(NIL)
> (enqueue 'a q)
(A)
> (enqueue 'b q)
(A B)
> (dequeue q)
A

1. 定义一个函数 copy-queue ，可以返回一个 queue 的拷贝。
2. 定义一个函数，接受两个输入参数 object 和 queue ，能将 object 插入到 queue 的首端。
3. 定义一个函数，接受两个输入参数 object 和 queue，能具有破坏性地将 object 的第一个实例 ( eql 等价地) 移到 queue 的首端。
4. 定义一个函数，接受两个输入参数 object 和 lst ( lst 可能是 cdr-circular 列表)，如果 object 是 lst 的成员时返回真。
5. 定义一个函数，如果它的参数是一个 cdr-circular 则返回真。
6. 定义一个函数，如果它的参数是一个 car-circular 则返回真。

脚注