forked from GitHub/gf-rgl
14 lines
270 B
Plaintext
14 lines
270 B
Plaintext
concrete IdiomHrv of Idiom = CatHrv ** open Prelude, ResHrv in {
|
|
|
|
lin
|
|
ExistNP np = { ---- TODO verify this
|
|
subj = np.s ! Nom ;
|
|
verb = copula_VerbForms ;
|
|
clit, compl = [] ;
|
|
a = np.a
|
|
} ;
|
|
|
|
ExistNPAdv np adv = ExistNP np ** {compl = adv.s} ;
|
|
|
|
}
|