diff --git a/resource-1.0/english/ExtraEng.gf b/resource-1.0/english/ExtraEng.gf
index 7a4dd796..6c0d6be6 100644
--- a/resource-1.0/english/ExtraEng.gf
+++ b/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/resource-1.0/english/ResEng.gf b/resource-1.0/english/ResEng.gf
index c7dc2739..e27ae509 100644
--- a/resource-1.0/english/ResEng.gf
+++ b/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/resource-1.0/scandinavian/ExtraScand.gf b/resource-1.0/scandinavian/ExtraScand.gf
index 56a6f3cf..e60cc010 100644
--- a/resource-1.0/scandinavian/ExtraScand.gf
+++ b/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/resource-1.0/scandinavian/ResScand.gf b/resource-1.0/scandinavian/ResScand.gf
index e32933d0..bcd1c749 100644
--- a/resource-1.0/scandinavian/ResScand.gf
+++ b/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
+
+
 }