forked from GitHub/gf-rgl
fix a paradigm
This commit is contained in:
@@ -120,8 +120,8 @@ oper
|
||||
VAorist Pl P3 => chetoh + "à";
|
||||
VImperfect Sg P1 => chetqh;
|
||||
VImperfect Sg _ => case chete of {
|
||||
rabot + "è" => rabot + "eøå";
|
||||
_ => chete + "øå"
|
||||
rabot + "è" => rabot + "eøå";
|
||||
_ => chete + "øå"
|
||||
};
|
||||
VImperfect Pl P1 => chetqh + "ìå";
|
||||
VImperfect Pl P2 => chetqh + "òå";
|
||||
@@ -130,10 +130,15 @@ oper
|
||||
case chel of {
|
||||
pas+"úë" => pas+"ë";
|
||||
_ => chel
|
||||
} ;
|
||||
chel2 : Str =
|
||||
case chel of {
|
||||
w+"ëÿçúë" => w+"ëåçë";
|
||||
_ => chel
|
||||
}
|
||||
in (mkAdjective chel
|
||||
(chel+"èÿ")
|
||||
(chel+"èÿò")
|
||||
(chel2+"èÿ")
|
||||
(chel2+"èÿò")
|
||||
(chel1+"a")
|
||||
(chel1+"àòà")
|
||||
(chel1+"î")
|
||||
|
||||
@@ -1536,7 +1536,7 @@ oper
|
||||
(v0+"ĺçĺő")
|
||||
(v0+"˙çúë")
|
||||
(v0+"ĺçĺë")
|
||||
(v0+"-")
|
||||
(v0+"-")
|
||||
(v0+"čçŕů")
|
||||
(v0+"ĺç")
|
||||
(v0+"ĺçĺíĺ") ;
|
||||
|
||||
Reference in New Issue
Block a user