このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1268979408/775
#  『プリンターがあります。これはプリンタです。プリンタを使います。プリンターの変更です。』 
#  という文がある時、文中のプリンタをプリンターになおすにはどのような正規表現を 
#  用いればよいでしょうか? 
# 

'『プリンターがあります。これはプリンタです。プリンタを使います。プリンターの変更です。』という文がある時、文中のプリンタをプリンターになおす' :-
        atom_chars('プリンターがあります。これはプリンタです。プリンタを使います。プリンターの変更です。',Chars1),
        'プリンタをプリンターに変換'(Chars1,Chars2),
        atom_chars(_変換した文字列,Chars2).

'プリンタをプリンターに変換'([],[]) :- !.
'プリンタをプリンターに変換'([プ,リ,ン,タ,ー|R1],[プ,リ,ン,タ,ー|R2]) :-
        'プリンタをプリンターに変換'(R1,R2),!.
'プリンタをプリンターに変換'([プ,リ,ン,タ|R1],[プ,リ,ン,タ,ー|R2]) :-
        'プリンタをプリンターに変換'(R1,R2),!.
'プリンタをプリンターに変換'([A|R1],[A|R2]) :-
        'プリンタをプリンターに変換'(R1,R2).