fix a paradigm

This commit is contained in:
Krasimir Angelov
2018-07-27 11:56:18 +02:00
parent 0d7df4d576
commit e56ba66232
2 changed files with 10 additions and 5 deletions

View File

@@ -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+"î")

View File

@@ -1536,7 +1536,7 @@ oper
(v0+"ĺçĺő")
(v0+"˙çúë")
(v0+"ĺçĺë")
(v0+"-")
(v0+"-")
(v0+"čçŕů")
(v0+"ĺç")
(v0+"ĺçĺíĺ") ;