mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
added pronouns
This commit is contained in:
@@ -22,5 +22,6 @@ lincat Num = {s : Str; n : Number} ;
|
||||
lincat Quant = {s : Str; spec : Species} ;
|
||||
lincat Det = {s : Str; spec : Species; n : Number} ;
|
||||
lincat NP = {s: Case => Str; a : Agr} ;
|
||||
lincat Pron = {s: Case => Str; acc_clit, dat_clit : Str; a : Agr} ;
|
||||
|
||||
}
|
||||
|
||||
@@ -1,7 +1,8 @@
|
||||
concrete GrammarSqi of Grammar =
|
||||
NounSqi,
|
||||
AdjectiveSqi,
|
||||
NumeralSqi
|
||||
NumeralSqi,
|
||||
StructuralSqi
|
||||
** {
|
||||
|
||||
} ;
|
||||
|
||||
@@ -8,6 +8,8 @@ concrete NounSqi of Noun = CatSqi ** open MorphoSqi, ResSqi in {
|
||||
a = agrgP3 cn.g det.n
|
||||
} ;
|
||||
|
||||
UsePron p = p ;
|
||||
|
||||
DetQuant quant num = {
|
||||
s = quant.s ++ num.s ;
|
||||
n = num.n ;
|
||||
|
||||
@@ -1235,7 +1235,15 @@ mkQuant : Str -> Quant = \s -> lin Quant {s=s; spec=Indef} ;
|
||||
mkDet : Str -> Number -> Det = \s,n -> lin Det {s=s; spec=Indef; n=n} ;
|
||||
mkConj : Str -> Conj = \s -> lin Conj {s=s} ;
|
||||
mkPConj : Str -> PConj = \s -> lin PConj {s=s} ;
|
||||
mkPron : Str -> Pron = \s -> lin Pron {s=s} ;
|
||||
|
||||
mkPron : (nom,acc,dat,ablat,acc_clit,dat_clit : Str) -> GenNum -> Person -> Pron =
|
||||
\nom,acc,dat,ablat,acc_clit,dat_clit,gn,p -> lin Pron
|
||||
{s = table Case [nom; acc; dat; ablat];
|
||||
acc_clit = acc_clit;
|
||||
dat_clit = dat_clit;
|
||||
a = {gn=gn; p=p}
|
||||
} ;
|
||||
|
||||
mkCard : Str -> Card = \s -> lin Card {s=s} ;
|
||||
mkACard : Str -> ACard = \s -> lin ACard {s=s} ;
|
||||
mkPredet : Str -> Predet = \s -> lin Predet {s=s} ;
|
||||
|
||||
12
src/albanian/StructuralSqi.gf
Normal file
12
src/albanian/StructuralSqi.gf
Normal file
@@ -0,0 +1,12 @@
|
||||
concrete StructuralSqi of Structural = CatSqi ** open ResSqi, ParadigmsSqi in {
|
||||
|
||||
lin i_Pron = mkPron "unë" "mua" "mua" "meje" "më" "më" (GSg Masc) P1 ;
|
||||
lin youSg_Pron = mkPron "ti" "ty" "ty" "teje" "të" "të" (GSg Masc) P2 ;
|
||||
lin he_Pron = mkPron "ai" "atë" "atij" "atij" "e" "i" (GSg Masc) P3 ;
|
||||
lin she_Pron = mkPron "ajo" "atë" "asaj" "asaj" "e" "i" (GSg Fem) P3 ;
|
||||
lin it_Pron = mkPron "ai" "atë" "atij" "atij" "e" "i" (GSg Masc) P3 ;
|
||||
lin we_Pron = mkPron "ne" "ne" "neve" "nesh" "na" "na" GPl P1 ;
|
||||
lin youPl_Pron = mkPron "ju" "ju" "juve" "jush" "ju" "ju" GPl P2 ;
|
||||
lin they_Pron = mkPron "ata" "ata" "atyre" "atyre" "i" "u" GPl P3 ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user