clause working with vp

This commit is contained in:
aarne
2005-02-04 20:07:45 +00:00
parent 0796338380
commit 977a7b6865
14 changed files with 60 additions and 25 deletions

View File

@@ -28,6 +28,8 @@ incomplete concrete ClauseScand of Clause = CategoriesScand **
SPredAV np v x = predVerbGroupClause np (complVerbAdj v x) ;
SPredObjA2V np v x y = predVerbGroupClause np (complVerbAdj2 True v x y) ;
SPredProgVP = progressiveClause ;
QPredV np v = intVerbPhrase np (predVerb v) ;
QPredPassV np v = intVerbPhrase np (passVerb v) ;