refactored Scandinavian NP agreement features

lib/src/scandinavian/SymbolScand.gf

@@ -8,15 +8,15 @@ lin
   NumPN i  = {s = \\c => i.s!neutrum ; g = Neutr} ; --- c
   CNIntNP cn i = {
     s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
-    a = agrP3 cn.g Sg
+    a = agrP3 (ngen2gen cn.g) Sg
     } ;
   CNSymbNP det cn xs = let g = cn.g in {
     s = \\c => det.s ! cn.isMod ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ; 
-    a = agrP3 g det.n
+    a = agrP3 (ngen2gen g) det.n
     } ;
   CNNumNP cn i = {
     s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s ! neutrum) ;
-    a = agrP3 cn.g Sg
+    a = agrP3 (ngen2gen cn.g) Sg
     } ;
 
   SymbS sy = {s = \\_ => sy.s} ;