- 48 名前：デフォルトの名無しさん mailto:sage [2009/07/29(水) 18:38:55 ]
- 冪集合は格要素を「とる」か「とらない」で再帰すれば良いと考えて
こう書いてみました
(define (power l)
(if (not (pair? l)) (list l)
(append
(power (cdr l)) ;先頭をとらない
(map (pa$ cons (car l)) (power (cdr l))) ;先頭をとる
)))
↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました |
Lisp Scheme Part27
| |
read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef