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

(zul) dem na in postdet

Browse Source
This commit is contained in:
Laurette Marais
2022-05-19 14:40:41 +02:00
parent 149407d19b
commit 6421fb7ee9
2 changed files with 43 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/zulu/NounExtZul.gf
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 ++ q.s
s = \\a => dem_pron!q.dist!a ++ dem_pron_na!q.dist!a ++ q.s
} ;
QuantDemPostdet q d = {
s = \\a => q.s!a ++ dem_pron!d.dist!a ++ d.s
s = \\a => q.s!a ++ dem_pron!d.dist!a ++ dem_pron_na!d.dist!a ++ d.s
} ;
DemQuantPostdet d q = {
s = \\a => dem_pron!d.dist!a ++ q.s!a ++ d.s
s = \\a => dem_pron!d.dist!a ++ dem_pron_na!d.dist!a ++ q.s!a ++ d.s
} ;
DetNum n = n ; -- ** { spec = Spec } ;

40
src/zulu/ResZul.gf
View File

@@ -216,6 +216,44 @@ resource ResZul = open Prelude,Predef,ParamX in {
}
} ;
dem_pron_na : Distance => Agr => Str = table {
Dem1 => table {
First Sg => BIND++"na" ;
First Pl => [] ;
Second Sg => BIND++"na" ;
Second Pl => [] ;
Third C1_2 Sg => BIND++"na" ;
Third C1_2 Pl => [] ;
Third C1a_2a Sg => BIND++"na" ;
Third C1a_2a Pl => [] ;
Third C3_4 Sg => BIND++"na" ;
Third C3_4 Pl => BIND++"na" ;
Third C5_6 Sg => [] ;
Third C5_6 Pl => BIND++"na" ;
Third C7_8 Sg => [] ;
Third C7_8 Pl => [] ;
Third C9_10 Sg => BIND++"na" ;
Third C9_10 Pl => [] ;
Third C11_10 Sg => [] ;
Third C11_10 Pl => [] ;
Third C9_6 Sg => BIND++"na" ;
Third C9_6 Pl => BIND++"na" ;
Third C14 _ => [] ;
Third C15 _ => [] ;
Third C17 _ => []
} ;
Dem2 => table {
First _ => [] ;
Second _ => [] ;
Third _ _ => []
} ;
Dem3 => table {
First _ => [] ;
Second _ => [] ;
Third _ _ => []
}
} ;
-----------
-- VERBS --
-----------
@@ -1618,6 +1656,8 @@ resource ResZul = open Prelude,Predef,ParamX in {
Second Pl => "no"
} ;
-----------------
-- COPULATIVES --
-----------------