language specific extensions started

lib/resource-1.0/scandinavian/ExtraScand.gf

@@ -0,0 +1,12 @@
+incomplete concrete ExtraScand of ExtraScandAbs = CatScand ** open CommonScand,ResScand in {
+
+  lin
+    GenNP np = {
+      s = \\n,_,g => np.s ! NPPoss (gennum g n) ; 
+      det = DDef Indef
+      } ;
+
+    EmbedBareS s = {s = s.s ! Sub} ;
+    ComplBareVS v s  = insertObj (\\_ => s.s ! Sub) (predV v) ;
+
+}