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

new Pol noun table from Paula Pawlowski

Browse Source
This commit is contained in:
Aarne Ranta
2018-02-06 17:12:24 +01:00
parent 54d60b60da
commit a87a16b19f
1 changed files with 21 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
src/polish/NounMorphoPol.gf
View File

@@ -7862,6 +7862,27 @@ resource NounMorphoPol = ResPol ** open Prelude, (Predef=Predef) in {
SF Pl Voc => x + "ludzie" SF Pl Voc => x + "ludzie"
}; };
--created for sukienka and kurtka. Paula Pawlowski 6/2/2018
oper mkNTable0670p : Str -> SubstForm => Str; --%
oper mkNTable0670p lexem =
let x = Predef.tk 2 lexem in
table {
SF Sg Nom => x + "ka";
SF Sg Gen => x + "ki";
SF Sg Dat => x + "ce";
SF Sg Acc => x + "kę";
SF Sg Instr => x + "ką";
SF Sg Loc => x + "ce";
SF Sg Voc => x + "ko";
SF Pl Nom => x + "ki";
SF Pl Gen => x + "ek";
SF Pl Dat => x + "kom";
SF Pl Acc => x + "ki";
SF Pl Instr => x + "kami";
SF Pl Loc => x + "kach";
SF Pl Voc => x + "ki"
};
oper mkNTable0671: Str -> SubstForm => Str; --% oper mkNTable0671: Str -> SubstForm => Str; --%
oper mkNTable0671 lexem = oper mkNTable0671 lexem =
let x = Predef.tk 1 lexem in let x = Predef.tk 1 lexem in