diff --git a/lib/resource-1.0/german/ResGer.gf b/lib/resource-1.0/german/ResGer.gf
index f52e7803a..86b977c90 100644
--- a/lib/resource-1.0/german/ResGer.gf
+++ b/lib/resource-1.0/german/ResGer.gf
@@ -373,8 +373,8 @@ resource ResGer = ParamGer ** open Prelude in {
         let
           verb  = vp.s  ! agr ! VPFinite t a ;
           neg   = vp.a1 ! b ;
-          obj   = vp.n2 ! agr ++ vp.a2 ;
-          compl = obj ++ neg ;
+          obj   = vp.n2 ! agr ;
+          compl = obj ++ neg ++ vp.a2 ;
           inf   = vp.inf ++ verb.inf ;
           extra = vp.ext ;
           inffin = case <a,vp.isAux> of {
diff --git a/lib/resource-1.0/german/VerbGer.gf b/lib/resource-1.0/german/VerbGer.gf
index 836627754..f94fdcbb8 100644
--- a/lib/resource-1.0/german/VerbGer.gf
+++ b/lib/resource-1.0/german/VerbGer.gf
@@ -30,7 +30,8 @@ concrete VerbGer of Verb = CatGer ** open Prelude, ResGer in {
     ComplV2A v np ap = 
       insertObj (\\_ => appPrep v.c2 np.s ++ ap.s ! APred) (predV v) ;
 
-    UseComp comp = insertObj comp.s (predV sein_V) ;
+    UseComp comp = insertAdv (comp.s ! agrP3 Sg) (predV sein_V) ; -- agr not used
+    -- we want to say "ich liebe sie nicht" but not "ich bin alt nicht"
 
     CompAP ap = {s = \\_ => ap.s ! APred} ;
     CompNP np = {s = \\_ => np.s ! Nom} ;
diff --git a/lib/resource-1.0/german/log.txt b/lib/resource-1.0/german/log.txt
index a9caae84f..4097c6502 100644
--- a/lib/resource-1.0/german/log.txt
+++ b/lib/resource-1.0/german/log.txt
@@ -265,3 +265,8 @@ Work: ca 27h for whole German (but with support in 0.6 esp. morphology, Swedish)
 Fixed double infinitives with a new field (isAux : Bool) in VP. Used in
 mkClause.
 
+31/1
+
+Fine-tuned the place of negation by changing in ResGerman.mkClause and 
+VerbGerman.UseCompl. Want to say "ich bin nicht alt" and "ich liebe sie nicht".
+