mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-06-22 09:46:14 -06:00
13 lines
321 B
Plaintext
13 lines
321 B
Plaintext
concrete ExtraNor of ExtraNorAbs = ExtraScandNor ** open CommonScand, ResNor, Prelude in {
|
|
|
|
lin
|
|
PossNPPron np pro = {
|
|
s = \\c => np.s ! NPNom ++ pro.s ! NPPoss (gennumAgr np.a) (caseNP c) ;
|
|
a = np.a ;
|
|
isPron = False ;
|
|
} ;
|
|
|
|
TFutKommer = {s = []} ** {t = SFutKommer} ; --# notpresent
|
|
|
|
}
|