relatives (but expensive)

This commit is contained in:
aarne
2005-09-02 20:40:18 +00:00
parent e191e0513e
commit d268ebf84b
7 changed files with 75 additions and 77 deletions

View File

@@ -53,7 +53,6 @@ concrete ClauseEng of Clause = CategoriesEng **
QPredProgVP np vp = predBeGroupQ np (vp.s ! VIPresPart) ;
RPredV np v = relVerbClause np v (complVerb v) ;
RPredPassV np v = predBeGroupR np (passVerb v) ;
RPredV2 np v x = relVerbClause np v (complTransVerb v x) ;