added GN & SN categories for constructing names

2026-06-29 04:46:30 -06:00 · 2022-12-15 08:44:42 +01:00
parent d0e433cd46
commit 7085acacc9
55 changed files with 371 additions and 43 deletions
@@ -16,4 +16,10 @@ concrete ExtendChi of Extend = CatChi **
  oper
    mkAdv : Str -> Adv ;
    mkAdv str = lin Adv {s = str ; advType = ATManner ; hasDe = False} ;
-  };
+  
+lin GivenName, Surname = \n -> n ;
+lin FullName gn sn = {
+       s = gn.s ++ sn.s
+    } ;
+  
+};