forked from GitHub/gf-core
31 lines
776 B
Plaintext
31 lines
776 B
Plaintext
--1 More syntax rules
|
|
|
|
-- This module defines syntax rules that are not implemented in all
|
|
-- languages, but in more than one, so that it makes sense to offer a
|
|
-- common API.
|
|
|
|
abstract Extra = Cat ** {
|
|
|
|
fun
|
|
GenNP : NP -> Quant ; -- this man's
|
|
ComplBareVS : VS -> S -> VP ; -- know you go
|
|
|
|
StrandRelSlash : RP -> Slash -> RCl ; -- that he lives in
|
|
EmptyRelSlash : RP -> Slash -> RCl ; -- he lives in
|
|
StrandQuestSlash : IP -> Slash -> QCl ; -- whom does John live with
|
|
|
|
-- $VP$ conjunction, which has different fragments implemented in
|
|
-- different languages - never a full $VP$, though.
|
|
|
|
cat
|
|
VPI ;
|
|
[VPI] {2} ;
|
|
|
|
fun
|
|
MkVPI : VP -> VPI ;
|
|
ConjVPI : Conj -> [VPI] -> VPI ;
|
|
ComplVPIVV : VV -> VPI -> VP ;
|
|
|
|
|
|
}
|