tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme appendがわかりにくい。 (define o `(1 3 5 7)) (define s `(1 4 9 16)) (define (append list1 list2) (if (null? list1) list2 (cons (car list1) (append (cdr list1) list2)))) (append o s) ; (1 3 5 7 1 4 9 16) 展開してみる。 (cons (car o) (cons (car (cdr o)) (cons (car (cdr (cdr o))) (cons (car (cdr (cdr (cdr o)))) s))))… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20070830%2F1188467869" title=" SICPを読む(46) 2.2.1(2) append - ボクノス" 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-08-30 18:57:49 rich https://boxnos.hatenablog.com/entry/20070830/1188467869 1.0 100%