;
; $Id: 2B_ROMKANA,v 1.1.2.1 1999/02/08 02:52:02 yamasita Exp $
;

; FreeWnn is a network-extensible Kana-to-Kanji conversion system.
; This file is part of FreeWnn.
; 
; Copyright Kyoto University Research Institute for Mathematical Sciences
;                 1987, 1988, 1989, 1990, 1991, 1992
; Copyright OMRON Corporation. 1987, 1988, 1989, 1990, 1991, 1992, 1999
; Copyright ASTEC, Inc. 1987, 1988, 1989, 1990, 1991, 1992
;
; Author: OMRON SOFTWARE Co., Ltd. <freewnn@rd.kyoto.omronsoft.co.jp>
;
; This program is free software; you can redistribute it and/or modify
; it under the terms of the GNU General Public License as published by
; the Free Software Foundation; either version 2, or (at your option)
; any later version.
;
; This program is distributed in the hope that it will be useful,
; but WITHOUT ANY WARRANTY; without even the implied warranty of
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
; GNU General Public License for more details.
;
; You should have received a copy of the GNU General Public License
; along with GNU Emacs; see the file COPYING.  If not, write to the
; Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
;
; Commentary:
;
; Change log:
;
; Last modified date: 8,Feb.1999
;

A	
I	
U	
E	
O	
KA	
KI	
KU	
KE	
KO	
KYA	
KYU	
KYE	
KYO	
SA	
SI	
SU	
SE	
SO	
SYA	
SYU	
SYE	
SYO	
SHA	
SHI	
SHU	
SHE	
SHO	
TA	
TI	
TU	
TE	
TO	
TYA	
TYI	Ƥ
TYU	
TYE	
TYO	
TSU	
CHA	
CHI	
CHU	
CHE	
CHO	
NA	
NI	
NU	
NE	
NO	
NYA	ˤ
NYU	ˤ
NYE	ˤ
NYO	ˤ
HA	
HI	
HU	
HE	
HO	
HYA	Ҥ
HYU	Ҥ
HYE	Ҥ
HYO	Ҥ
FA	դ
FI	դ
FU	
FE	դ
FO	դ
MA	
MI	
MU	
ME	
MO	
MYA	ߤ
MYU	ߤ
MYE	ߤ
MYO	ߤ
YA	
YI	
YU	
YE	
YO	
RA	
RI	
RU	
RE	
RO	
LA	
LI	
LU	
LE	
LO	
RYA	
RYU	
RYE	ꤧ
RYO	
LYA	
LYU	
LYE	ꤧ
LYO	
WA	
WI	
WU	
WE	
WO	
GA	
GI	
GU	
GE	
GO	
GYA	
GYU	
GYE	
GYO	
ZA	
ZI	
ZU	
ZE	
ZO	
ZYA	
ZYU	
ZYE	
ZYO	
JA	
JI	
JU	
JE	
JO	
DA	
DI	
DU	
DE	
DO	
DYA	¤
DYI	Ǥ
DYU	¤
DYE	¤
DYO	¤
BA	
BI	
BU	
BE	
BO	
BYA	Ӥ
BYU	Ӥ
BYE	Ӥ
BYO	Ӥ
PA	
PI	
PU	
PE	
PO	
PYA	Ԥ
PYU	Ԥ
PYE	Ԥ
PYO	Ԥ
(    if katakana)VA	
(    if katakana)VI	
(    if katakana)VU	
(    if katakana)VE	
(    if katakana)VO	
(unless katakana)VA	֤
(unless katakana)VI	֤
(unless katakana)VU	
(unless katakana)VE	֤
(unless katakana)VO	֤

KWA	
KWI	
KWU	
KWE	
KWO	
GWA	
GWI	
GWU	
GWE	
GWO	
TSA	Ĥ
TSI	Ĥ
TSE	Ĥ
TSO	Ĥ
;QA	
;QI	
;QU	
;QE	
;QO	

N	
N'\''	
N';'	
;NN	

(defvar q1 (list B M P))
M(q1)	 (q1)

(defvar aa (list K S T H Y R W G Z D B P C F J V))
(aa)(aa)  (aa)
TCH	 CH

(defvar small (list X \))
(small)A	
(small)I	
(small)U	
(small)E	
(small)O	
(small)YA	
(small)YU	
(small)YO	
(small)TU	
(small)TSU	
(small)WA	
(if katakana)(small)KA	
(if katakana)(small)KE	

XTI	Ƥ
XDI	Ǥ
XDU	ɤ
XDE	Ǥ
XDO	ɤ
XWI	
XWE	
XWO	

-	
,	
.	
;/	
X/	
[	
]	

\'\''	\
\';'	\
;\\	\

Z.	
Z-	


;(defvar escd (list - , . / ; : [ \ ] ^ ~))
(defvar escd  (list - , .   ; : [ \ ] ^ ~))
X(escd)	(escd)  

(defvar chouon (list ^ ~))
(last= A)(chouon)	
(last= I)(chouon)	
(last= U)(chouon)	
(last= E)(chouon)	
(last= O)(chouon)	

(defvar alpha (between A Z))
(alpha)	(error)
