「こんなプログラムを書いてみよう」 in Scheme - Homoiconic Days

「こんなプログラムを書いてみよう」 in Scheme - Homoiconic Days

文字列の集合{ BAB, AAB, BAA, AAA, ABA }があるとき、これらのすべてを1回ずつ含み、かつ、3文字の部分...概要を表示 文字列の集合{ BAB, AAB, BAA, AAA, ABA }があるとき、これらのすべてを1回ずつ含み、かつ、3文字の部分文字列としてはこれらの文字列しか含まない文字列は、BABAAABとBAAABABの２通りある。 文字列の集合が{ BAB, AAB, BAA, AAA }のときは、そのような条件では文字列が作れない。 こんなプログラムを書いてみよう - きしだのはては たまたま見つけたパズル。もう1週間も前の話題だから完全に乗り遅れてるんだけど、せっかく解けたので。 クロージャでネットワークを作っといて、あとは勝手に解いてもらう方法を採用。 (use util.match) (use srfi-1) (define (make-node name) (let1 children '() (define (self msg . args) (case msg [(name) name