tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme さてさて、リスト処理も本格的な感じになってきます。今回は木の写像。 まずは普通に ふつうに。 (define (scale-tree tree n) (cond ((null? tree) `()) ((not-pair? tree) (* tree n)) (else (cons (scale-tree (car tree) n) (scale-tree (cdr tree) n))))) (scale-tree '(1 (2 (3 4))) 10) ; (10 (20 (30 40))) car,cdrで巡ればいい。あ、not-pairはsrfi-1が必要。srfiを積極的に使っていこうと… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20071013%2F1192225355" title=" SICPを読む(53) 2.2.2(2) 木の写像 - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-10-13 06:42:35 rich https://boxnos.hatenablog.com/entry/20071013/1192225355 1.0 100%