mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
added pronouns
This commit is contained in:
@@ -3,6 +3,7 @@ concrete CatUkr of Cat = CommonX ** open ResUkr in {
|
||||
lincat N = N ;
|
||||
lincat N2 = N ** {c2 : Compl} ;
|
||||
lincat N3 = N ** {c2,c3 : Compl} ;
|
||||
lincat Pron = {s: Case => Str; g: Gender; n : Number; p: Person} ;
|
||||
lincat V = V ;
|
||||
lincat VV,VS,VQ,VA = V ;
|
||||
lincat V2 = V ** {c2 : Compl} ;
|
||||
|
||||
@@ -2,5 +2,6 @@ concrete GrammarUkr of Grammar =
|
||||
TenseX,
|
||||
PhraseUkr,
|
||||
NounUkr,
|
||||
AdjectiveUkr ** {
|
||||
}
|
||||
AdjectiveUkr,
|
||||
StructuralUkr ** {
|
||||
}
|
||||
|
||||
@@ -1161,6 +1161,21 @@ oper
|
||||
}
|
||||
} ;
|
||||
|
||||
mkPron : (_,_,_,_,_,_ : Str) -> Gender -> Number -> Person -> Pron =
|
||||
\nom,acc,dat,gen,loc,instr,g,n,p -> lin Pron {
|
||||
s = table {
|
||||
Nom => nom ;
|
||||
Acc => acc ;
|
||||
Dat => dat ;
|
||||
Gen => gen ;
|
||||
Loc => loc ;
|
||||
Instr => instr
|
||||
} ;
|
||||
g = g ;
|
||||
n = n ;
|
||||
p = p
|
||||
} ;
|
||||
|
||||
regV : Str -> V -- Active;Imperf;Pres;P1;Sg
|
||||
= \form -> case form of {
|
||||
_ + "вати" => mkV036 form;
|
||||
|
||||
11
src/ukrainian/StructuralUkr.gf
Normal file
11
src/ukrainian/StructuralUkr.gf
Normal file
@@ -0,0 +1,11 @@
|
||||
concrete StructuralUkr of Structural = CatUkr ** open ResUkr, ParadigmsUkr in {
|
||||
lin
|
||||
i_Pron = mkPron "я" "мене" "мені" "мене" "мені" "мною" Masc Sg P1 ;
|
||||
youSg_Pron = mkPron "ти" "тeбе" "тобі" "мене" "тобі" "тобою" Masc Sg P2 ;
|
||||
he_Pron = mkPron "він" "його" "йому" "його" "ньому" "ним" Masc Sg P3 ;
|
||||
she_Pron = mkPron "вона" "її" "їй" "її" "ній" "нею" Fem Sg P3 ;
|
||||
it_Pron = mkPron "воно" "його" "йому" "його" "ньому" "ним" Neuter Sg P3 ;
|
||||
we_Pron = mkPron "ми" "нас" "нам" "нас" "наc" "нами" Masc Pl P1 ;
|
||||
youPl_Pron = mkPron "ви" "вас" "вам" "вас" "вас" "вами" Masc Pl P2 ;
|
||||
they_Pron = mkPron "вони" "їх" "їм" "їх" "них" "ними" Masc Pl P3 ;
|
||||
}
|
||||
Reference in New Issue
Block a user