(Hun) Squeeze further down to 7 stems

This commit is contained in:
Inari Listenmaa
2020-04-23 16:14:31 +02:00
parent 3d25f3b48d
commit a52300205d
5 changed files with 107 additions and 94 deletions
+1 -1
View File
@@ -180,7 +180,7 @@ concrete NounHun of Noun = CatHun ** open ResHun, Prelude, Coordination in {
-- : AP -> CN -> CN
AdjCN ap cn = cn ** {
s = \\n,c => ap.s ! Sg ++ cn.s ! n ! c ;
s = \\nc => ap.s ! Sg ++ cn.s ! nc ;
compl = \\n,c => ap.compar ++ cn.compl ! n ! c ;
} ;