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

modified Noun to accommodate for IDetCN in Question

Browse Source
This commit is contained in:
David Bamutura
2019-05-14 03:53:11 +02:00
parent 1dbd1b535f
commit 38b29c7071
5 changed files with 83 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/rukiga/NounCgg.gf
+7 -7
View File
@@ -16,7 +16,7 @@ lin
};
--UsePron pron = pron; -- the result of use pron is a NounPhrase
--MassNP : CN -> NP ; -- (beer)
MassNP cn = {s = \\_ =>cn.s ! Complete ! Pl; agr = AgP3 Pl cn.gender}; --: CN -> NP ; -- milk
MassNP cn = {s = \\_ =>cn.s ! Pl ! Complete; agr = AgP3 Pl cn.gender}; --: CN -> NP ; -- milk
--DetCN det cn = mkDeterminer det cn; --Should be nemed mkDetCN
DetCN det cn = mkDetCN det cn; -- the man
{-
@@ -32,28 +32,28 @@ lin
AdjCN ap cn =
case <ap.position1, ap.isProper, > of {
<Pre, True> => {
s = \\ ns, num =>ap.s ++ cn.s ! ns ! num ;
s = \\ num, ns =>ap.s ++ cn.s ! num ! ns ;
gender = cn.gender
};
<Post, False> => case ap.isPrep of {
False => {
s = \\ ns, num => cn.s ! ns ! num ++ mkAdjPronIVClitic (AgP3 num cn.gender)
s = \\ num, ns => cn.s ! num ! ns ++ mkAdjPronIVClitic (AgP3 num cn.gender)
++ ap.s;
gender = cn.gender
};
True => {
s = \\ ns, num => (cn.s ! ns ! num) ++
s = \\ num, ns => (cn.s ! num ! ns) ++
mkGenPrepNoIVClitic (AgP3 num cn.gender) ++ ap.s ;
gender = cn.gender
}
};
<Pre, False> => {
s = \\ ns, num => mkAdjPronIVClitic (AgP3 num cn.gender)
++ ap.s ++ (cn.s ! ns ! num) ;
s = \\ num, ns => mkAdjPronIVClitic (AgP3 num cn.gender)
++ ap.s ++ (cn.s ! num ! ns) ;
gender = cn.gender
};
<Post, True> => {
s = \\ ns, num => (cn.s ! ns ! num) ++ ap.s ;
s = \\ num, ns => (cn.s ! num ! ns) ++ ap.s ;
gender = cn.gender
}