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

(May) add coordination AP, NP and CN

Browse Source
This commit is contained in:
Inari Listenmaa
2023-02-24 12:49:38 +08:00
parent 1ad71e10b1
commit b4a2f686bb
2 changed files with 18 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/malay/ConjunctionMay.gf
View File

@@ -6,14 +6,31 @@ concrete ConjunctionMay of Conjunction =
lincat
[Adv],[AdV] = {s1,s2 : Str} ;
[S] = {s1,s2 : Str} ;
[AP] = {s1,s2 : Str} ;
[NP] = {s1,s2 : Possession => Str} ;
[CN] = {s1,s2 : NForm => Str ; heavyMod : Str} ;
lin
BaseAdv, BaseAdV = twoSS ;
ConsAdv, ConsAdV = consrSS comma ;
ConjAdv, ConjAdV = conjunctDistrSS ;
BaseS = twoSS ;
ConsS = consrSS comma ;
ConjS = conjunctDistrSS ;
BaseAP = twoSS ;
ConsAP = consrSS comma ;
ConjAP = conjunctDistrSS ;
BaseNP = twoTable Possession ;
ConsNP = consrTable Possession comma ;
ConjNP co nps = emptyNP ** conjunctDistrTable Possession co nps ;
BaseCN x y = y ** twoTable NForm (mergeCN x) y ;
ConsCN x xs = xs ** consrTable NForm comma (mergeCN x) xs ;
ConjCN conj ss = ss ** conjunctDistrTable NForm conj ss ;
oper
mergeCN : CNoun -> CNoun = \cn -> cn ** {s = \\nf => linCN cn} ; -- put postmod in s field
}