catalan_smart_paradigms

MorphoCat and ParadigmsCat: smart paradigms for adjectives. 
ExtraCat: added costruction for negative imperative.
This commit is contained in:
inari.listenmaa
2012-10-19 09:36:37 +00:00
parent e666fa838f
commit 606f8bece8
4 changed files with 202 additions and 67 deletions

View File

@@ -1,13 +1,16 @@
concrete ExtraCat of ExtraCatAbs = ExtraRomanceCat **
open CommonRomance, ParadigmsCat, PhonoCat, MorphoCat, ParamX, ResCat in {
open CommonRomance, ParadigmsCat, PhonoCat, MorphoCat, ParamX, ResCat,
Prelude in {
flags coding = utf8 ;
lin
i8fem_Pron = mkPronoun
"jo" "em" "em" "mi" ["el meu"] ["la meva"] ["els meus"] ["les meves"]
Fem Sg P1 ;
i8fem_Pron = mkPronoun
"jo" "em" "em" "mi"
["el meu"] ["la meva"] ["els meus"] ["les meves"]
Fem Sg P1 ;
these8fem_NP = makeNP "aquestes" Fem Pl ;
they8fem_Pron = mkPronoun
these8fem_NP = makeNP "aquestes" Fem Pl ;
they8fem_Pron = mkPronoun
"elles" "les" "les" "elles"
"llur" "llur" "llurs" "llurs"
Fem Pl P3 ;
@@ -15,30 +18,36 @@ lin
those8fem_NP = makeNP ["aquestes"] Fem Pl ;
we8fem_Pron =
mkPronoun
"nosaltres" "ens" "ens" "nosaltres"
["el nostre"] ["la nostra"] ["els nostres"] ["les nostres"]
Fem Pl P1 ;
mkPronoun
"nosaltres" "ens" "ens" "nosaltres"
["el nostre"] ["la nostra"] ["els nostres"] ["les nostres"]
Fem Pl P1 ;
whoPl8fem_IP = {s = \\c => prepCase c ++ "qui" ; a = aagr Fem Pl} ;
whoSg8fem_IP = {s = \\c => prepCase c ++ "qui" ; a = aagr Fem Sg} ;
youSg8fem_Pron = mkPronoun
"tu" "et" "et" "tu"
["el teu"] ["la teva"] ["els teus"] ["les teves"]
Fem Sg P2 ;
"tu" "et" "et" "tu"
["el teu"] ["la teva"] ["els teus"] ["les teves"]
Fem Sg P2 ;
youPl8fem_Pron = mkPronoun
"vosaltres" "us" "us" "vosaltres"
["el vostre"] ["la vostra"] ["els vostres"] ["les vostres"]
Fem Pl P2 ;
youPol8fem_Pron = mkPronoun
"vosté" "la" "li" "vosté"
"vostè" "la" "li" "vostè"
["el seu"] ["la seva"] ["els seus"] ["les seves"]
Fem Sg P3 ;
--IL 2012-10-12
ImpNeg np vp = lin Utt{
s = (mkClause (np.s ! Nom).comp np.hasClit False np.a vp).s
! DInv ! RPres ! Simul ! RNeg False ! Conjunct
} ;
oper
vostePl : ParadigmsCat.Gender -> Pron = \g -> lin Pron (mkPronoun
"vostés" "els" "li" "vostés"
vostePl : ParadigmsCat.Gender -> Pron = \g -> lin Pron (mkPronoun
"vostès" "els" "li" "vostès"
"llur" "llur" "llurs" "llurs"
g Pl P3) ;
lin