GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-07-01 11:38:34 -06:00
Code Issues Packages Projects Releases Wiki Activity

new gender

Browse Source
This commit is contained in:
benson kituku
2018-11-28 18:54:17 +03:00
parent 4859ff2be8
commit 342ddf6f4b
6 changed files with 16 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/bantu/NounBantu.gf
+6 -7
View File
@@ -23,8 +23,7 @@ lin
n=agr.n; g=agr.g
in {s = table {
NCase c => pron.s!Pers ;
NPAcc => pron.s!Pers ;
NPNomPoss => pron.s!Poss n g };
NPoss => pron.s!Poss n g };
a = Ag agr.g agr.n agr.p;
} ;
-- Predet -> NP -> NP
@@ -141,11 +140,11 @@ lin
-- PossNP : CN -> NP -> CN
-- e.g. 'house of Paris', 'house of mine'
PossNP cn np =let agr = detAgr np.a in
{s = \\n,c => cn.s ! n ! Nom ++ possess_Prep.s! n!cn.g ++ np.s ! NPNomPoss;
{s = \\n,c => cn.s ! n ! Nom ++ possess_Prep.s! n!cn.g ++ np.s ! NPoss;
s2 =\\n => []; g = cn.g} ;
-- PartNP : CN -> NP -> CN
-- e.g. 'glass of wine'
PartNP cn np = {s = \\n,c => cn.s ! n ! Nom ++ part_Prep.s! n!cn.g ++ np.s ! NPAcc ; s2 =\\n => []; g = cn.g} ;
PartNP cn np = {s = \\n,c => cn.s ! n ! Nom ++ part_Prep.s! n!cn.g ++ np.s ! NCase Nom ; s2 =\\n => []; g = cn.g} ;
-- CountNP : Det -> NP -> NP
-- e.g. 'three of them', 'some of the boys'
@@ -162,8 +161,8 @@ lin
DetDAP d = { s=d.s; n=d.n };
ApposCN cn np = let agr = complAgr np.a in
{s = \\n,c => np.s ! NCase Nom --++ possess_Prep.s!n!agr.g
++ cn.s !n ! Nom ; s2 =\\n => ""; g = cn.g} ;
-- ApposCN cn np = let agr = complAgr np.a in
-- {s = \\n,c => np.s ! NCase Nom --++ possess_Prep.s!n!agr.g
-- ++ cn.s !n ! Nom ; s2 =\\n => ""; g = cn.g} ;
}