forked from GitHub/gf-rgl
added CompoundN
This commit is contained in:
@@ -6,7 +6,8 @@ concrete ExtendDut of Extend =
|
|||||||
VPS,
|
VPS,
|
||||||
BaseVPS, ConsVPS,
|
BaseVPS, ConsVPS,
|
||||||
MkVPS, ConjVPS, PredVPS,
|
MkVPS, ConjVPS, PredVPS,
|
||||||
PassVPSlash, PassAgentVPSlash
|
PassVPSlash, PassAgentVPSlash,
|
||||||
|
CompoundN
|
||||||
]
|
]
|
||||||
with
|
with
|
||||||
(Grammar = GrammarDut) **
|
(Grammar = GrammarDut) **
|
||||||
@@ -121,4 +122,9 @@ lin
|
|||||||
isPron = False
|
isPron = False
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
lin CompoundN n1 n2 = {
|
||||||
|
s = \\n => n1.s ! NF Sg Nom ++ BIND ++ n2.s ! n ;
|
||||||
|
g = n2.g
|
||||||
|
} ;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user