restoring the discontinuous Ger NP parts in some linearizations

This commit is contained in:
aarne
2015-07-27 09:14:10 +00:00
parent 80800e3bfd
commit 8bbb2a1277
6 changed files with 10 additions and 11 deletions

View File

@@ -50,7 +50,8 @@ concrete QuestionGer of Question = CatGer ** open ResGer in {
s = \\m,t,a,p =>
let
vp = predV sein_V ** {ext = icomp.ext};
cls = (mkClause (np.s ! NPC Nom) np.a vp).s ! m ! t ! a ! p ;
subj = mkSubj np vp.subjc ;
cls = (mkClause subj.p1 subj.p2 vp).s ! m ! t ! a ! p ;
why = icomp.s ! np.a
in table {
QDir => why ++ cls ! Inv ;