added GN & SN categories for constructing names

2022-12-15 08:44:42 +01:00
parent d0e433cd46
commit 7085acacc9
55 changed files with 371 additions and 43 deletions
@@ -437,4 +437,9 @@ concrete ExtendEst of Extend =
    WithoutVP vp = {s = "ilma" ++ infVPdefault vp InfMata} ;


+lin GivenName, Surname = \n -> n ;
+lin FullName gn sn = {
+       s = \\c => gn.s ! Nom ++ sn.s ! c
+    } ;
+
 }