(Kor) Add linref for AP

src/korean/CatKor.gf

@@ -120,4 +120,5 @@ concrete CatKor of Cat = CommonX ** open ResKor, Prelude in {
 linref
   V, V2, V3 = linVerb ;
   VP = linVP linVF ;
+  AP = linAP ;
 }

src/korean/ResKor.gf

@@ -384,5 +384,5 @@ oper
 
 linVerb : Verb -> Str = \v -> v.s ! linVF ;
 linVP : VForm -> VerbPhrase -> Str = \vf,vp -> vp.nObj ++ vp.adv ++ vp.s ! vf ;
-
+linAP : AdjPhrase -> Str = \ap -> ap.compar ++ ap.s ! linVF ;
 }