摘要:
(define (partial-tree elts n) (if (= n 0) (cons '() elts) (let ((left-size (quotient (- n 1) 2))) (let ((left-result (partial-tree elts left-size))) (let ((left-tree (car left-result)) (non-left-elts (cdr left-result)) (right-size (- n (+ left... 阅读全文
posted @ 2013-11-09 12:45
zhengguan
阅读(148)
评论(0)
推荐(0)

浙公网安备 33010602011771号