1
0
forked from GitHub/gf-rgl

fix mkN002

This commit is contained in:
Krasimir Angelov
2018-06-23 22:46:22 +02:00
parent 66f1ff9b05
commit 8cfc229164

View File

@@ -28,11 +28,15 @@ oper
mkN002 : Str -> N ;
mkN002 base = let v0 = tk 2 base;
v1 = last (base);
g = AMasc NonHuman
in {s = mkNoun (v0+"˙"+v1)
(v0+"ĺ"+v1+"îâĺ")
(v0+"˙"+v1+"ŕ")
(v0+"˙"+v1)
g = AMasc NonHuman
in {s = table {
NF Sg Indef => v0+"˙"+v1 ;
NF Sg Def => v0+"ĺ"+v1+"ŕ" ;
NF Pl Indef => v0+"ĺ"+v1+"îâĺ" ;
NF Pl Def => v0+"ĺ"+v1+"îâĺňĺ" ;
NFSgDefNom => v0+"ĺ"+v1+"ŕ" ;
NFPlCount => v0+"˙"+v1+"ŕ" ;
NFVocative => v0+"˙"+v1
} ;
rel = \\_ => base ; relPost = False ;
g = g ;