mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-21 17:26:25 -06:00
started with tenses
This commit is contained in:
@@ -1,5 +1,5 @@
|
||||
--# -path=.:../abstract:../common:prelude
|
||||
concrete ExtendMkd of Extend = CatMkd ** open ResMkd in {
|
||||
concrete ExtendMkd of Extend = CatMkd ** open ResMkd, ParadigmsMkd, StructuralMkd in {
|
||||
|
||||
lin
|
||||
CompoundN n1 n2 =
|
||||
@@ -10,11 +10,11 @@ lin
|
||||
AdvMod => n2.s ! sp ! n ++ n1.rel ! sp ! genNum n2.g n
|
||||
} ;
|
||||
voc : Number => Str
|
||||
= \\n => ""{-case n1.relType of {
|
||||
Pref => n1.rel ! Indef ! genNum n2.g n ++ n2.vocative ! n ;
|
||||
AdjMod => n1.rel ! Indef ! genNum n2.g n ++ n2.vocative ! n ;
|
||||
AdvMod => n2.vocative ! n ++ n1.rel ! Indef ! genNum n2.g n
|
||||
}-}
|
||||
= \\n => case n1.relType of {
|
||||
Pref => n1.rel ! Indef ! genNum n2.g n ++ n2.vocative ! n ;
|
||||
AdjMod => n1.rel ! Indef ! genNum n2.g n ++ n2.vocative ! n ;
|
||||
AdvMod => n2.vocative ! n ++ n1.rel ! Indef ! genNum n2.g n
|
||||
}
|
||||
in {
|
||||
s = comp ;
|
||||
count_form = comp ! Indef ! Pl ;
|
||||
@@ -23,5 +23,16 @@ lin
|
||||
g = n2.g
|
||||
} ;
|
||||
|
||||
iFem_Pron = mkPron "јас" "мене" "ме" "мене" "ми" "мене" "мој" "мојот" "моја" "мојата" "мое" "моето" "мои" "моите" "ми" (GSg Fem) P1 ;
|
||||
youFem_Pron = mkPron "ти" "тебе" "те" "тебе" "ти" "тебе" "твој" "твојот" "твоја" "твојата" "твое" "твоето" "твои" "твоите" "ти" (GSg Fem) P2 ;
|
||||
weFem_Pron = we_Pron ;
|
||||
youPlFem_Pron = youPl_Pron ;
|
||||
theyFem_Pron = they_Pron ;
|
||||
youPolFem_Pron = mkPron "вие" "вас" "ве" "вам" "ви" "вас" "ваш" "вашиот" "ваша" "вашата" "ваше" "вашето" "ваши" "вашите" "ви" (GSg Fem) P2 ;
|
||||
youPolPl_Pron = youPol_Pron ;
|
||||
youPolPlFem_Pron = youPol_Pron ;
|
||||
|
||||
lin TPastSimple = {s = []} ** {t = VPastSimple} ; --# notpresent
|
||||
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user