added GN & SN categories for constructing names

2026-06-25 19:16:28 -06:00 · 2022-12-15 08:44:42 +01:00
parent d0e433cd46
commit 7085acacc9
55 changed files with 371 additions and 43 deletions
@@ -140,5 +140,11 @@ lin
      (Grammar.DetCN (Grammar.DetQuant Grammar.IndefArt (Grammar.NumCard card)) cn).s ! NPC c ;
    n = Pl
    } ;
-  
+
+lin GivenName, Surname = \n -> n ** { n = Sg } ;
+lin FullName gn sn = {
+       s = \\c => gn.s ! Nom ++ sn.s ! c ;
+       g = gn.g ;
+       n = Sg
+    } ;
 }