Entries from 2006-04-20 to 1 day

関数型言語の勉強にSICPを読もう - (12) 2章 - データによる抽象の構築(63ページ)

問題 2.28 (define (fringe tree) (define (pair-to-list pair) (list (car pair) (car (cdr pair)))) (if (null? tree) '() (if (pair? (car tree)) (append (pair-to-list (car tree)) (fringe (cdr tree))) (append (car tree) (fringe (cdr tree))))))と…