added GN & SN categories for constructing names

This commit is contained in:
Krasimir Angelov committed 2022-12-15 08:44:42 +01:00
1 parent d0e433cd46
commit 7085acacc9
55 files changed
+371 -43

No files matched your search

+5
View File
@@ -15,5 +15,10 @@ concrete ExtendCat of Extend = CatCat ** ExtendRomanceFunctor-- -
ParadigmsCat in {
-- put your own definitions here
lin GivenName, Surname = \n -> n ;
lin FullName gn sn = {
s = gn.s ++ sn.s ;
g = gn.g
} ;
} ;