1
0
forked from GitHub/gf-rgl

remove spurious paradigms

This commit is contained in:
Krasimir Angelov
2024-10-31 19:26:56 +01:00
parent f8bb75a13c
commit e8bda853df
2 changed files with 0 additions and 136 deletions

View File

@@ -8046,72 +8046,6 @@ mkV043 base =
_ => error "Can't apply paradigm mkV043" _ => error "Can't apply paradigm mkV043"
} ; } ;
mkV044 : Str -> V ;
mkV044 base =
case base of {
"се "+base_1+"и" => lin V
{ present = table {
Sg => table {
P1 => "се "+base_1+"ам" ;
P2 => "се "+base_1+"иш" ;
P3 => "се "+base_1+"и"
} ;
Pl => table {
P1 => "се "+base_1+"име" ;
P2 => "се "+base_1+"ите" ;
P3 => "се "+base_1+"ат"
}
} ;
aorist = table {
Sg => table {
P1 => "се "+base_1+"ив" ;
P2 => "се "+base_1+"и" ;
P3 => "се "+base_1+"и"
} ;
Pl => table {
P1 => "се "+base_1+"ивме" ;
P2 => "се "+base_1+"ивте" ;
P3 => "се "+base_1+"ија"
}
} ;
imperfect = table {
Sg => table {
P1 => "се "+base_1+"ев" ;
P2 => "се "+base_1+"еше" ;
P3 => "се "+base_1+"еше"
} ;
Pl => table {
P1 => "се "+base_1+"евме" ;
P2 => "се "+base_1+"евте" ;
P3 => "се "+base_1+"еа"
}
} ;
Imperative = table {
Sg => base_1+"и се" ;
Pl => base_1+"ете се"
} ;
participle = { aorist = table {
GSg Masc => "се "+base_1+"ил" ;
GSg Fem => "се "+base_1+"ила" ;
GSg Neuter => "се "+base_1+"ило" ;
GPl => "се "+base_1+"иле"
} ;
imperfect = table {
GSg Masc => "се "+base_1+"ел" ;
GSg Fem => "се "+base_1+"ела" ;
GSg Neuter => "се "+base_1+"ело" ;
GPl => "се "+base_1+"еле"
} ;
perfect = nonExist ; --guessed
adjectival = base_1+"ен" ;
adverbial = base_1+"ејќи" --guessed
} ;
noun_from_verb = base_1+"ење" ; --guessed
isRefl = False
};
_ => error "Can't apply paradigm mkV044"
} ;
mkV045 : Str -> V ; mkV045 : Str -> V ;
mkV045 base = mkV045 base =
case base of { case base of {
@@ -8244,72 +8178,6 @@ mkV046 base =
_ => error "Can't apply paradigm mkV046" _ => error "Can't apply paradigm mkV046"
} ; } ;
mkV047 : Str -> V ;
mkV047 base =
case base of {
"се "+base_1 => lin V
{ present = table {
Sg => table {
P1 => "се "+base_1+"м" ;
P2 => "се "+base_1+"ш" ;
P3 => "се "+base_1
} ;
Pl => table {
P1 => "се "+base_1+"ме" ;
P2 => "се "+base_1+"те" ;
P3 => "се "+base_1+"ат"
}
} ;
aorist = table {
Sg => table {
P1 => base_1+"ев" ; --guessed
P2 => base_1+"е" ; --guessed
P3 => base_1+"е" --guessed
} ;
Pl => table {
P1 => base_1+"евме" ; --guessed
P2 => base_1+"евте" ; --guessed
P3 => base_1+"еа" --guessed
}
} ;
imperfect = table {
Sg => table {
P1 => "се "+base_1+"в" ;
P2 => "се "+base_1+"ше" ;
P3 => "се "+base_1+"ше"
} ;
Pl => table {
P1 => "се "+base_1+"вме" ;
P2 => "се "+base_1+"вте" ;
P3 => "се "+base_1+"а"
}
} ;
Imperative = table {
Sg => base_1+"ј се" ;
Pl => base_1+"јте се"
} ;
participle = { aorist = table {
GSg Masc => base_1+"л" ; --guessed
GSg Fem => base_1+"ла" ; --guessed
GSg Neuter => base_1+"ло" ; --guessed
GPl => base_1+"ле" --guessed
} ;
imperfect = table {
GSg Masc => "се "+base_1+"л" ;
GSg Fem => "се "+base_1+"ла" ;
GSg Neuter => "се "+base_1+"ло" ;
GPl => "се "+base_1+"ле"
} ;
perfect = nonExist ; --guessed
adjectival = base_1+"ен" ; --guessed
adverbial = base_1+"јќи се"
} ;
noun_from_verb = base_1+"ње" ;
isRefl = False
};
_ => error "Can't apply paradigm mkV047"
} ;
mkV048 : Str -> V ; mkV048 : Str -> V ;
mkV048 base = mkV048 base =
case base of { case base of {

View File

@@ -1016,9 +1016,7 @@ reg3V : Str -> Str -> Str -> V
<_ + "и", _ + "оа", _> => mkV002 form1; <_ + "и", _ + "оа", _> => mkV002 form1;
<_ + "и", _ + "еа", _> => mkV004 form1; <_ + "и", _ + "еа", _> => mkV004 form1;
<_ + "и", _ + "аа", _> => mkV030 form1; <_ + "и", _ + "аа", _> => mkV030 form1;
<_ + "а", _, _ + "е"> => mkV047 form1;
<_ + "и", _, _ + "и"> => mkV048 form1; <_ + "и", _, _ + "и"> => mkV048 form1;
<_ + "и", _, _ + "е"> => mkV044 form1;
<_ + "е", _, _ + "и"> => mkV028 form1; <_ + "е", _, _ + "и"> => mkV028 form1;
<_ + "а", _, _> => mkV001 form1; <_ + "а", _, _> => mkV001 form1;
<_ + "е", _, _> => mkV007 form1; <_ + "е", _, _> => mkV007 form1;
@@ -1145,9 +1143,7 @@ reg4V : Str -> Str -> Str -> Str -> V
<_ + "и", _ + "аа", _, _> => mkV030 form1; <_ + "и", _ + "аа", _, _> => mkV030 form1;
<_ + "и", _, _ + "и", _ + "в"> => mkV003 form1; <_ + "и", _, _ + "и", _ + "в"> => mkV003 form1;
<_ + "е", _, _ + "и", _ + "в"> => mkV007 form1; <_ + "е", _, _ + "и", _ + "в"> => mkV007 form1;
<_ + "а", _, _ + "е", _> => mkV047 form1;
<_ + "и", _, _ + "и", _> => mkV048 form1; <_ + "и", _, _ + "и", _> => mkV048 form1;
<_ + "и", _, _ + "е", _> => mkV044 form1;
<_ + "е", _, _ + "и", _> => mkV028 form1; <_ + "е", _, _ + "и", _> => mkV028 form1;
<_ + "а", _, _, _> => mkV001 form1; <_ + "а", _, _, _> => mkV001 form1;
<_ + "е", _, _, _> => mkV007 form1; <_ + "е", _, _, _> => mkV007 form1;