mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
forgot tha names module
This commit is contained in:
30
src/hungarian/NamesHun.gf
Normal file
30
src/hungarian/NamesHun.gf
Normal file
@@ -0,0 +1,30 @@
|
||||
concrete NamesHun of Names = CatHun ** open ResHun, Prelude in {
|
||||
|
||||
lin
|
||||
GivenName gn = gn ** {g = Human ; objdef = Def} ;
|
||||
MaleSurname sn = sn ** {g = Human ; objdef = Def} ;
|
||||
FemaleSurname sn = sn ** {g = Human ; objdef = Def} ;
|
||||
PlSurname sn = sn ** {g = Human ; objdef = Def ; agr = <P3,Pl>} ;
|
||||
|
||||
FullName gn sn = emptyNP ** {
|
||||
s = \\p,c => gn.s ! p ! Nom ++ sn.s ! p ! c ;
|
||||
agr = <P3,Sg> ;
|
||||
objdef = Def ;
|
||||
g = Human ;
|
||||
postmod = [] ;
|
||||
empty = []
|
||||
} ;
|
||||
|
||||
UseLN ln = ln ** {objdef = Def} ;
|
||||
PlainLN ln = ln ** {objdef = Def} ;
|
||||
|
||||
InLN ln = {
|
||||
s = ln.s ! NoPoss ! Ine ;
|
||||
isPre = False
|
||||
} ;
|
||||
|
||||
AdjLN ap ln = ln ** {
|
||||
s = \\p,c => ap.s ! Sg ! Nom ++ ln.s ! p ! c
|
||||
} ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user