diff --git a/lib/src/german/IdiomGer.gf b/lib/src/german/IdiomGer.gf index fdca7bc27..aa9845113 100644 --- a/lib/src/german/IdiomGer.gf +++ b/lib/src/german/IdiomGer.gf @@ -33,6 +33,23 @@ concrete IdiomGer of Idiom = CatGer ** } } ; + ExistNPAdv np adv= + mkClause "es" (agrP3 Sg) + (insertAdv adv.s (insertObj (\\_ => appPrep geben.c2 np.s) + (predV geben))) ; + + ExistIPAdv ip adv = { + s = \\m,t,a,p => + let + cls = + (mkClause "es" (agrP3 Sg) (insertAdv adv.s (predV geben))).s ! m ! t ! a ! p ; + who = ip.s ! Acc + in table { + QDir => who ++ cls ! Inv ; + QIndir => who ++ cls ! Sub + } + } ; + ProgrVP = insertAdv "eben" ; ---- ImpPl1 vp = {s = diff --git a/lib/src/german/StructuralGer.gf b/lib/src/german/StructuralGer.gf index ffaf1f12b..cf74f3d75 100644 --- a/lib/src/german/StructuralGer.gf +++ b/lib/src/german/StructuralGer.gf @@ -44,7 +44,7 @@ concrete StructuralGer of Structural = CatGer ** here_Adv = ss "hier" ; how_IAdv = ss "wie" ; how8much_IAdv = ss "wieviel" ; - how8many_IDet = {s = \\g,c => (detLikeAdj False Pl "wieviel").s ! g ! NPC c ; n = Pl} ; + how8many_IDet = {s = \\g,c => (detLikeAdj False Pl "wie viel").s ! g ! NPC c ; n = Pl} ; if_Subj = ss "wenn" ; in8front_Prep = mkPrep "vor" P.dative ; i_Pron = mkPronPers "ich" "mich" "mir" "meiner" "mein" Masc Sg P1 ;