interjections, MassNP and simple VP phrases in Slovenian

This commit is contained in:
krasimir
2016-03-28 21:03:00 +00:00
parent 9807837342
commit 6028bf7679
6 changed files with 31 additions and 2 deletions

View File

@@ -1,4 +1,4 @@
resource ResSlv = {
resource ResSlv = open ParamX in {
param
Case = Nom | Gen | Dat | Acc | Loc | Instr;
@@ -27,4 +27,15 @@ param
oper
Agr = {g : Gender; n : Number; p : Person} ;
VP = {s : Tense => Agr => Str} ;
predV : (VForm => Str) -> VP =
\v -> { s = table {
Pres => \\a => v ! VPres a.n a.p ;
Past => \\a => "biti" ++ v ! VPastPart a.g a.n ;
Fut => \\a => "biti" ++ v ! VPastPart a.g a.n ;
Cond => \\a => "bi" ++ v ! VPastPart a.g a.n
}
} ;
}