msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(zul) change to Quant lincat

Browse Source
This commit is contained in:
Laurette Marais
2022-05-27 09:33:05 +02:00
parent 6421fb7ee9
commit 8073d2a91b
4 changed files with 28 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/zulu/NounExtZul.gf
+5 -5
View File
@@ -19,15 +19,15 @@ concrete NounExtZul of NounExt = CatZul,CatExtZul ** open ResZul, Prelude, Param
} ;
DemPostdet q = {
s = \\a => dem_pron!q.dist!a ++ dem_pron_na!q.dist!a ++ q.s
s = \\a => q.s!True!a
} ;
QuantDemPostdet q d = {
s = \\a => q.s!a ++ dem_pron!d.dist!a ++ dem_pron_na!d.dist!a ++ d.s
s = \\a => q.s!a ++ d.s!True!a
} ;
DemQuantPostdet d q = {
s = \\a => dem_pron!d.dist!a ++ dem_pron_na!d.dist!a ++ q.s!a ++ d.s
s = \\a => d.s!True!a ++ q.s!a
} ;
DetNum n = n ; -- ** { spec = Spec } ;
@@ -93,12 +93,12 @@ concrete NounExtZul of NounExt = CatZul,CatExtZul ** open ResZul, Prelude, Param
} ;
DemPredet q = {
s = \\a => dem_pron!q.dist!a ++ q.s ;
s = \\a => q.s!False!a ;
hasDem = True
} ;
QuantDemPredet q d = {
s = \\a => q.s!a ++ dem_pron!d.dist!a ++ d.s ;
s = \\a => q.s!a ++ d.s!False!a ;
hasDem = True
} ;