diff --git a/src/korean/ExtendKor.gf b/src/korean/ExtendKor.gf index 345728b05..d0d462dd3 100644 --- a/src/korean/ExtendKor.gf +++ b/src/korean/ExtendKor.gf @@ -1,8 +1,11 @@ --# -path=.:../common:../abstract concrete ExtendKor of Extend = CatKor - -- ** ExtendFunctor - [] + -- ** ExtendFunctor - [ApposNP] -- with (Grammar=GrammarKor) - ** open Prelude, ResKor, NounKor in { + ** open Prelude, ResKor, NounKor, Coordination in { + lin + -- : NP -> NP -> NP + ApposNP np1 np2 = np1 ** {s = \\nf => np1.s ! nf ++ np2.s ! nf} ; } ;