mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-20 18:29:33 -06:00
24 lines
612 B
Plaintext
24 lines
612 B
Plaintext
incomplete concrete ClauseI of Clause = Cat ** open Grammar in {
|
|
|
|
lin
|
|
PredV np v = PredVP np (UseV v) ;
|
|
PredV2 s v o = PredVP s (ComplSlash (SlashV2a v) o) ;
|
|
PredAP s a = PredVP s (UseComp (CompAP a)) ;
|
|
PredAdv s a = PredVP s (UseComp (CompAdv a)) ;
|
|
PredNP s n = PredVP s (UseComp (CompNP n)) ;
|
|
|
|
UseCl = Grammar.UseCl ;
|
|
|
|
QuestV np v = QuestVP np (UseV v) ;
|
|
QuestV2 s v o = QuestVP s (ComplSlash (SlashV2a v) o) ;
|
|
-- QuestV2Slash ip s v = QuestSlash ip (SlashVP s (SlashV2a v)) ;
|
|
|
|
UseQCl = Grammar.UseQCl ;
|
|
|
|
ImpV v = ImpVP (UseV v) ;
|
|
-- ImpV2 v o = ImpVP (ComplSlash (SlashV2a v) o) ;
|
|
|
|
|
|
|
|
}
|