mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 09:28:54 -06:00
ParadigmsGre: case for mkPN Str Gender
This commit is contained in:
@@ -68,6 +68,8 @@ oper
|
||||
mkPN = overload {
|
||||
mkPN : (anna : Str) -> PN
|
||||
= \p -> lin PN (regName p) ;
|
||||
mkPN : (anna : Str) -> Gender -> PN
|
||||
= \p, g -> lin PN (regName p ** {g = g}) ;
|
||||
mkPN : (nm,gm,am,vm,pn,pa : Str) -> Gender -> PN
|
||||
= \ nm,gm,am,vm,pn,pa, g -> lin PN (mkName nm gm am vm pn pa g) ;
|
||||
} ;
|
||||
|
||||
Reference in New Issue
Block a user