enabled emptyRP in Scandinavian by distinguishing between RNom and RAcc ; this also made it possible to use der as the Danish RNom form

lib/src/scandinavian/CommonScand.gf

@@ -75,7 +75,7 @@ param
 
   NPForm = NPNom | NPAcc | NPPoss GenNum Case ;
 
-  RCase = RNom | RGen | RPrep Bool ;
+  RCase = RNom | RAcc | RGen | RPrep Bool ;
 
   RAgr = RNoAg | RAg Gender Number Person ;
 

lib/src/scandinavian/ExtraScand.gf

@@ -16,6 +16,14 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand **
       }
     } ;
 
+    emptyRP = {
+      s = \\g,n => table {
+         RAcc => [] ;
+	 c => relPron ! g ! n ! c
+         } ;
+      a = RNoAg
+      } ;
+
     PiedPipingRelSlash rp slash = {
       s = \\t,a,p,ag,_ => 
         let 

lib/src/scandinavian/ExtraScandAbs.gf

@@ -1,5 +1,7 @@
 abstract ExtraScandAbs = Extra ** {
  
- fun                  --# notpresent
+ fun
  TFutKommer : Tense ; --# notpresent
+ emptyRP : RP ; -- empty RP in Acc position: "kvinnan jag såg"
+
 }

lib/src/scandinavian/RelativeScand.gf

@@ -31,7 +31,7 @@ incomplete concrete RelativeScand of Relative =
 
     RelSlash rp slash = {
           s = \\t,a,p,ag,_ => 
-          rp.s ! ag.g ! ag.n ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
+          rp.s ! ag.g ! ag.n ! RAcc ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
       c = NPAcc
       } ;