msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

fix mkN002

Browse Source
This commit is contained in:
Krasimir Angelov
2018-06-23 22:46:22 +02:00
parent 66f1ff9b05
commit 8cfc229164
1 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
src/bulgarian/ParadigmsBul.gf
View File

@@ -28,11 +28,15 @@ oper
mkN002 : Str -> N ; mkN002 : Str -> N ;
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+"îâĺ" ;
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 ;