GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-02 15:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

DAP, Det with AP and its conjunction, in Eng and Scand ; not quite sure if this is possible in all languages

Browse Source
This commit is contained in:
aarne
2014-06-12 13:55:39 +00:00
parent 20f8f16201
commit 7265c2f07d
11 changed files with 44 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lib/src/scandinavian/ConjunctionScand.gf
View File

@@ -26,6 +26,12 @@ incomplete concrete ConjunctionScand of Conjunction =
ConjCN co ns = conjunctDistrTable3 Number DetSpecies Case co ns **
{g = neutrum ; isMod = False} ; ----
ConjDet conj ss = let css = (conjunctDistrTable2 Bool NGender conj ss).s in {
s,sp = css ;
n = ss.n ;
det = ss.det ;
} ;
-- These fun's are generated from the list cat's.
@@ -50,6 +56,9 @@ incomplete concrete ConjunctionScand of Conjunction =
BaseCN = twoTable3 Number DetSpecies Case ;
ConsCN = consrTable3 Number DetSpecies Case comma ;
BaseDAP x y = twoTable2 Bool NGender x y ** {n = y.n ; det = y.det} ;
ConsDAP x xs = consrTable2 Bool NGender comma x xs ** {n = xs.n ; det = xs.det} ;
lincat
[S] = {s1,s2 : Order => Str} ;
[Adv] = {s1,s2 : Str} ;
@@ -58,5 +67,7 @@ incomplete concrete ConjunctionScand of Conjunction =
[AP] = {s1,s2 : AFormPos => Str ; isPre : Bool} ;
[RS] = {s1,s2 : Agr => RCase => Str ; c : NPForm} ;
[CN] = {s1,s2 : Number => DetSpecies => Case => Str} ; --- g : NGender ; isMod : Bool} ;
[DAP] = {s1,s2 : Bool => NGender => Str ; n : Number ; det : DetSpecies} ;
}