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

fix paradigm mkN003

Browse Source
This commit is contained in:
Krasimir Angelov
2018-06-28 15:32:37 +02:00
parent 2c0caaf687
commit 07697dd8d1
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

@@ -58,11 +58,15 @@ oper
mkN003 : Str -> N ; mkN003 : Str -> N ;
mkN003 base = let v0 = tk 3 base; mkN003 base = let v0 = tk 3 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 ;