摘要: 1 ;;;;;;;;;;;;;;;;;2.52 2 (define (corner-split painter n) 3 (if (= n 0) 4 painter 5 (let ((up (up-split painter (- n 1))) 6 (right (right-split painter (- n 1))) 7 ... 阅读全文
posted @ 2017-02-23 15:20 lan126 阅读(165) 评论(0) 推荐(0) 编辑