\ProvidesFile{gloss-korean.ldf}[polyglossia: module for Korean] \PolyglossiaSetup{korean}{ bcp47=ko, script=Hangul, scripttag=hang, language=Korean, langtag=KOR, hyphennames={nohyphenation}, frenchspacing=true, fontsetup=true } % BCP-47 compliant aliases \setlanguagealias*{korean}{ko} % variant : plain (0), classic (1), or modern (2) \define@choicekey{korean}{variant}[\val\nr]{plain,classic,modern}[plain]{% \let\xpg@korean@variant\nr } % captions : hangul (0) or hanja (1) \define@choicekey{korean}{captions}[\val\nr]{hangul,hanja}[hangul]{% \let\xpg@korean@captions\nr } % swapstrings: all (0), headings (1), headers (2), or none (3) \newif\if@korean@swapheadings \newif\if@korean@swapheaders \define@choicekey*+{korean}{swapstrings}[\val\nr]{all,headings,headers,none}[all]{% \ifcase\nr\relax % all: \@korean@swapheadingstrue% \@korean@swapheaderstrue% \or % headings: \@korean@swapheadingstrue% \@korean@swapheadersfalse% \or % headers: \@korean@swapheadingsfalse% \@korean@swapheaderstrue% \or % none: \@korean@swapheadingsfalse% \@korean@swapheadersfalse% \fi \xpg@info{Option: Korean, swapstrings=\val}% }{\xpg@warning{Unknown Korean swapstrings value `#1'}} % Register default options \xpg@initialize@gloss@options{korean}{variant=plain,swapstrings=all,captions=hangul} \def\captionskorean{% \ifcase\xpg@korean@captions\relax \captions@korean@hangul \else \captions@korean@hanja \fi \def\seename{$\rightarrow$}% \def\alsoname{$\Rightarrow$}% } \def\captions@korean@hangul{% \def\koreanTHEname{제}% \def\partname{편}% \def\chaptername{장}% \def\refname{참고문헌}% \def\abstractname{요약}% \def\bibname{참고문헌}% \def\prefacename{서문}% \def\appendixname{부록}% \def\contentsname{차례}% \def\listfigurename{그림 차례}% \def\listtablename{표 차례}% \def\indexname{찾아보기}% \def\figurename{그림}% \def\tablename{표}% \def\pagename{페이지}% \def\enclname{동봉}% \def\proofname{증명}% \def\headtoname{수신:}% \def\ccname{사본}% \def\glossaryname{용어집}% } \def\captions@korean@hanja{% \def\koreanTHEname{第}% \def\partname{篇}% \def\chaptername{章}% \def\refname{參考文獻}% \def\abstractname{要約}% \def\bibname{參考文獻}% \def\prefacename{序文}% \def\appendixname{附錄}% \def\contentsname{目次}% \def\listfigurename{圖版 目次}% \def\listtablename{表 目次}% \def\indexname{索引}% \def\figurename{圖版}% \def\tablename{表}% \def\pagename{面}% \def\enclname{同封}% \def\proofname{證明}% \def\headtoname{受信:}% \def\ccname{寫本}% \def\glossaryname{用語集}% } \def\korean@appendix@chapapp{\appendixname}% to exclude appendix \def\korean@headingsformat{% % change chapter and part headings \if@korean@swapheadings % With titlesec \ifdefined\titleformat \ifdefined\@part \let\xpg@save@part@format\@part \patchcmd{\@part}% {\partname\nobreakspace\thepart}% {\koreanTHEname\nobreakspace \thepart\nobreakspace \partname}% {}% {\xpg@warning{Failed to patch part for Korean}}% \fi \ifdefined\chapter \titleformat\chapter[display]% {\@ifundefined{ttl@fil}{\raggedright}{\ttl@fil}\ttl@fonts\ttl@sizes6}% {% \ifx\@chapapp\korean@appendix@chapapp \appendixname\space \thechapter \else \koreanTHEname\space \thechapter\space \@chapapp \fi }{.8\baselineskip}{\ttl@sizes\z@\ttl@passexplicit}% \fi \else % (not \ifdefined\titleformat) % With KOMA \ifdefined\sectionformat \ifdefined\partformat \let\xpg@save@part@format\partformat \renewcommand*{\partformat}{\koreanTHEname~\thepart~\partname}% \fi \ifdefined\chapterformat \let\xpg@save@chap@format\chapterformat \renewcommand*{\chapterformat}{\mbox{% \IfChapterUsesPrefixLine {% \ifx\@chapapp\korean@appendix@chapapp \chapappifchapterprefix\nobreakspace \thechapter\autodot \else \koreanTHEname\nobreakspace \thechapter\nobreakspace \chapappifchapterprefix{}% \fi }% {\thechapter\autodot\enskip}% }}% \fi \else % (not \ifdefined\sectionformat) % With memoir \ifdefined\@memptsize \ifdefined\@makechapterhead \let\xpg@save@chap@format\@makechapterhead \patchcmd{\@makechapterhead}% {\printchaptername \chapternamenum \printchapternum}% {% \ifx\@chapapp\korean@appendix@chapapp \printchaptername\relax\chapternamenum \printchapternum \else \printkoreanchapterthe \printchapternum\chapternamenum \printchaptername \fi }% {}% {\xpg@warning{Failed to patch chapter for Korean}}% \ifdefined\printkoreanchapterthe\else \def\printkoreanchapterthe{% \ifpatchable\printchaptername\@chapapp {\chapnamefont\koreanTHEname\chapternamenum}{}}% \fi \fi \ifdefined\@part \let\xpg@save@part@format\@part \patchcmd{\@part}% {\printpartname \partnamenum \printpartnum}% {\printkoreanpartthe \printpartnum\partnamenum \printpartname}% {}% {\xpg@warning{Failed to patch part for Korean}}% \ifdefined\printkoreanpartthe\else \def\printkoreanpartthe{\partnamefont\koreanTHEname\partnamenum}% \fi \fi \else % (not \ifdefined\@memptsize) % With standard classes \ifdefined\@makechapterhead \let\xpg@save@chap@format\@makechapterhead \patchcmd{\@makechapterhead}% {\@chapapp\space \thechapter}% {% \ifx\@chapapp\korean@appendix@chapapp \appendixname\space \thechapter \else \koreanTHEname\space \thechapter\space \@chapapp \fi }% {}% {\xpg@warning{Failed to patch chapter for Korean}}% \fi \ifdefined\@part \let\xpg@save@part@format\@part \patchcmd{\@part}% {\partname\nobreakspace\thepart}% {\koreanTHEname\nobreakspace \thepart\nobreakspace \partname}% {}% {\xpg@warning{Failed to patch part for Korean}}% \fi % (end \ifdefined\@part) \fi % (end \ifdefined\@memptsize) \fi % (end \ifdefined\sectionformat) \fi % (end \ifdefined\titleformat) \fi % (end \if@korean@swapheadings) % % Change running headers \if@korean@swapheaders \ifdefined\chapterformat % With KOMA \let\xpg@save@chaptermark@format\chaptermarkformat \renewcommand*\chaptermarkformat{% \IfChapterUsesPrefixLine {% \ifx\@chapapp\korean@appendix@chapapp \chapappifchapterprefix\ \thechapter\autodot \else \koreanTHEname\ \thechapter\ \chapappifchapterprefix{}% \fi }% {\thechapter\autodot}% \enskip }% \else % (not \ifdefined\chapterformat) \ifdefined\@memptsize % With memoir \let\xpg@save@chaptermark@format\chaptermark \patchcmd{\chaptermark}% {\@chapapp\ \@nameuse{thechapter}}% {% \ifx\@chapapp\korean@appendix@chapapp \appendixname\ \@nameuse{thechapter}% \else \koreanTHEname\ \@nameuse{thechapter}\ \@chapapp \fi }% {}% {}% \else % (not \ifdefined\@memptsize) % With standard classes \ifdefined\chaptermark \let\xpg@save@chaptermark@format\chaptermark \patchcmd{\chaptermark}% {\@chapapp\ \thechapter}% {% \ifx\@chapapp\korean@appendix@chapapp \appendixname\ \thechapter \else \koreanTHEname\ \thechapter\ \@chapapp \fi }% {}% {}% \fi % (end \ifdefined\chaptermark) \fi % (end \ifdefined\@memptsize) \fi % (end \ifdefined\chapterformat) \fi % (end \if@korean@swapheaders) } \def\nokorean@headingsformat{% % Reset chapter and part heading \ifdefined\titleformat % With titlesec \ifdefined\xpg@save@part@format \let\@part\xpg@save@part@format \fi \ifdefined\chapter \titleformat\chapter[display]% {\@ifundefined{ttl@fil}{\raggedright}{\ttl@fil}\ttl@fonts\ttl@sizes6}% {\@chapapp\space\thechapter}{.8\baselineskip}{\ttl@sizes\z@\ttl@passexplicit}% \fi \else % (not \ifdefined\titleformat) \ifdefined\sectionformat % With KOMA \ifdefined\xpg@save@part@format \let\partformat\xpg@save@part@format \fi \ifdefined\xpg@save@chap@format \let\chapterformat\xpg@save@chap@format \fi \else % With memoir and standard classes \ifdefined\xpg@save@part@format \let\@part\xpg@save@part@format \fi \ifdefined\xpg@save@chap@format \let\@makechapterhead\xpg@save@chap@format \fi \fi % (end \ifdefined\sectionformat) \fi % (end \ifdefined\titleformat) % % Reset headers \ifdefined\chaptermarkformat % With KOMA \ifdefined\xpg@save@chaptermark@format \let\chaptermarkformat\xpg@save@chaptermark@format \fi \else \ifdefined\chaptermark % With memoir and standard classes \ifdefined\xpg@save@chaptermark@format \let\chaptermark\xpg@save@chaptermark@format \fi \fi % (end \ifdefined\chaptermark) \fi % (end \ifdefined\chapterformat) } \def\datekorean{% \ifcase\xpg@korean@captions\relax \def\today{\the\year 년 \the\month 월 \the\day 일}% \else \def\today{\the\year 年 \the\month 月 \the\day 日}% \fi } \def\koreanAlph#1{\expandafter\@koreanAlph\csname c@#1\endcsname} \def\@koreanAlph#1{% \ifcase#1\or 가\or 나\or 다\or 라\or 마\or 바\or 사\or 아\or 자\or 차\or 카\or 타\or 파\or 하\else\xpg@ill@value{#1}{@koreanAlph}\fi } \def\koreanalph#1{\expandafter\@koreanalph\csname c@#1\endcsname} \def\@koreanalph#1{% \ifcase#1\or ㄱ\or ㄴ\or ㄷ\or ㄹ\or ㅁ\or ㅂ\or ㅅ\or ㅇ\or ㅈ\or ㅊ\or ㅋ\or ㅌ\or ㅍ\or ㅎ\else\xpg@ill@value{#1}{@koreanalph}\fi } \def\korean@numbers{% \let\@alph\@koreanalph \let\@Alph\@koreanAlph } \def\nokorean@numbers{% \let\@alph\latin@alph \let\@Alph\latin@Alph } \let\nokorean@globalnumbers\nokorean@numbers \ifxetex \def\inlineextras@korean{% \ifcase\xpg@korean@variant\relax \XeTeXinterchartokenstate\z@ \XeTeXlinebreakpenalty 50 \or \setvariantkoreaninterchartoks \setvariantkoreancharclasses \def\XPGKOhalfdim{\dimexpr.5em\relax}% \XeTeXinterchartokenstate\@ne \XeTeXlinebreakpenalty \z@ \else \setvariantkoreaninterchartoks \setvariantkoreancharclasses \def\XPGKOhalfdim{\dimexpr.5\fontdimen\tw@\font\relax}% \XeTeXinterchartokenstate\@ne \XeTeXlinebreakpenalty 50 \fi \XeTeXlinebreakskip 0pt plus.05em minus .01em \XeTeXlinebreaklocale "ko" } \def\noextras@korean{% \ifcase\xpg@korean@variant\relax \else \unsetvariantkoreaninterchartoks \unsetvariantkoreancharclasses \fi \XeTeXinterchartokenstate\z@ \XeTeXlinebreakpenalty\z@ \XeTeXlinebreakskip\z@skip \XeTeXlinebreaklocale "en" \noextras@korean@common } \else % luatex \def\inlineextras@korean{\xpg@attr@korean\xpg@korean@variant\relax} \def\noextras@korean{% \unsetattribute\xpg@attr@korean \noextras@korean@common } \fi \def\blockextras@korean{% \inlineextras@korean \korean@headingsformat } \def\noextras@korean@common{% \nokorean@headingsformat } \ifluatex % luatex \protected\def\inhibitglue{\hskip\z@skip} \ifdefined\newattribute\else \let\newattribute\newluatexattribute \let\unsetattribute\unsetluatexattribute \fi \newattribute\xpg@attr@korean \newattribute\xpg@attr@autojosa % user commands for Josa % Josa : particles in Korean grammar that immediately follow a noun or pronoun. % Josa might vary depending on previous character. \protected\def\rieul{\global\let\xpg@josa@zwang\@ne} \protected\def\jung {\global\let\xpg@josa@zwang\tw@} \protected\def\jong {\global\let\xpg@josa@zwang\thr@@} \protected\def\은{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 은\endgroup\xpg@reset@josa} \let\는\은 \protected\def\을{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 을\endgroup\xpg@reset@josa} \let\를\을 \protected\def\와{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 와\endgroup\xpg@reset@josa} \let\과\와 \protected\def\가{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 가\endgroup\xpg@reset@josa} \protected\def\이{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 이\endgroup\xpg@reset@josa} \protected\def\라{\이 라} \protected\def\으{\begingroup\xpg@attr@autojosa\xpg@josa@zwang 으\endgroup\xpg@reset@josa} \protected\def\로{\으 로} \def\xpg@reset@josa {\global\let\xpg@josa@zwang\z@}\xpg@reset@josa % load lua file for korean \directlua{ require "polyglossia-korean" } \endinput\fi % XeTeX % user commands for Josa \protected\def\jong {\global\let\XPGKO@let@josa=0}\jong \protected\def\rieul{\global\let\XPGKO@let@josa=1} \protected\def\jung {\global\let\XPGKO@let@josa=2} \protected\def\가{\xpg@make@josa 가이} \protected\def\이{\futurelet\@let@token\xpg@make@josa@I} \protected\def\은{\xpg@make@josa 는은} \let\는\은 \protected\def\을{\xpg@make@josa 를을} \let\를\을 \protected\def\와{\xpg@make@josa 와과} \let\과\와 \protected\def\으{\xpg@make@josa \empty 으} \protected\def\로{\으 로} \protected\def\라{\xpg@make@josa 라{이라}} \def\xpg@make@josa@II{\xpg@make@josa\relax 이} \def\xpg@make@josa@I{% \ifcat\@let@token\xpg@catcode@letter \expandafter\expandafter\expandafter\count@\expandafter \xpg@letter@to@num\meaning\@let@token\relax \ifnum 0\ifnum\count@>"ABFF \ifnum\count@<"D7A4 1\fi\fi>\z@ \expandafter\expandafter\expandafter\xpg@make@josa@II \else \expandafter\expandafter\expandafter\가 \fi \else \expandafter\가 \fi } \def\xpg@make@josa#1#2{% \ifcat\xpg@catcode@letter\XPGKO@let@josa \expandafter\expandafter\expandafter\count@\expandafter \xpg@letter@to@num\meaning\XPGKO@let@josa\relax \else\ifcat\xpg@catcode@other\XPGKO@let@josa \expandafter\expandafter\expandafter\count@\expandafter \xpg@character@to@num\meaning\XPGKO@let@josa\relax \fi\fi \ifnum\count@<"3260 \else\ifnum\count@<"3280 \advance\count@-"60 \else\ifnum\count@<"AC00 \else\ifnum\count@<"D7A4 % Hangul syllables \advance\count@-"AC00 \@tempcnta\count@ \divide\@tempcnta28 \multiply\@tempcnta28 \advance\count@-\@tempcnta \advance\count@"11A7 \else\ifnum\count@<"FF00 \else\ifnum\count@<"FF5B \advance\count@-"FEE0 \fi\fi\fi\fi\fi \fi \ifnum\count@<"11A8 \ifnum "30=\count@ \count@\z@ % 0 \else\ifnum "31=\count@ \count@\@ne % 1 \else\ifnum "33=\count@ \count@\z@ % 3 \else\ifnum "36=\count@ \count@\z@ % 6 \else\ifnum "37=\count@ \count@\@ne % 7 \else\ifnum "38=\count@ \count@\@ne % 8 \else\ifnum "4C=\count@ \count@\@ne % L \else\ifnum "4D=\count@ \count@\z@ % M \else\ifnum "4E=\count@ \count@\z@ % N \else\ifnum "6C=\count@ \count@\@ne % l \else\ifnum "6D=\count@ \count@\z@ % m \else\ifnum "6E=\count@ \count@\z@ % n \fi\fi\fi\fi\fi \fi\fi\fi\fi\fi \fi\fi \else\ifnum\count@<"1200 \ifnum\count@="11AF \count@\@ne \else \count@\z@ \fi \else\ifnum\count@<"3131 \else\ifnum\count@<"318F \ifnum \count@="3139 \count@\@ne \else\ifnum\count@<"314F \count@\z@ \else\ifnum\count@>"3164 \ifnum\count@<"3187 \count@\z@ \fi \fi\fi\fi \else\ifnum\count@<"3200 \else\ifnum\count@<"321F \ifnum \count@="3203 \count@\@ne \else\ifnum\count@<"320E \count@\z@ \fi\fi \else\ifnum\count@<"D7CB \else\ifnum\count@<"D7FC \count@\z@ \fi\fi\fi\fi\fi \fi\fi\fi \ifcase\count@ #2% jong \or \ifx#1\empty\else#2\fi% rieul \else #1% jung \fi } \expandafter\def\expandafter\xpg@character@to@num\detokenize{the character} #1#2\relax{`#1\relax} \expandafter\def\expandafter\xpg@letter@to@num\detokenize{the letter} #1#2\relax{`#1\relax} \begingroup \catcode`A=11 \catcode`0=12 \global\let\xpg@catcode@letter=A \global\let\xpg@catcode@other=0 \endgroup % macros for interchartoks (Josa selection) \def\XPGKOstartID{\global\futurelet\XPGKO@let@josa\XPGKO@skipID} \def\XPGKOstartAA{\global\futurelet\XPGKO@let@josa\XPGKO@skipAA} \def\XPGKO@skipID{\XeTeXinterchartoks\XeTeXcharclassBoundary\XeTeXcharclassID{\empty}} \def\XPGKO@skipAA{\XeTeXinterchartoks\XeTeXcharclassBoundary\XPGKOcharclassAA{\empty}} \def\XPGKOstopID {\XeTeXinterchartoks\XeTeXcharclassBoundary\XeTeXcharclassID{\XPGKOstartID}} \def\XPGKOstopAA {\XeTeXinterchartoks\XeTeXcharclassBoundary\XPGKOcharclassAA{\XPGKOstartAA}} % macros for interchartoks (CJK punctuations) \def\XPGKOstartOP{\leavevmode\hbox to.5em\bgroup\hss}% \def\XPGKOstopOP {\egroup}% \def\XPGKOstartCL{\leavevmode\hbox to.5em\bgroup}% \def\XPGKOstopCL {\hss\egroup}% \let\XPGKOstartFS\XPGKOstartCL \let\XPGKOstopFS\XPGKOstopCL \let\XPGKOstartMD\XPGKOstartOP \let\XPGKOstopMD\XPGKOstopCL \let\XPGKOnobreak \nobreak \def\XPGKOhalfzero {\hskip \XPGKOhalfdim \relax}% \def\XPGKOhalfhalf {\hskip \XPGKOhalfdim minus \XPGKOhalfdim \relax}% \def\XPGKOhalfquarter {\hskip \XPGKOhalfdim minus.5\XPGKOhalfdim \relax}% \def\XPGKOquarterquarter {\hskip .5\XPGKOhalfdim minus.5\XPGKOhalfdim \relax}% \def\XPGKOiiiquarterquarter{\hskip1.5\XPGKOhalfdim minus.5\XPGKOhalfdim \relax}% \def\XPGKOlatincjk {\hskip .5\XPGKOhalfdim plus.25\XPGKOhalfdim minus.125\XPGKOhalfdim}% % user macro to force zero skip \let\inhibitglue\relax % initialize interchartoks and classes \ifdim\the\XeTeXversion\XeTeXrevision pt<0.99994pt \let\XeTeXcharclassIgnore \@cclvi \let\XeTeXcharclassBoundary\@cclv \else \chardef\XeTeXcharclassIgnore =4096 \chardef\XeTeXcharclassBoundary=4095 \fi \ifdefined\XeTeXcharclassID\else \ifdefined\xtxHanGlue \let\XeTeXcharclassID\@ne \let\XeTeXcharclassOP\tw@ \let\XeTeXcharclassCL\thr@@ \else % email from JW \newXeTeXintercharclass\XeTeXcharclassID \newXeTeXintercharclass\XeTeXcharclassOP \newXeTeXintercharclass\XeTeXcharclassCL \global\let\XeTeXcharclassCJ\XeTeXcharclassID \global\let\XeTeXcharclassEX\XeTeXcharclassCL \global\let\XeTeXcharclassIS\XeTeXcharclassCL \global\let\XeTeXcharclassNS\XeTeXcharclassCL \global\let\XeTeXcharclassCM\XeTeXcharclassIgnore \input load-unicode-xetex-classes % \fi \fi % assign Hangul \count@="AC00 \loop \XeTeXcharclass\count@\XeTeXcharclassID \ifnum\count@<"D7A3 \advance\count@\@ne \repeat \count@="1100 \loop \XeTeXcharclass\count@\XeTeXcharclassID \ifnum\count@<"11FF \advance\count@\@ne \repeat \count@="A960 \loop \XeTeXcharclass\count@\XeTeXcharclassID \ifnum\count@<"A97C \advance\count@\@ne \repeat \count@="D7B0 \loop \XeTeXcharclass\count@\XeTeXcharclassID \ifnum\count@<"D7FB \advance\count@\@ne \repeat % more classes \newXeTeXintercharclass\XPGKOcharclassMD % ・ : ; \newXeTeXintercharclass\XPGKOcharclassFS % 。 . \newXeTeXintercharclass\XPGKOcharclassLD % ― … ‥ \newXeTeXintercharclass\XPGKOcharclassEX % ? ! \newXeTeXintercharclass\XPGKOcharclassAO % ascii ( \newXeTeXintercharclass\XPGKOcharclassAC % ascii ) \newXeTeXintercharclass\XPGKOcharclassAA % ascii letters/numbers % unset all interchartoks \def\unsetvariantkoreaninterchartoks{% \@tfor\@tmpa :=\XeTeXcharclassID\XeTeXcharclassOP\XeTeXcharclassCL\XPGKOcharclassMD\XPGKOcharclassFS \XPGKOcharclassLD\XPGKOcharclassEX\XPGKOcharclassAO\XPGKOcharclassAC\XPGKOcharclassAA \do{\count@\XeTeXcharclassBoundary \loop \XeTeXinterchartoks\@tmpa\count@{}% \XeTeXinterchartoks\count@\@tmpa{}% \ifnum\count@=\XeTeXcharclassBoundary \count@\m@ne \fi \ifnum\count@<\xe@alloc@intercharclass \advance\count@\@ne \repeat }% } % interchartoks for classic/modern variants \def\setvariantkoreaninterchartoks{% \count@\XeTeXcharclassBoundary \loop \ifnum\count@=\XeTeXcharclassID\else \ifnum\count@=\XeTeXcharclassOP\else \ifnum\count@=\XeTeXcharclassCL\else \ifnum\count@=\XPGKOcharclassMD\else \ifnum\count@=\XPGKOcharclassFS\else \ifnum\count@=\XPGKOcharclassAA\else \XeTeXinterchartoks\count@\XeTeXcharclassID{\XPGKOstartID}% \XeTeXinterchartoks\count@\XeTeXcharclassOP{\XPGKOstartOP}% \XeTeXinterchartoks\count@\XeTeXcharclassCL{\XPGKOstartCL}% \XeTeXinterchartoks\count@\XPGKOcharclassMD{\XPGKOstartMD}% \XeTeXinterchartoks\count@\XPGKOcharclassFS{\XPGKOstartFS}% \XeTeXinterchartoks\count@\XPGKOcharclassAA{\XPGKOstartAA}% \XeTeXinterchartoks\XeTeXcharclassID\count@{\XPGKOstopID}% \XeTeXinterchartoks\XeTeXcharclassOP\count@{\XPGKOstopOP}% \XeTeXinterchartoks\XeTeXcharclassCL\count@{\XPGKOstopCL}% \XeTeXinterchartoks\XPGKOcharclassMD\count@{\XPGKOstopMD}% \XeTeXinterchartoks\XPGKOcharclassFS\count@{\XPGKOstopFS}% \XeTeXinterchartoks\XPGKOcharclassAA\count@{\XPGKOstopAA}% \fi\fi\fi\fi\fi\fi \ifnum\count@=\XeTeXcharclassBoundary \count@\m@ne \fi \ifnum\count@<\xe@alloc@intercharclass \advance\count@\@ne \repeat % \XeTeXinterchartoks\XPGKOcharclassAA\XeTeXcharclassID{\XPGKOstopAA\XPGKOlatincjk\XPGKOstartID}% \XeTeXinterchartoks\XPGKOcharclassAA\XeTeXcharclassOP{\XPGKOstopAA\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassAA\XeTeXcharclassCL{\XPGKOstopAA\XPGKOstartCL}% \XeTeXinterchartoks\XPGKOcharclassAA\XPGKOcharclassMD{\XPGKOstopAA\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XPGKOcharclassAA\XPGKOcharclassFS{\XPGKOstopAA\XPGKOstartFS}% \XeTeXinterchartoks\XPGKOcharclassAA\XPGKOcharclassAA{\XPGKOstartAA}% % \XeTeXinterchartoks\XeTeXcharclassID\XeTeXcharclassID{\XPGKOstartID}% \XeTeXinterchartoks\XeTeXcharclassID\XeTeXcharclassOP{\XPGKOstopID\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XeTeXcharclassID\XeTeXcharclassCL{\XPGKOstopID\XPGKOstartCL}% \XeTeXinterchartoks\XeTeXcharclassID\XPGKOcharclassMD{\XPGKOstopID\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XeTeXcharclassID\XPGKOcharclassFS{\XPGKOstopID\XPGKOstartFS}% \XeTeXinterchartoks\XeTeXcharclassID\XPGKOcharclassAO{\XPGKOstopID\XPGKOlatincjk}% \XeTeXinterchartoks\XeTeXcharclassID\XPGKOcharclassAA{\XPGKOstopID\XPGKOlatincjk\XPGKOstartAA}% % \XeTeXinterchartoks\XeTeXcharclassOP\XeTeXcharclassID{\XPGKOstopOP\XPGKOstartID}% \XeTeXinterchartoks\XeTeXcharclassOP\XeTeXcharclassOP{\XPGKOstopOP\XPGKOstartOP}% \XeTeXinterchartoks\XeTeXcharclassOP\XeTeXcharclassCL{\XPGKOstopOP\XPGKOstartCL}% \XeTeXinterchartoks\XeTeXcharclassOP\XPGKOcharclassMD{\XPGKOstopOP\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XeTeXcharclassOP\XPGKOcharclassFS{\XPGKOstopOP\XPGKOstartFS}% \XeTeXinterchartoks\XeTeXcharclassOP\XPGKOcharclassAA{\XPGKOstopOP\XPGKOstartAA}% % \XeTeXinterchartoks\XeTeXcharclassCL\XeTeXcharclassID{\XPGKOstopCL\XPGKOhalfhalf\XPGKOstartID}% \XeTeXinterchartoks\XeTeXcharclassCL\XeTeXcharclassOP{\XPGKOstopCL\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XeTeXcharclassCL\XeTeXcharclassCL{\XPGKOstopCL\XPGKOstartCL}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassMD{\XPGKOstopCL\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassFS{\XPGKOstopCL\XPGKOstartFS}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassLD{\XPGKOstopCL\XPGKOnobreak\XPGKOhalfhalf}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassEX{\XPGKOstopCL\XPGKOnobreak\XPGKOhalfhalf}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassAO{\XPGKOstopCL\XPGKOhalfhalf}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassAC{\XPGKOstopCL\XPGKOnobreak\XPGKOhalfhalf}% \XeTeXinterchartoks\XeTeXcharclassCL\XPGKOcharclassAA{\XPGKOstopCL\XPGKOhalfhalf\XPGKOstartAA}% % \XeTeXinterchartoks\XPGKOcharclassMD\XeTeXcharclassID{\XPGKOstopMD\XPGKOquarterquarter\XPGKOstartID}% \XeTeXinterchartoks\XPGKOcharclassMD\XeTeXcharclassOP{\XPGKOstopMD\XPGKOquarterquarter\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassMD\XeTeXcharclassCL{\XPGKOstopMD\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartCL}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassMD{\XPGKOstopMD\XPGKOnobreak\XPGKOhalfquarter\XPGKOstartMD}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassFS{\XPGKOstopMD\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartFS}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassLD{\XPGKOstopMD\XPGKOnobreak\XPGKOquarterquarter}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassEX{\XPGKOstopMD\XPGKOnobreak\XPGKOquarterquarter}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassAO{\XPGKOstopMD\XPGKOquarterquarter}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassAC{\XPGKOstopMD\XPGKOnobreak\XPGKOquarterquarter}% \XeTeXinterchartoks\XPGKOcharclassMD\XPGKOcharclassAA{\XPGKOstopMD\XPGKOquarterquarter\XPGKOstartAA}% % \XeTeXinterchartoks\XPGKOcharclassFS\XeTeXcharclassID{\XPGKOstopFS\XPGKOhalfzero\XPGKOstartID}% \XeTeXinterchartoks\XPGKOcharclassFS\XeTeXcharclassOP{\XPGKOstopFS\XPGKOhalfzero\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassFS\XeTeXcharclassCL{\XPGKOstopFS\XPGKOstartCL}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassMD{\XPGKOstopFS\XPGKOnobreak\XPGKOiiiquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassFS{\XPGKOstopFS\XPGKOstartFS}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassLD{\XPGKOstopFS\XPGKOnobreak\XPGKOhalfzero}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassEX{\XPGKOstopFS\XPGKOnobreak\XPGKOhalfzero}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassAO{\XPGKOstopFS\XPGKOhalfzero}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassAC{\XPGKOstopFS\XPGKOnobreak\XPGKOhalfzero}% \XeTeXinterchartoks\XPGKOcharclassFS\XPGKOcharclassAA{\XPGKOstopFS\XPGKOhalfzero\XPGKOstartAA}% % \XeTeXinterchartoks\XPGKOcharclassLD\XeTeXcharclassOP{\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassLD\XPGKOcharclassMD{\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% % \XeTeXinterchartoks\XPGKOcharclassEX\XeTeXcharclassID{\XPGKOhalfhalf\XPGKOstartID}% \XeTeXinterchartoks\XPGKOcharclassEX\XeTeXcharclassOP{\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassEX\XPGKOcharclassMD{\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% \XeTeXinterchartoks\XPGKOcharclassEX\XPGKOcharclassAO{\XPGKOhalfhalf}% \XeTeXinterchartoks\XPGKOcharclassEX\XPGKOcharclassAC{\XPGKOnobreak\XPGKOhalfhalf}% \XeTeXinterchartoks\XPGKOcharclassEX\XPGKOcharclassAA{\XPGKOhalfhalf\XPGKOstartAA}% % \XeTeXinterchartoks\XPGKOcharclassAO\XeTeXcharclassOP{\XPGKOnobreak\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassAO\XPGKOcharclassMD{\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% % \XeTeXinterchartoks\XPGKOcharclassAC\XeTeXcharclassID{\XPGKOlatincjk\XPGKOstartID}% \XeTeXinterchartoks\XPGKOcharclassAC\XeTeXcharclassOP{\XPGKOhalfhalf\XPGKOstartOP}% \XeTeXinterchartoks\XPGKOcharclassAC\XPGKOcharclassMD{\XPGKOnobreak\XPGKOquarterquarter\XPGKOstartMD}% } % char classes for classic/modern variants \def\setvariantkoreancharclasses{} \def\unsetvariantkoreancharclasses{} \def\@tmpa#1=#2{% \edef\setvariantkoreancharclasses{% \unexpanded\expandafter{\setvariantkoreancharclasses \XeTeXcharclass#1=#2}}% \edef\unsetvariantkoreancharclasses{% \noexpand\XeTeXcharclass#1=\the\XeTeXcharclass#1\relax \unexpanded\expandafter{\unsetvariantkoreancharclasses}}% } \count@"30 \loop % 0 .. 9 \expandafter\@tmpa\the\count@=\XPGKOcharclassAA \ifnum\count@<"39 \advance\count@\@ne \repeat \count@"41 \loop % A .. Z \expandafter\@tmpa\the\count@=\XPGKOcharclassAA \ifnum\count@<"5A \advance\count@\@ne \repeat \count@"61 \loop % a .. z \expandafter\@tmpa\the\count@=\XPGKOcharclassAA \ifnum\count@<"7A \advance\count@\@ne \repeat % NS \@tmpa "3005=\XeTeXcharclassID % 々 IDEOGRAPHIC ITERATION MARK \@tmpa "301C=\XeTeXcharclassID % 〜 WAVE DASH \@tmpa "303B=\XeTeXcharclassID % 〻 VERTICAL IDEOGRAPHIC ITERATION MARK \@tmpa "303C=\XeTeXcharclassID % 〼 MASU MARK \@tmpa "309B=\XeTeXcharclassID % ゛ KATAKANA-HIRAGANA VOICED SOUND MARK \@tmpa "309C=\XeTeXcharclassID % ゜ KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK \@tmpa "309D=\XeTeXcharclassID % ゝ HIRAGANA ITERATION MARK \@tmpa "309E=\XeTeXcharclassID % ゞ HIRAGANA VOICED ITERATION MARK \@tmpa "30A0=\XeTeXcharclassID % ゠ KATAKANA-HIRAGANA DOUBLE HYPHEN \@tmpa "30FD=\XeTeXcharclassID % ヽ KATAKANA ITERATION MARK \@tmpa "30FE=\XeTeXcharclassID % ヾ KATAKANA VOICED ITERATION MARK \@tmpa "A015=\XeTeXcharclassID % ꀕ YI SYLLABLE ITERATION MARK \@tmpa "FF9E=\XeTeXcharclassID % ゙ HALFWIDTH KATAKANA VOICED SOUND MARK \@tmpa "FF9F=\XeTeXcharclassID % ゚ HALFWIDTH KATAKANA SEMI-VOICED SOUND MARK % IS \@tmpa "FE13=\XeTeXcharclassID % ︓ PRESENTATION FORM FOR VERTICAL COLON \@tmpa "FE14=\XeTeXcharclassID % ︔ PRESENTATION FORM FOR VERTICAL SEMICOLON % CJ \ifnum\the\XeTeXcharclass"3041=\XeTeXcharclassID \else \@tmpa "3041=\XeTeXcharclassID % ぁ HIRAGANA LETTER SMALL A \@tmpa "3043=\XeTeXcharclassID % ぃ HIRAGANA LETTER SMALL I \@tmpa "3045=\XeTeXcharclassID % ぅ HIRAGANA LETTER SMALL U \@tmpa "3047=\XeTeXcharclassID % ぇ HIRAGANA LETTER SMALL E \@tmpa "3049=\XeTeXcharclassID % ぉ HIRAGANA LETTER SMALL O \@tmpa "3063=\XeTeXcharclassID % っ HIRAGANA LETTER SMALL TU \@tmpa "3083=\XeTeXcharclassID % ゃ HIRAGANA LETTER SMALL YA \@tmpa "3085=\XeTeXcharclassID % ゅ HIRAGANA LETTER SMALL YU \@tmpa "3087=\XeTeXcharclassID % ょ HIRAGANA LETTER SMALL YO \@tmpa "308E=\XeTeXcharclassID % ゎ HIRAGANA LETTER SMALL WA \@tmpa "3095=\XeTeXcharclassID % ゕ HIRAGANA LETTER SMALL KA \@tmpa "3096=\XeTeXcharclassID % ゖ HIRAGANA LETTER SMALL KE \@tmpa "30A1=\XeTeXcharclassID % ァ KATAKANA LETTER SMALL A \@tmpa "30A3=\XeTeXcharclassID % ィ KATAKANA LETTER SMALL I \@tmpa "30A5=\XeTeXcharclassID % ゥ KATAKANA LETTER SMALL U \@tmpa "30A7=\XeTeXcharclassID % ェ KATAKANA LETTER SMALL E \@tmpa "30A9=\XeTeXcharclassID % ォ KATAKANA LETTER SMALL O \@tmpa "30C3=\XeTeXcharclassID % ッ KATAKANA LETTER SMALL TU \@tmpa "30E3=\XeTeXcharclassID % ャ KATAKANA LETTER SMALL YA \@tmpa "30E5=\XeTeXcharclassID % ュ KATAKANA LETTER SMALL YU \@tmpa "30E7=\XeTeXcharclassID % ョ KATAKANA LETTER SMALL YO \@tmpa "30EE=\XeTeXcharclassID % ヮ KATAKANA LETTER SMALL WA \@tmpa "30F5=\XeTeXcharclassID % ヵ KATAKANA LETTER SMALL KA \@tmpa "30F6=\XeTeXcharclassID % ヶ KATAKANA LETTER SMALL KE \@tmpa "30FC=\XeTeXcharclassID % ー KATAKANA-HIRAGANA PROLONGED SOUND MARK \count@"31F0 \loop \expandafter\@tmpa\the\count@=\XeTeXcharclassID \ifnum\count@<"31FF \advance\count@\@ne \repeat \count@"FF67 \loop \expandafter\@tmpa\the\count@=\XeTeXcharclassID \ifnum\count@<"FF70 \advance\count@\@ne \repeat \fi % \@tmpa "28=\XPGKOcharclassAO % ( LEFT PARENTHESIS \@tmpa "5B=\XPGKOcharclassAO % [ LEFT SQUARE BRACKET \@tmpa "60=\XPGKOcharclassAO % ` GRAVE ACCENT \@tmpa "7B=\XPGKOcharclassAO % { LEFT CURLY BRACKET \@tmpa "AB=\XPGKOcharclassAO % « LEFT-POINTING DOUBLE ANGLE QUOTATION MARK % \@tmpa "21=\XPGKOcharclassAC % ! EXCLAMATION MARK \@tmpa "27=\XPGKOcharclassAC % ' APOSTROPHE \@tmpa "29=\XPGKOcharclassAC % ) RIGHT PARENTHESIS \@tmpa "2C=\XPGKOcharclassAC % , COMMA \@tmpa "2E=\XPGKOcharclassAC % . FULL STOP \@tmpa "3B=\XPGKOcharclassAC % ; SEMICOLON \@tmpa "3F=\XPGKOcharclassAC % ? QUESTION MARK \@tmpa "5D=\XPGKOcharclassAC % ] RIGHT SQUARE BRACKET \@tmpa "7D=\XPGKOcharclassAC % } RIGHT CURLY BRACKET \@tmpa "BB=\XPGKOcharclassAC % » RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK % \@tmpa "2018=\XeTeXcharclassOP % ‘ LEFT SINGLE QUOTATION MARK \@tmpa "201C=\XeTeXcharclassOP % “ LEFT DOUBLE QUOTATION MARK % \@tmpa "2019=\XeTeXcharclassCL % ’ RIGHT SINGLE QUOTATION MARK \@tmpa "201D=\XeTeXcharclassCL % ” RIGHT DOUBLE QUOTATION MARK % NS \@tmpa "00B7=\XPGKOcharclassMD % · MIDDLE DOT \@tmpa "30FB=\XPGKOcharclassMD % ・ KATAKANA MIDDLE DOT \@tmpa "FE54=\XPGKOcharclassMD % ﹔ SMALL SEMICOLON \@tmpa "FE55=\XPGKOcharclassMD % ﹕ SMALL COLON \@tmpa "FF1A=\XPGKOcharclassMD % : FULLWIDTH COLON \@tmpa "FF1B=\XPGKOcharclassMD % ; FULLWIDTH SEMICOLON \@tmpa "FF65=\XPGKOcharclassMD % ・ HALFWIDTH KATAKANA MIDDLE DOT % \@tmpa "3002=\XPGKOcharclassFS % 。 IDEOGRAPHIC FULL STOP \@tmpa "FE12=\XPGKOcharclassFS % ︒ PRESENTATION FORM FOR VERTICAL IDEOGRAPHIC FULL STOP \@tmpa "FE52=\XPGKOcharclassFS % ﹒ SMALL FULL STOP \@tmpa "FF0E=\XPGKOcharclassFS % . FULLWIDTH FULL STOP \@tmpa "FF61=\XPGKOcharclassFS % 。 HALFWIDTH IDEOGRAPHIC FULL STOP % \@tmpa "2014=\XPGKOcharclassLD % — EM DASH \@tmpa "2015=\XPGKOcharclassLD % ― HORIZONTAL BAR \@tmpa "2025=\XPGKOcharclassLD % ‥ TWO DOT LEADER \@tmpa "2026=\XPGKOcharclassLD % … HORIZONTAL ELLIPSIS % EX \@tmpa "FE15=\XPGKOcharclassEX % ︕ PRESENTATION FORM FOR VERTICAL EXCLAMATION MARK \@tmpa "FE16=\XPGKOcharclassEX % ︖ PRESENTATION FORM FOR VERTICAL QUESTION MARK \@tmpa "FE56=\XPGKOcharclassEX % ﹖ SMALL QUESTION MARK \@tmpa "FE57=\XPGKOcharclassEX % ﹗ SMALL EXCLAMATION MARK \@tmpa "FF01=\XPGKOcharclassEX % ! FULLWIDTH EXCLAMATION MARK \@tmpa "FF1F=\XPGKOcharclassEX % ? FULLWIDTH QUESTION MARK % vim:ft=tex:tw=0:sw=4:ts=4:expandtab