Fixes and lexicon additions

This commit is contained in:
Roman Suzi
2020-08-16 17:31:42 +03:00
parent 5132f66809
commit 36b0fb1e69
10 changed files with 889 additions and 11 deletions

View File

@@ -8,10 +8,12 @@ oper
what_pl = doChPron "ч" (Ag GPl P3) Inanimate ;
something = pronFormsPronoun ((appendToIP what_sg (BIND ++ "-то")) ** {nPrefix=False}) ;
nothing = pronFormsPronoun ((doChPron "нич" (Ag (GSg Neut) P3) Inanimate) ** {nPrefix=False}) ;
nechto = pronFormsPronoun ((doChPron "неч" (Ag (GSg Neut) P3) Inanimate) ** {nPrefix=False}) ;
who_sg = doKPron "к" (Ag (GSg Masc) P3) Animate ;
who_pl = doKPron "к" (Ag GPl P3) Animate ;
somebody = pronFormsPronoun ((appendToIP who_sg (BIND ++ "-то")) ** {nPrefix=False}) ;
nobody = pronFormsPronoun ((doKPron "ник" (Ag (GSg Masc) P3) Animate) ** {nPrefix=False}) ;
anybody = pronFormsPronoun ((doKPron "нек" (Ag (GSg Masc) P3) Animate) ** {nPrefix=False}) ;
such = adjFormsAdjective (makeAdjectiveForms "такой" "" "3b" PreferFull) ;
-- Situations, when prepositions are modified (approximate, full rules may be much more complex)