mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-10-03 15:43:43 -06:00
16 lines
364 B
Plaintext
16 lines
364 B
Plaintext
--# -path=.:../common:../abstract
|
|
|
|
concrete ExtendKor of Extend = CatKor
|
|
-- ** ExtendFunctor - [ApposNP]
|
|
-- with (Grammar=GrammarKor)
|
|
** open Prelude, ResKor, NounKor, Coordination, TenseX in {
|
|
|
|
lin
|
|
UttAdV adv = {s = adv.s} ;
|
|
|
|
-- : NP -> NP -> NP
|
|
ApposNP np1 np2 = np1 ** {s = \\nf => np1.s ! nf ++ np2.s ! nf} ;
|
|
|
|
TPastSimple = TPast ;
|
|
} ;
|