(Hun) Add proper inflection tables in NP, stems only up to CN

This commit is contained in:
Inari Listenmaa
2020-04-25 14:03:10 +02:00
parent 234f74b6b0
commit 44603f7db7
7 changed files with 58 additions and 50 deletions
+4 -4
View File
@@ -35,12 +35,12 @@ lin
-- Noun phrases
lincat
[NP] = ResHun.BaseNP ** {s1,s2 : Case => Str} ;
[NP] = ResHun.BaseNP ** {s1,s2 : Possessor => Case => Str} ;
lin
BaseNP x y = twoTable Case x y ** y ;
ConsNP x xs = xs ** consrTable Case comma x xs ;
ConjNP co xs = conjunctDistrTable Case co xs ** xs ** {
BaseNP x y = twoTable2 Possessor Case x y ** y ;
ConsNP x xs = xs ** consrTable2 Possessor Case comma x xs ;
ConjNP co xs = conjunctDistrTable2 Possessor Case co xs ** xs ** {
agr = <P3, case xs.agr.p2 of {
Pl => Pl ;
_ => co.n }>