このディレクトリの索引
#  全角カタカナ、半角カタカナ、ひらがなを相互に変換することができます。
#  平仮名には 「ヴ」に対応する文字がないので、かわりに 「う゛」で表します。
#  数字については、半角カタカナでは半角で、全角カタカナ及び平仮名では全角で
#  表します。 変換関数は以下の6種類です。
#  jz(s)
#  文字列 s に含まれる平仮名を全角カタカナに置き換えます。
#  jh(s)
#  文字列 s に含まれる平仮名を半角カタカナに置き換えます。
#  zj(s)
#  文字列 s に含まれる全角カタカナを平仮名に置き換えます。
#  zh(s)
#  文字列 s に含まれる全角カタカナを半角カタカナに置き換えます。
#  hj(s)
#  文字列 s に含まれる半角カタカナを平仮名に置き換えます。
#  hz(s)
#  文字列 s に含まれる半角カタカナを全角カタカナに置き換えます。

jz(_文字列,_変換された文字列) :-
        atom_chars(_文字列,L1),
        平仮名全角カタカナ変換(L1,L2),
        atom_chars(_変換された文字列,L2),!.

平仮名全角カタカナ変換([],[]) :- !.
平仮名全角カタカナ変換(L1,L2) :-
        平仮名全角カタカナ対応(L1,L2,R1,R2),
        平仮名全角カタカナ変換(R1,R2).
平仮名全角カタカナ変換([A|R1],[B|R2]) :-
        平仮名全角カタカナ対応(A,B),
        平仮名全角カタカナ変換(R1,R2).
平仮名全角カタカナ変換([A|R1],[A|R2]) :-
        平仮名全角カタカナ変換(R1,R2).

平仮名全角カタカナ対応([う,'゛'|R1],[ヴ|R2],R1,R2).

平仮名全角カタカナ対応(あ,ア).
平仮名全角カタカナ対応(い,イ).
平仮名全角カタカナ対応(う,ウ).
平仮名全角カタカナ対応(え,エ).
平仮名全角カタカナ対応(お,オ).
平仮名全角カタカナ対応(か,カ).
平仮名全角カタカナ対応(き,キ).
平仮名全角カタカナ対応(く,ク).
平仮名全角カタカナ対応(け,ケ).
平仮名全角カタカナ対応(こ,コ).
平仮名全角カタカナ対応(さ,サ).
平仮名全角カタカナ対応(し,シ).
平仮名全角カタカナ対応(す,ス).
平仮名全角カタカナ対応(せ,セ).
平仮名全角カタカナ対応(そ,ソ).
平仮名全角カタカナ対応(た,タ).
平仮名全角カタカナ対応(ち,チ).
平仮名全角カタカナ対応(つ,ツ).
平仮名全角カタカナ対応(て,テ).
平仮名全角カタカナ対応(と,ト).
平仮名全角カタカナ対応(な,ナ).
平仮名全角カタカナ対応(に,ニ).
平仮名全角カタカナ対応(ぬ,ヌ).
平仮名全角カタカナ対応(ね,ネ).
平仮名全角カタカナ対応(の,ノ).
平仮名全角カタカナ対応(は,ハ).
平仮名全角カタカナ対応(ひ,ヒ).
平仮名全角カタカナ対応(ふ,フ).
平仮名全角カタカナ対応(へ,ヘ).
平仮名全角カタカナ対応(ほ,ホ).
平仮名全角カタカナ対応(ま,マ).
平仮名全角カタカナ対応(み,ミ).
平仮名全角カタカナ対応(む,ム).
平仮名全角カタカナ対応(め,メ).
平仮名全角カタカナ対応(も,モ).
平仮名全角カタカナ対応(や,ヤ).
平仮名全角カタカナ対応(ゆ,ユ).
平仮名全角カタカナ対応(よ,ヨ).
平仮名全角カタカナ対応(わ,ワ).
平仮名全角カタカナ対応(を,ヲ).
平仮名全角カタカナ対応(ん,ン).