このディレクトリの索引
#  
#  問題 14-13 ある文字列から特定の文字列に含まれる文字を削除するアルゴリズムを示せ。
#  
#  入門「データ構造とアルゴリズム」Narasimha Karumanchi著 黒川利明/木下哲也訳 オライリージャパン刊 p385 より
#  

'ある文字列から特定の文字列に含まれる文字を削除する'(_ある文字列,_特定の文字列,_特定の文字列に含まれる文字を削除した文字列) :-
        文字選択された文字列(_ある文字列,_文字,\+(sub_atom(_特定の文字列,_,1,_,_文字)),_特定の文字列に含まれる文字を削除した文字列).



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

文字選択された文字列(_文字列,_構成する文字,_文字選択条件,_文字選択された文字列) :-
        findall(_構成する文字,(
                    sub_atom(_文字列,_,1,_,_構成する文字),
                    _文字選択条件),
                _文字選択された文字ならび),
        atomic_list_concat(_文字選択された文字ならび,_文字選択された文字列).