added functions to Ron and Chi needed for YAQL

This commit is contained in:
aarne
2012-12-09 19:01:19 +00:00
parent 2e4116c8ed
commit 309c6358f5
4 changed files with 24 additions and 5 deletions

View File

@@ -166,6 +166,7 @@ concrete VerbRon of Verb =
UseComp comp = insertSimpObj comp.s copula ;
UseCopula = copula ;
CompAP ap = {s = \\ag => ap.s ! AF ag.g ag.n Indef ANomAcc} ;
CompCN cn = { s = \\ag => cn.s ! ag.n ! Indef ! ANomAcc }; --- RE 7/12/2010
@@ -178,7 +179,7 @@ concrete VerbRon of Verb =
PassV2 v = insertSimpObj (\\a => v.s ! PPasse a.g a.n Indef ANomAcc) auxPassive ** {lock_VP = <>};
VPSlashPrep vp prep = vp ** {c2 = prep ; needAgr = False; needClit = True} ; ---- AR
oper auxPassive = copula ;