fix ia2e for monosillable verbs

This commit is contained in:
Krasimir Angelov
2023-10-10 15:49:43 +02:00
parent 9570ff202a
commit da608c2084

View File

@@ -477,7 +477,7 @@ resource ResBul = ParamX - [Tense,Pres,Past,Fut,Cond] ** open Prelude, Predef in
ia2e : Str -> Str = -- to be used when the next syllable has vowel different from "а","ъ","о" or "у" ia2e : Str -> Str = -- to be used when the next syllable has vowel different from "а","ъ","о" or "у"
\s -> case s of { \s -> case s of {
x + "я" + y@(["бвгджзклмнпрстфхцчш"]*) x@(?+_) + "я" + y@(["бвгджзклмнпрстфхцчш"]*)
=> x+"е"+y; => x+"е"+y;
_ => s _ => s
}; };