refactoring German VP

This commit is contained in:
aarne
2012-09-23 07:46:43 +00:00
parent 539856de26
commit c8ac4a9551
7 changed files with 32 additions and 33 deletions

View File

@@ -84,8 +84,8 @@ concrete ExtraGer of ExtraGerAbs = CatGer **
subj = [] ;
verb = vps.s ! ord ! agr ! VPFinite m t a ;
neg = vp.a1 ! b ;
obj0 = vp.n0 ! agr ;
obj = vp.n2 ! agr ;
obj0 = (vp.nn ! agr).p1 ;
obj = (vp.nn ! agr).p2 ;
compl = obj0 ++ neg ++ obj ++ vp.a2 ; -- from EG 15/5
inf = vp.inf ++ verb.inf ;
extra = vp.ext ;