started a separate module for names

src/swedish/NamesSwe.gf

@@ -0,0 +1,14 @@
+concrete NamesSwe of Names = CatSwe ** open CommonScand, ResSwe, Prelude in {
+
+lin GivenName, MaleSurname, FemaleSurname = \pn -> {
+      s = \\c => pn.s ! caseNP c ; 
+      a = agrP3 pn.g Sg ;
+      isPron = False
+      } ;
+lin FullName gn sn = {
+      s = \\c => gn.s ! Nom ++ sn.s ! caseNP c ;
+      a = agrP3 gn.g Sg ;
+      isPron = False
+      } ;
+
+}