started a separate module for names

src/portuguese/ExtendPor.gf

@@ -116,10 +116,4 @@ concrete ExtendPor of Extend = CatPor ** ExtendRomanceFunctor -
     youPolPlFem_Pron = pronAgr youPolPl_Pron Fem Pl P2 ;
     theyFem_Pron = mkPronFrom S.they_Pron "elas" "as" "lhes" "elas" Fem Pl P3 ;
 
-lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
-lin FullName gn sn = {
-       s = gn.s ++ sn.s ;
-       g = gn.g
-    } ;
-
 } ;

src/portuguese/GrammarPor.gf

@@ -14,7 +14,8 @@ concrete GrammarPor of Grammar =
   TextPor - [SC,Temp,Tense,Pol,PPos,PNeg],      -- special punctuation
   IdiomPor,
   StructuralPor,
-  TensePor
+  TensePor,
+  NamesPor
 
   ** {
 

src/portuguese/NamesPor.gf

@@ -0,0 +1,9 @@
+concrete NamesPor of Names = CatPor ** open ResPor in {
+
+lin GivenName, MaleSurname, FemaleSurname = \n -> pn2np n ;
+lin FullName gn sn = pn2np {
+       s = gn.s ++ sn.s ;
+       g = gn.g
+    } ;
+
+}