sicp习题试解 (2.44)

; ======================================================================

;

; Structure and Interpretation of Computer Programs

; (trial answer to excercises)

;

; 计算机程序的构造和解释(习题试解)

;

; created: code17 08/20/05

; modified:

; (保持内容完整不变前提下，可以任意转载)

; ======================================================================

;; SICP No.2.44

(define (up-split painter n)

(if (= n 0)

painter

(let ((smaller (up-split painter (- n 1))))

(below painter (beside smaller smaller)))))