a few more words in StructuralSlv.gf

This commit is contained in:
krasimir
2016-05-03 13:15:03 +00:00
parent 9bb33b7610
commit a9d257a31c
2 changed files with 19 additions and 1 deletions

View File

@@ -288,7 +288,20 @@ oper
} ;
a = {g=g; n=n; p=p}
} ;
mkNP : (_,_,_,_,_,_ : Str) -> Gender -> Number -> NP =
\nom,acc,gen,dat,loc,instr,g,n ->
lin NP {s = table {
Nom => nom;
Acc => acc;
Gen => gen;
Dat => dat;
Loc => loc;
Instr=>instr
} ;
a = {g=Neut; n=n; p=P3}
} ;
mkInterj : Str -> Interj =
\s -> lin Interj {s=s} ;

View File

@@ -12,4 +12,9 @@ lin
youSg_Pron = mkPron "tí" "tébe" "tébe" "tébi" "tébi" ("tebój"|"tábo") Masc Sg P2 ;
youPl_Pron = mkPron "ví" "vàs" "vàs" "vàm" "vàs" "vàmi" Masc Pl P2 ;
youPol_Pron = mkPron "ví" "vàs" "vàs" "vàm" "vàs" "vàmi" Masc Pl P2 ;
somebody_NP = mkNP "nekdo" "nekóga" "nekóga" "nekómu" "nekóm" "nekóm" Masc Sg ;
something_NP = mkNP "nekaj" "nekaj" "nečésa" "nečému" "nečém" "nečīm" Neut Sg ;
nobody_NP = mkNP "nihčè" "nikȏgar" "nikȏgar" "nikȏmur" "nikȏmer" "nikȏmer" Masc Sg ;
nothing_NP = mkNP "nìč" "nìč" "ničȇsar" "ničȇmur" "ničȇmer" "ničîmer" Masc Sg ;
}