fix mkN002

This commit is contained in:
Krasimir Angelov
2018-06-23 22:46:22 +02:00
parent 66f1ff9b05
commit 8cfc229164
+9 -5
View File
@@ -28,11 +28,15 @@ oper
mkN002 base = let v0 = tk 2 base; mkN002 base = let v0 = tk 2 base;
v1 = last (base); v1 = last (base);
g = AMasc NonHuman g = AMasc NonHuman
in {s = mkNoun (v0+"˙"+v1) in {s = table {
(v0+"ĺ"+v1+"îâĺ") NF Sg Indef => v0+"˙"+v1 ;
(v0+"˙"+v1+"ŕ") NF Sg Def => v0+"ĺ"+v1+"ŕ" ;
(v0+"˙"+v1) NF Pl Indef => v0+"ĺ"+v1+"îâĺ" ;
g ; NF Pl Def => v0+"ĺ"+v1+"îâĺňĺ" ;
NFSgDefNom => v0+"ĺ"+v1+"ŕ" ;
NFPlCount => v0+"˙"+v1+"ŕ" ;
NFVocative => v0+"˙"+v1
} ;
rel = \\_ => base ; relPost = False ; rel = \\_ => base ; relPost = False ;
g = g ; g = g ;
lock_N = <> lock_N = <>