1
0
forked from GitHub/gf-rgl

added functions to Ron and Chi needed for YAQL

This commit is contained in:
aarne
2012-12-09 19:01:19 +00:00
parent 57cf636393
commit 993822b84c
3 changed files with 9 additions and 5 deletions

View File

@@ -32,6 +32,7 @@ concrete VerbChi of Verb = CatChi ** open ResChi, Prelude in {
} ;
UseComp comp = comp ;
UseCopula = predV copula ;
SlashVV v vp = ---- too simple?
insertObj (mkNP (infVP vp)) (predV v) ** {c2 = vp.c2 ; isPre = vp.isPre} ;
@@ -59,5 +60,7 @@ concrete VerbChi of Verb = CatChi ** open ResChi, Prelude in {
CompAdv adv = insertObj adv (predV zai_V) ;
VPSlashPrep vp prep = vp ** {c2 = prep ; isPre = True} ;
}