1
0
forked from GitHub/gf-rgl

(Jpn) add GN, LN, SN + constructors

This commit is contained in:
Inari Listenmaa
2026-04-01 16:21:58 +02:00
parent 4c55592af4
commit 84e0e2c08f
2 changed files with 5 additions and 1 deletions
+4
View File
@@ -50,6 +50,10 @@ oper
= \jon,jonsan -> lin PN (personPN jon jonsan)
} ;
mkGN : Str -> GN = \s -> lin GN (regPN s);
mkLN : Str -> LN = \s -> lin LN (regPN s);
mkSN : Str -> SN = \s -> lin SN (regPN s);
mkPron = overload {
mkPron : (kare : Str) -> (Pron1Sg : Bool) -> (anim : Animacy) -> Pron
= \kare,b,a -> lin Pron (regPron kare b a) ;