mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-12 16:40:11 -06:00
12 lines
224 B
Plaintext
12 lines
224 B
Plaintext
concrete NamesKor of Names = CatKor ** open ResKor in {
|
|
|
|
lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
|
|
lin FullName gn sn = {
|
|
s = \\nf => gn.s ! nf ++ sn.s ! nf ;
|
|
p = gn.p
|
|
} ;
|
|
|
|
UseLN pn = pn ;
|
|
|
|
}
|