fix ReflRNP for V2A verbs

This commit is contained in:
krangelov
2021-03-19 20:39:44 +01:00
parent 4e39ada69b
commit de405c7929
2 changed files with 4 additions and 5 deletions

View File

@@ -331,7 +331,7 @@ lin BaseImp = twoTable2 CPolarity ImpForm ;
RNPList = {s1,s2 : Agr => Str} ;
lin
ReflRNP vps rnp = insertObj (\\a => vps.c2 ++ rnp.s ! a) vps ;
ReflRNP vps rnp = insertObjPre (\\a => vps.c2 ++ rnp.s ! a) vps ;
ReflPron = {s = reflPron} ;
ReflPoss num cn = {s = \\a => possPron ! a ++ num.s ! True ! Nom ++ cn.s ! num.n ! Nom} ;
PredetRNP predet rnp = {s = \\a => predet.s ++ rnp.s ! a} ;

View File

@@ -199,10 +199,9 @@ lin BaseImp = twoTable2 Polarity Number ;
lin
ReflRNP vps rnp =
insertObjPron
(andB (notB vps.c2.hasPrep) rnp.isPron)
rnp.s
(insertObj (\\a => vps.c2.s ++ vps.n3 ! a) vps) ;
insertObjPost (\\a => vps.n3 ! a)
(insertObjPron (andB rnp.isPron (notB vps.c2.hasPrep)) (\\a => vps.c2.s ++ rnp.s ! a)
vps) ;
ReflPron = {s = \\a => reflPron a ; isPron = True} ; ---- agr ??
ReflPoss num cn = {