diff --git a/lib/resource-1.0/english/ExtraEng.gf b/lib/resource-1.0/english/ExtraEng.gf
index 7a4dd7968..6c0d6be6e 100644
--- a/lib/resource-1.0/english/ExtraEng.gf
+++ b/lib/resource-1.0/english/ExtraEng.gf
@@ -23,9 +23,6 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
     VPI   = {s : VPIForm => Agr => Str} ;
     [VPI] = {s1,s2 : VPIForm => Agr => Str} ;
 
-  param
-    VPIForm = VPIInf | VPIPPart ;
-
   lin
     BaseVPI = twoTable2 VPIForm Agr ;
     ConsVPI = consrTable2 VPIForm Agr comma ;
diff --git a/lib/resource-1.0/english/ResEng.gf b/lib/resource-1.0/english/ResEng.gf
index c7dc27391..e27ae5095 100644
--- a/lib/resource-1.0/english/ResEng.gf
+++ b/lib/resource-1.0/english/ResEng.gf
@@ -424,4 +424,10 @@ resource ResEng = ParamX ** open Prelude in {
               }
       } ;
 
+-- for VP conjunction
+
+  param
+    VPIForm = VPIInf | VPIPPart ;
+
+
 }
diff --git a/lib/resource-1.0/scandinavian/ExtraScand.gf b/lib/resource-1.0/scandinavian/ExtraScand.gf
index 56a6f3cfc..e60cc0105 100644
--- a/lib/resource-1.0/scandinavian/ExtraScand.gf
+++ b/lib/resource-1.0/scandinavian/ExtraScand.gf
@@ -34,9 +34,6 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
     VPI   = {s : VPIForm => Agr => Str} ;
     [VPI] = {s1,s2 : VPIForm => Agr => Str} ;
 
-  param
-    VPIForm = VPIInf | VPISup ; ---- sup not yet used
-
   lin
     BaseVPI = twoTable2 VPIForm Agr ;
     ConsVPI = consrTable2 VPIForm Agr comma ;
diff --git a/lib/resource-1.0/scandinavian/ResScand.gf b/lib/resource-1.0/scandinavian/ResScand.gf
index e32933d08..bcd1c7497 100644
--- a/lib/resource-1.0/scandinavian/ResScand.gf
+++ b/lib/resource-1.0/scandinavian/ResScand.gf
@@ -67,4 +67,9 @@ interface ResScand = DiffScand ** open CommonScand, Prelude in {
     en2,ea2,eext : Bool = False   -- indicate if the field exists
     } ;
 
+-- needed for VP conjunction
+  param
+    VPIForm = VPIInf | VPISup ; ---- sup not yet used
+
+
 }