This commit is contained in:
aarne
2005-09-02 13:13:17 +00:00
parent 21a2a81a27
commit 1cce995197
3 changed files with 119 additions and 2 deletions

View File

@@ -38,12 +38,14 @@ concrete PredicEng of Predic = CategoriesEng **
cprep1 verb.c (compl.s1 ! a) ++
cprep2 verb.c (compl.s2 ! a)
) ;
{- takes 80% !
RPredVerb vt np verb compl =
relVerbClause np verb
(\\a => vt.s ++
cprep1 verb.c (compl.s1 ! a) ++
cprep2 verb.c (compl.s2 ! a)
) ;
-}
IPredVerb vt verb compl =
predVerbI verb
(\\a => vt.s ++