diff --git a/lib/src/german/AdjectiveGer.gf b/lib/src/german/AdjectiveGer.gf index ac0ced3f5..8f36afd8e 100644 --- a/lib/src/german/AdjectiveGer.gf +++ b/lib/src/german/AdjectiveGer.gf @@ -28,7 +28,10 @@ concrete AdjectiveGer of Adjective = CatGer ** open ResGer, Prelude in { -- $SuperlA$ belongs to determiner syntax in $Noun$. ComplA2 a np = { - s = \\af => a.s ! Posit ! af ++ appPrep a.c2 np.s ; + s = table { + APred => a.s ! Posit ! APred ++ appPrep a.c2 np.s ; + af => appPrep a.c2 np.s ++ a.s ! Posit ! af + } ; isPre = True } ; diff --git a/lib/src/german/SentenceGer.gf b/lib/src/german/SentenceGer.gf index 2cfc0343d..935ba416a 100644 --- a/lib/src/german/SentenceGer.gf +++ b/lib/src/german/SentenceGer.gf @@ -20,7 +20,7 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer, Prelude in { inf = vp.inf ++ verb.inf ; in verb.fin ++ ps.p2 ++ - vp.n2 ! agr ++ vp.a1 ! pol ++ vp.a2 ++ inf ++ vp.ext + vp.n0 ! agr ++ vp.n2 ! agr ++ vp.a1 ! pol ++ vp.a2 ++ inf ++ vp.ext } ; SlashVP np vp =