2010-02-01から1日間の記事一覧
6.5簡単なリスト処理(のつづき) 2つのリストを連結する手続きappend2 (define (append2 a b) (if (pair? a) (cons (car a) (append2 (cdr a) b)) b)) gosh> (append2 '(1 2 3 4) '(10 9)) (1 2 3 4 10 9) gosh> (append2 '() '(10 9)) (10 9) gosh> (appen…
6.5簡単なリスト処理(のつづき) 2つのリストを連結する手続きappend2 (define (append2 a b) (if (pair? a) (cons (car a) (append2 (cdr a) b)) b)) gosh> (append2 '(1 2 3 4) '(10 9)) (1 2 3 4 10 9) gosh> (append2 '() '(10 9)) (10 9) gosh> (appen…