started a separate module for names

2026-06-29 04:46:30 -06:00 · 2023-07-24 17:24:13 +02:00
parent 8b1309c99d
commit 645de9955a
100 changed files with 611 additions and 227 deletions
@@ -0,0 +1,9 @@
+concrete NamesIta of Names = CatIta ** open ResIta in {
+
+lin GivenName, MaleSurname, FemaleSurname, PlSurname = \n -> pn2np n ;
+lin FullName gn sn = pn2np {
+       s = gn.s ++ sn.s ;
+       g = gn.g
+    } ;
+
+}