mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-16 00:09:31 -06:00
27 lines
615 B
Plaintext
27 lines
615 B
Plaintext
concrete ExtraGre of ExtraGreAbs = CatGre **
|
|
open
|
|
CommonGre,
|
|
ResGre,
|
|
NounGre,
|
|
PhraseGre,
|
|
SentenceGre,
|
|
Prelude in {
|
|
|
|
flags coding = utf8 ;
|
|
|
|
|
|
lin
|
|
|
|
-- TImperf = {s = [] ; t = ResGre.TImperf; m = Ind} ;
|
|
|
|
|
|
UttImpSgImperf pol imp = {s = pol.s ++ imp.s ! pol.p ! Sg ! Imperf} ;
|
|
UttImpPlImperf pol imp = {s = pol.s ++ imp.s ! pol.p ! Pl ! Imperf} ;
|
|
|
|
theyFem_Pron = mkPron "αυτές" "τους" "τις" "αυτές" "αυτών" Fem Pl P3 ;
|
|
theyNeut_Pron = mkPron "αυτά" "τους" "τα" "αυτά" "αυτών" Neut Pl P3 ;
|
|
|
|
|
|
|
|
|
|
} |