diff options
Diffstat (limited to 'Master/texmf-dist/source/platex/base/plfonts.dtx')
-rw-r--r-- | Master/texmf-dist/source/platex/base/plfonts.dtx | 1884 |
1 files changed, 1884 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/platex/base/plfonts.dtx b/Master/texmf-dist/source/platex/base/plfonts.dtx new file mode 100644 index 00000000000..02b21a3d17e --- /dev/null +++ b/Master/texmf-dist/source/platex/base/plfonts.dtx @@ -0,0 +1,1884 @@ +% \iffalse meta-comment +%% File: plfonts.dtx +% +% Copyright 1994-2006 ASCII Corporation. +% +% This file is part of pLaTeX2e system. +% ------------------------------------- +% +% \fi +% +% \CheckSum{1685} +%% \CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +%% +% +% \setcounter{StandardModuleDepth}{1} +% \StopEventually{} +% +% \iffalse +% \changes{v1.0}{1994/09/16}{first edition} +% \changes{v1.1}{1995/02/21}{\cs{selectfont}$B%"%k%4%j%:%`JQ99(B} +% \changes{v1.1b}{1995/04/25}{\cs{selectfont}$B=$@5(B} +% \changes{v1.1c}{1995/08/22}{$B=D2#%U%)%s%HF1;~@Z$jBX$((B} +% \changes{v1.2}{1995/11/09}{\cs{DeclareFixedFont}$B$NF|K\8l2=(B} +% \changes{v1.3}{1996/03/25}{$B?t<0%U%!%_%j$NDj5AJQ99(B} +% \changes{v1.3a}{1997/01/25}{\LaTeX\ \texttt{!<1996/12/01!>$B$KBP1~(B}} +% \changes{v1.3b}{1997/01/28}{\cs{textmc}, \cs{textgt}$B$NF0:n=$@5(B} +% \changes{v1.3c}{1997/04/08}{$BOBJ8%(%s%3!<%I4XO"$N=$@5(B} +% \changes{v1.3d}{1997/06/25}{\cs{em},\cs{emph}$B$GOBJ8$r6/D4=qBN$K(B} +% \changes{v1.3e}{1997/07/10}{fd$B%U%!%$%kL>$N>.J8;z2=$,8z$$$F$$$J$+$C$?$N$r=$@5(B} +% \changes{v1.3f}{1998/08/10}{\cs{DeclareFixedCommand}$B$r(B\cs{@onlypreamble}$B$K(B +% $B$7$F$7$^$C$F$$$?$N$r=$@5(B} +% \changes{v1.3g}{1999/04/05}{plpatch.ltx$B$NFbMF$rH?1G(B} +% \changes{v1.3h}{1999/08/09}{\cs{strut}$B$N2~A1(B} +% \changes{v1.3i}{2000/07/13}{\cs{text..}$B%3%^%s%I$N:8B&$K(B\cs{xkanjiskip}$B$,(B +% $BF~$i$J$$$N$r=$@5(B} +% \changes{v1.3j}{2000/10/24}{\cs{adjustbaseline}$B$GM>J,$J%"%-$,F~$i$J$$(B +% $B$h$&$K$7$?(B} +% \changes{v1.3k}{2001/05/10}{\cs{adjustbaseline}$B$ND4@0NL(B} +% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}$B$G%U%)%s%H$N4p=`CM$,=D=q$-(B +% $B0J30$G$O@_Dj$5$l$J$$$N$r=$@5(B} +% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}$B%3%^%s%IFbIt%U%i%0JQ99(B} +% \changes{v1.3n}{2004/08/10}{$BOBJ8%(%s%3!<%G%#%s%0$N@Z$jBX$($rM-8z2=(B} +% \changes{v1.3o}{2005/01/04}{\cs{fontfamily}$BCf$N%U%i%0=$@5(B} +% \changes{v1.3p}{2006/01/04}{\cs{DeclareFontEncoding@}$BCf$G(B +% \cs{LastDeclaredEncodeng}$B$N:FDj5A$,H4$1$F$$$?$N$GDI2C(B} +% \changes{v1.4}{2006/06/27}{\cs{reDeclareMathAlphabet}$B$r=$@5!#(B +% $B$"$j$,$H$&!"(Bymt$B$5$s!#(B} +% \changes{v1.5}{2006/11/10}{\cs{reDeclareMathAlphabet}$B$r=$@5!#(B +% $B$"$j$,$H$&!"(Bymt$B$5$s!#(B} +% \fi +% +% \iffalse +%<*driver> +\NeedsTeXFormat{pLaTeX2e} +% \fi +\ProvidesFile{plfonts.dtx}[2006/11/10 v1.5 pLaTeX New Font Selection Scheme] +% \iffalse +\documentclass{jltxdoc} +\GetFileInfo{plfonts.dtx} +\title{p\LaTeXe{}$B$N%U%)%s%H%3%^%s%I(B\space\fileversion} +\author{Ken Nakano \& Hideaki Togashi} +\date{$B:n@.F|!'(B\filedate} +\begin{document} + \maketitle + \tableofcontents + \DocInput{\filename} +\end{document} +%</driver> +% \fi +% +% \section{$B35MW(B}\label{plfonts:intro} +% $B$3$3$G$O!"OBJ8=qBN$r(B\NFSS2$B$N%$%s%?!<%U%'%$%9$GA*Br$9$k$?$a$N(B +% $B%3%^%s%I$d%^%/%m$K$D$$$F@bL@$r$7$F$$$^$9!#(B +% $B$^$?!"%U%)%s%HDj5A%U%!%$%k$d=i4|@_Dj%U%!%$%k$J$I$N@bL@$b$7$F$$$^$9!#(B +% $B?7$7$$%U%)%s%HA*Br%3%^%s%I$N;H$$J}$K$D$$$F$O!"(B\file{fntguide.tex}$B$d(B +% \file{usrguide.tex}$B$r;2>H$7$F$/$@$5$$!#(B +% +% \begin{description} +% \item[$BBh(B\ref{plfonts:intro}$B@a(B] $B$3$N@a$G$9!#$3$N%U%!%$%k$N35MW$H(B +% \dst{}$B%W%m%0%i%`$N$?$a$N%*%W%7%g%s$r<($7$F$$$^$9!#(B +% \item[$BBh(B\ref{plfonts:codes}$B@a(B] $B<B:]$N%3!<%I$NItJ,$G$9!#(B +% \item[$BBh(B\ref{plfonts:pldefs}$B@a(B] $B%W%j%m!<%I%U%)%s%H$d%(%i!<%U%)%s%H$J$I$N(B +% $B=i4|@_Dj$K$D$$$F@bL@$r$7$F$$$^$9!#(B +% \item[$BBh(B\ref{plfonts:fontdef}$B@a(B] $B%U%)%s%HDj5A%U%!%$%k$K$D$$$F(B +% $B@bL@$r$7$F$$$^$9!#(B +% \end{description} +% +% +% \subsection{\dst{}$B%W%m%0%i%`$N$?$a$N%*%W%7%g%s(B} +% \dst{}$B%W%m%0%i%`$N$?$a$N%*%W%7%g%s$r<!$K<($7$^$9!#(B +% +% \DeleteShortVerb{\|} +% \begin{center} +% \begin{tabular}{l|p{0.7\linewidth}} +% \emph{$B%*%W%7%g%s(B} & \emph{$B0UL#(B}\\\hline +% plcore & \file{plfonts.ltx}$B$r@8@.$7$^$9!#(B\\ +% trace & \file{ptrace.sty}$B$r@8@.$7$^$9!#(B\\ +% JY1mc & $B2#AHMQ!"L@D+BN$N%U%)%s%HDj5A%U%!%$%k$r@8@.$7$^$9!#(B\\ +% JY1gt & $B2#AHMQ!"%4%7%C%/BN$N%U%)%s%HDj5A%U%!%$%k$r@8@.$7$^$9!#(B\\ +% JT1mc & $B=DAHMQ!"L@D+BN$N%U%)%s%HDj5A%U%!%$%k$r@8@.$7$^$9!#(B\\ +% JT1gt & $B=DAHMQ!"%4%7%C%/BN$N%U%)%s%HDj5A%U%!%$%k$r@8@.$7$^$9!#(B\\ +% pldefs & \file{pldefs.ltx}$B$r@8@.$7$^$9!#<!$N#4$D$N%*%W%7%g%s$rIU2C$9$k(B +% $B$3$H$G!"%W%j%m!<%I$9$k%U%)%s%H$rA*Br$9$k$3$H$,$G$-$^$9!#(B +% $B%G%U%)%k%H$O(B10pt$B$G$9!#(B\\ +% xpt & 10pt $B%W%j%m!<%I(B\\ +% xipt & 11pt $B%W%j%m!<%I(B\\ +% xiipt & 12pt $B%W%j%m!<%I(B\\ +% ori & \file{plfonts.tex}$B$K;w$?%W%j%m!<%I(B\\ +% \end{tabular} +% \end{center} +% \MakeShortVerb{\|} +% +% +% +% \section{$B%3!<%I(B}\label{plfonts:codes} +% $B$3$N@a$G!"6qBNE*$K(B\NFSS2$B$r3HD%$9$k%3%^%s%I$d%^%/%m$NDj5A$r9T$J$C$F$$$^$9!#(B +% +% \subsection{$B=`Hw(B} +% \NFSS2$B$r3HD%$9$k$?$a$N=`Hw$G$9!#(B +% $BOBJ8%U%)%s%H$NB0@-$r3JG<$9$k%*%V%8%'%/%H$dD9$5JQ?t!"(B +% $BB0@-$r@ZBX$($k:]$NH=CG:`NA$H$7$F;H$&%j%9%H$J$I$rDj5A$7$F$$$^$9!#(B +% +% +% \subsubsection{$BOBJ8%U%)%s%HB0@-(B} +% $B$3$3$G$O!"OBJ8%U%)%s%H$NB0@-$r3JG<$9$k$?$a$N%*%V%8%'%/%H$K$D$$$F(B +% $B@bL@$r$7$F$$$^$9!#(B +% +% \begin{macro}{\k@encoding} +% \begin{macro}{\ck@encoding} +% \begin{macro}{\cy@encoding} +% \begin{macro}{\ct@encoding} +% $BOBJ8%(%s%3!<%I$r<($9%*%V%8%'%/%H$G$9!#(B +% |\ck@encoding|$B$O!":G8e$KA*Br$5$l$?OBJ8%(%s%3!<%IL>$r<($7$F$$$^$9!#(B +% |\cy@encoding|$B$H(B|\ct@encoding|$B$O$=$l$>$l!":G8e$KA*Br$5$l$?!"(B +% $B2#AHMQ$H=DAHMQ$NOBJ8%(%s%3!<%IL>$r<($7$F$$$^$9!#(B +% \begin{macrocode} +%<*plcore> +\let\k@encoding\@empty +\let\ck@encoding\@empty +\def\cy@encoding{JY1} +\def\ct@encoding{JT1} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\k@family} +% $BOBJ8=qBN$N%U%!%_%j$r<($9%*%V%8%'%/%H$G$9!#(B +% \begin{macrocode} +\let\k@family\@empty +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\k@series} +% $BOBJ8=qBN$N%7%j!<%:$r<($9%*%V%8%'%/%H$G$9!#(B +% \begin{macrocode} +\let\k@series\@empty +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\k@shape} +% $BOBJ8=qBN$N%7%'%$%W$r<($9%*%V%8%'%/%H$G$9!#(B +% \begin{macrocode} +\let\k@shape\@empty +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\curr@kfontshape} +% $B8=:_$NOBJ8%U%)%s%HL>$r<($9%*%V%8%'%/%H$G$9!#(B +% \begin{macrocode} +\def\curr@kfontshape{\k@encoding/\k@family/\k@series/\k@shape} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\rel@fontshape} +% $B4XO"IU$1$5$l$?%U%)%s%HL>$r<($9%*%V%8%'%/%H$G$9!#(B +% \begin{macrocode} +\def\rel@fontshape{\f@encoding/\f@family/\f@series/\f@shape} +% \end{macrocode} +% \end{macro} +% +% \subsubsection{$BD9$5JQ?t(B} +% $B$3$3$G$O!"OBJ8%U%)%s%H$NI}$d9b$5$J$I$r3JG<$9$kJQ?t$K$D$$$F@bL@$r$7$F$$$^$9!#(B +% +% $BF,J8;z$,BgJ8;z$NJQ?t$O!"%N!<%^%k%5%$%:$N=qBN$NBg$-$5$G!"4p=`CM$H$J$j$^$9!#(B +% $B$3$l$i$O!"(B\file{jart10.clo}$B$J$I$NJd=u%/%i%9%U%!%$%k$G@_Dj$5$l$^$9!#(B +% +% $B>.J8;z$@$1$+$i$J$kJQ?t$O!"(B +% $B%U%)%s%H$,JQ99$5$l$?$H$-$K!J(B|\selectfont|$BFb$G!K99?7$5$l$^$9!#(B +% +% \begin{macro}{\Cht} +% \begin{macro}{\cht} +% |\Cht|$B$O4p=`$H$J$kOBJ8%U%)%s%H$NJ8;z$N9b$5$r<($7$^$9!#(B +% |\cht|$B$O8=:_$NOBJ8%U%)%s%H$NJ8;z$N9b$5$r<($7$^$9!#(B +% $B$J$*!"$3$N(B``$B9b$5(B''$B$O%Y!<%9%i%$%s$h$j>e$ND9$5$G$9!#(B +% \begin{macrocode} +\newdimen\Cht +\newdimen\cht +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Cdp} +% \begin{macro}{\cdp} +% |\Cdp|$B$O4p=`$H$J$kOBJ8%U%)%s%H$NJ8;z$N?<$5$r<($7$^$9!#(B +% |\cdp|$B$O8=:_$NOBJ8%U%)%s%H$NJ8;z$N?<$5$r<($7$^$9!#(B +% $B$J$*!"$3$N(B``$B?<$5(B''$B$O%Y!<%9%i%$%s$h$j2<$ND9$5$G$9!#(B +% \begin{macrocode} +\newdimen\Cdp +\newdimen\cdp +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Cwd} +% \begin{macro}{\cwd} +% |\Cwd|$B$O4p=`$H$J$kOBJ8%U%)%s%H$NJ8;z$NI}$r<($7$^$9!#(B +% |\cwd|$B$O8=:_$NOBJ8%U%)%s%H$NJ8;z$NI}$r<($7$^$9!#(B +% \begin{macrocode} +\newdimen\Cwd +\newdimen\cwd +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Cvs} +% \begin{macro}{\cvs} +% |\Cvs|$B$O4p=`$H$J$k9TAw$j$r<($7$^$9!#(B +% $B%N!<%^%k%5%$%:$N(B|\baselineskip|$B$HF1CM$G$9!#(B +% |\cvs|$B$O8=:_$N9TAw$j$r<($7$^$9!#(B +% \begin{macrocode} +\newdimen\Cvs +\newdimen\cvs +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Chs} +% \begin{macro}{\chs} +% |\Chs|$B$O4p=`$H$J$k;zAw$j$r<($7$^$9!#(B|\Cwd|$B$HF1CM$G$9!#(B +% |\chs|$B$O8=:_$N;zAw$j$r<($7$^$9!#(B +% \begin{macrocode} +\newdimen\Chs +\newdimen\chs +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\cHT} +% |\cHT|$B$O!"8=:_$N%U%)%s%H$N9b$5$K?<$5$r2C$($?D9$5$r<($7$^$9!#(B +% |\set@fontsize|$B%3%^%s%I!J<B:]$O(B|\size@update|$B!K$G99?7$5$l$^$9!#(B +% \begin{macrocode} +\newdimen\cHT +% \end{macrocode} +% \end{macro} +% +% \subsubsection{$B0l;~%3%^%s%I(B} +% +% \begin{macro}{\afont} +% \LaTeX{}$BFbIt$N(B|\do@subst@correction|$B%^%/%m$G$O!"(B +% |\fontname\font|$B$GJV$5$l$k30It%U%)%s%HL>$rMQ$$$F!"(B +% \LaTeX{}$B%U%)%s%HL>$rDj5A$7$F$$$^$9!#$7$?$,$C$F!"(B|\font|$B$r$=$N$^$^;H$&$H!"(B +% $BOBJ8%U%)%s%HL>$K2$J8$N30It%U%)%s%H$,EPO?$5$l$?$j!"(B +% $B=DAH%U%)%s%HL>$K2#AHMQ$N30It%U%)%s%H$,3d$jIU$1$i$l$?$j$7$^$9$N$G!"(B +% |\jfont|$B$+(B|\tfont|$B$rMQ$$$k$h$&$K$7$^$9!#(B +% |\afont|$B$O!"(B|\font|$B%3%^%s%I$NJ]B8MQ$G$9!#(B +% \begin{macrocode} +\let\afont\font +% \end{macrocode} +% \end{macro} +% +% +% \subsubsection{$B%U%)%s%H%j%9%H(B} +% $B$3$3$G$O!"%U%)%s%H$N%(%s%3!<%I$d%U%!%_%j$NL>A0$rEPO?$9$k%j%9%H$K$D$$$F(B +% $B@bL@$r$7$F$$$^$9!#(B +% +% p\LaTeXe{}$B$N(B\NFSS2$B$G$O!"0l$D$N%3%^%s%I$GOBJ8$+2$J8$N$$$:$l$+!"$"$k$$$ON>J}$r(B +% $BJQ99$9$k$?$a!"%3%^%s%I$K;XDj$5$l$?0z?t$,2?$r<($9$N$+$rH=CG$7$J$/$F$O(B +% $B$J$j$^$;$s!#$3$NH=CG:`NA$H$7$F!"%j%9%H$rMQ$$$^$9!#(B +% +% $B$3$N$H$-$N6qBNE*$JH=CG<j=g$K$D$$$F$O!"%(%s%3!<%IA*Br%3%^%s%I$d(B +% $B%U%!%_%jA*Br%3%^%s%I$J$I$NDj5A$r;2>H$7$F$/$@$5$$!#(B +% +% \begin{macro}{\inlist} +% $B<!$N%3%^%s%I$O!"%(%s%3!<%I$d%U%!%_%j$N%j%9%HFb$KBhFs0z?t$G;XDj$5$l$?J8;zNs(B +% $B$,$"$k$+$I$&$+$rD4$Y$k%^%/%m$G$9!#(B +% \begin{macrocode} +\def\inlist@#1#2{% + \def\in@@##1<#1>##2##3\in@@{% + \ifx\in@##2\in@false\else\in@true\fi}% + \in@@#2<#1>\in@\in@@} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\enc@elt} +% \begin{macro}{\fam@elt} +% |\enc@elt|$B$H(B|\fam@elt|$B$O!"EPO?$5$l$F$$$k%(%s%3!<%I$KBP$7$F!"(B +% $B$J$s$i$+$N=hM}$rC`<!E*$K9T$J$$$?$$$H$-$K;HMQ$9$k$3$H$,$G$-$^$9!#(B +% \begin{macrocode} +\def\fam@elt{\noexpand\fam@elt} +\def\enc@elt{\noexpand\enc@elt} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\fenc@list} +% \begin{macro}{\kenc@list} +% \begin{macro}{\kyenc@list} +% \begin{macro}{\ktenc@list} +% |\fenc@list|$B$K$O!"(B|\DeclareFontEncoding|$B%3%^%s%I$G@k8@$5$l$?%(%s%3!<%IL>$,(B +% $B3JG<$5$l$F$$$-$^$9!#(B +% +% |\kyenc@list|$B$K$O!"(B|\DeclareYokoKanjiEncoding|$B%3%^%s%I$G@k8@$5$l$?(B +% $B%(%s%3!<%IL>$,3JG<$5$l$F$$$-$^$9!#(B +% |\ktenc@list|$B$K$O!"(B|\DeclareTateKanjiEncoding|$B%3%^%s%I$G@k8@$5$l$?(B +% $B%(%s%3!<%IL>$,3JG<$5$l$F$$$-$^$9!#(B +% +% \changes{v1.1b}{1995/03/28}{$B%j%9%H$N=i4|CM$rJQ99(B} +% \changes{v1.1b}{1995/05/10}{$B%j%9%HFb$N6uGr$r:o=|(B} +% +% $B$3$3$G!"$3$l$i$N%j%9%H$K6qBNE*$JCM$rF~$l$F=i4|2=$r$9$k$N$O!"(B +% $B%j%9%H$K%(%s%3!<%I$NEPO?$r$9$k$h$&$K(B|\DeclareFontEncoding|$B$r:FDj5A(B +% $B$9$kA0$K!"2$J8%(%s%3!<%I$,@k8@$5$l$k$?$a!"%j%9%H$KEPO?$5$l$J$$$+$i$G$9!#(B +% \changes{v1.1}{1997/01/25}{Add TS1 encoding to the starting member of +% \cs{fenc@list}.} +% \begin{macrocode} +\def\fenc@list{\enc@elt<OML>\enc@elt<T1>\enc@elt<OT1>\enc@elt<OMS>% + \enc@elt<OMX>\enc@elt<TS1>\enc@elt<U>} +\let\kenc@list\@empty +\let\kyenc@list\@empty +\let\ktenc@list\@empty +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\kfam@list} +% \begin{macro}{\ffam@list} +% \begin{macro}{\notkfam@list} +% \begin{macro}{\notffam@list} +% |\kfam@list|$B$K$O!"(B|\DeclareKanjiFamily|$B%3%^%s%I$G@k8@$5$l$?%U%!%_%jL>$,(B +% $B3JG<$5$l$F$$$-$^$9!#(B +% +% |\ffam@list|$B$K$O!"(B|\DeclareFontFamily|$B%3%^%s%I$G@k8@$5$l$?%U%!%_%jL>$,(B +% $B3JG<$5$l$F$$$-$^$9!#(B +% +% |\notkfam@list|$B$K$O!"OBJ8%U%!%_%j$G$O$J$$$H?dB,$5$l$?%U%!%_%jL>$,(B +% $B3JG<$5$l$F$$$-$^$9!#$3$N%j%9%H$O(B|\fontfamily|$B%3%^%s%I$G:n@.$5$l$^$9!#(B +% +% |\notffam@list|$B$K$O2$J8%U%!%_%j$G$O$J$$$H?dB,$5$l$?%U%!%_%jL>$,(B +% $B3JG<$5$l$F$$$-$^$9!#$3$N%j%9%H$O(B|\fontfamily|$B%3%^%s%I$G:n@.$5$l$^$9!#(B +% +% \changes{v1.1b}{1995/03/28}{$B%j%9%H$N=i4|CM$rJQ99(B} +% \changes{v1.1b}{1995/05/10}{$B%j%9%HFb$N6uGr$r:o=|(B} +% +% $B$3$3$G!"$3$l$i$N%j%9%H$K6qBNE*$JCM$rF~$l$F=i4|2=$r$9$k$N$O!"(B +% $B%j%9%H$K%U%!%_%j$NEPO?$r$9$k$h$&$K!"(B|\DeclareFontFamily|$B$,(B +% $B:FDj5A$5$l$kA0$K!"$3$N%3%^%s%I$,;HMQ$5$l$k$?$a!"(B +% $B%j%9%H$KEPO?$5$l$J$$$+$i$G$9!#(B +% \begin{macrocode} +\def\kfam@list{\fam@elt<mc>\fam@elt<gt>} +\def\ffam@list{\fam@elt<cmr>\fam@elt<cmss>\fam@elt<cmtt>% + \fam@elt<cmm>\fam@elt<cmsy>\fam@elt<cmex>} +% \end{macrocode} +% \changes{v1.1c}{1996/03/06}{\cs{notkfam@list}$B$H(B\cs{notffam@list}$B$N(B +% $B=i4|CM$rJQ99(B} +% $B$D$.$NFs$D$N%j%9%H$N=i4|CM$H$7$F!">e5-$NCM$rMQ$$$^$9!#(B +% $B$3$l$i$N%U%!%_%jL>$O!"OBJ8$G$J$$$3$H!"2$J8$G$J$$$3$H$,$O$C$-$j$7$F$$$^$9!#(B +% \begin{macrocode} +\let\notkfam@list\ffam@list +\let\notffam@list\kfam@list +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \subsubsection{$B;YCl(B} +% $B9T4V$ND4@0$J$I$KMQ$$$k;YCl$G$9!#(B +% $B;YCl$N$b$H$H$J$k%\%C%/%9$NBg$-$5$O!"%U%)%s%H%5%$%:$,JQ99$5$l$k$?$S$K!"(B +% |\set@fontsize|$B%3%^%s%I$K$h$C$FJQ2=$7$^$9!#(B +% +% $B%U%)%s%H%5%$%:$,JQ99$5$l$?$H$-$K!"(B|\set@fontsize|$B%3%^%s%I$G99?7$5$l$^$9!#(B +% +% \begin{macro}{\tstrutbox} +% \begin{macro}{\zstrutbox} +% |\tstrutbox|$B$O9b$5$H?<$5$,#5BP#5!"(B +% |\zstrutbox|$B$O9b$5$H?<$5$,#7BP#3$N;YCl%\%C%/%9$H$J$j$^$9!#(B +% $B$3$l$i$O=DAH%\%C%/%9$N9T4V$ND4@0$J$I$K;H$$$^$9!#(B +% $B$J$*!"2#AH%\%C%/%9MQ$N;YCl$O(B|\strutbox|$B$G!"9b$5$H?<$5$,#7BP#3$H$J$C$F$$$^$9!#(B +% \begin{macrocode} +\newbox\tstrutbox +\newbox\zstrutbox +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\strut} +% \begin{macro}{\tstrut} +% \begin{macro}{\zstrut} +% |\strutbox|$B$O(B|\yoko|$B%G%#%l%/%7%g%s$GAH$^$l$F$$$^$9$N$G!"(B +% $B=DAH%\%C%/%9Fb$G(B|\unhcopy|$B$r$9$k$H%(%i!<$H$J$j$^$9!#(B +% $B$3$N%^%/%m$O(B\file{ltplain.dtx}$B$GDj5A$5$l$F$$$^$9!#(B +% +% \changes{v1.1c}{1995/08/24}{``\cs{centerling}~\cs{strut}''$B$NI}$,%<%m$K(B +% $B$J$C$F$7$^$&$N$r=$@5(B} +% \changes{v1.3h}{1999/08/09}{$B=DAH$N$H$-!"I}$N$"$k%\%C%/%9$K$J$C$F$7$^$&(B +% $B$N$r=$@5(B} +% \begin{macrocode} +\def\strut{\relax + \ifydir + \ifmmode\copy\strutbox\else\unhcopy\strutbox\fi + \else + \ifmmode\copy\tstrutbox\else\unhcopy\tstrutbox\fi + \fi} +\def\tstrut{\relax\hbox{\tate + \ifmmode\copy\tstrutbox\else\unhcopy\tstrutbox\fi}} +\def\zstrut{\relax\hbox{\tate + \ifmmode\copy\zstrutbox\else\unhcopy\zstrutbox\fi}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% +% \subsection{$B%3%^%s%I(B} +% $B<!$N%3%^%s%I$NDj5A$r$7$F$$$^$9!#(B +% +% \DeleteShortVerb{\|} +% \MakeShortVerb{\+} +% \begin{center} +% \begin{tabular}{l|l} +% \emph{$B%3%^%s%I(B} & \emph{$B0UL#(B}\\\hline +% +\Declare{Font|YokoKanji|TateKanji}Encoding+ & $B%(%s%3!<%I$N@k8@(B\\ +% +\Declare{Yoko|Tate}KanjiEncodingDefaults+ & +% $B%G%U%)%k%H$NOBJ8%(%s%3!<%I$N@k8@(B\\ +% +\Declare{Font|Kanji}Family+ & $B%U%!%_%j$N@k8@(B\\ +% +\DeclareKanjiSubstitution+ & $BOBJ8$NBeMQ%U%)%s%H$N@k8@(B\\ +% +\DeclareErrorKanjiFont+ & $BOBJ8$N%(%i!<%U%)%s%H$N@k8@(B \\ +% +\DeclareFixedFont+ & $B%U%)%s%H$NL>A0$N@k8@(B \\ +% +\reDeclareMathAlphabet+ & $BOB2$J8$rF1;~$K@Z$jBX$($k%3%^%s%I@k8@(B\\ +% +\{Declare|Set}RelationFont+ & $B=>B0=qBN$N@k8@(B\\ +% +\userelfont+ & $B2$J8=qBN$r=>B0=qBN$K$9$k(B\\ +% +\selectfont+ & $B%U%)%s%H$r@Z$jBX$($k(B\\ +% +\set@fontsize+ & $B%U%)%s%H%5%$%:$NJQ99(B\\ +% +\adjustbaseline+ & $B%Y!<%9%i%$%s%7%U%HNL$N@_Dj(B\\ +% +\{font|roman|kanji}encoding+ & $B%(%s%3!<%I$N;XDj(B\\ +% +\{font|roman|kanji}family+ & $B%U%!%_%j$N;XDj(B\\ +% +\{font|roman|kanji}series+ & $B%7%j!<%:$N;XDj(B\\ +% +\{font|roman|kanji}shape+ & $B%7%'%$%W$N;XDj(B\\ +% +\use{font|roman|kanji}+ & $B=qBN$N@Z$jBX$((B\\ +% +\normalfont+ & $B%G%U%)%k%HCM$N@_Dj$K@Z$jBX$($k(B\\ +% +\mcfamily+,+\gtfamily+ & $BOBJ8=qBN$rL@D+BN!"%4%7%C%/BN$K$9$k(B\\ +% +\textunderscore+ & $B%F%-%9%H%b!<%I$G$N2<@~%^%/%m(B\\ +% \end{tabular} +% \end{center} +% \DeleteShortVerb{\+} +% \MakeShortVerb{\|} +% +% +% \begin{macro}{\DeclareFontEncoding} +% \begin{macro}{\DeclareFontEncoding@} +% $B2$J8%(%s%3!<%I$r@k8@$9$k$?$a$N%3%^%s%I$G$9!#(B +% \file{ltfssbas.dtx}$B$GDj5A$5$l$F$$$k$b$N$r!"(B +% |\fenc@list|$B$r:n$k$h$&$K:FDj5A$r$7$F$$$^$9!#(B +% \changes{v1.3p}{2006/01/04}{\cs{DeclareFontEncoding@}$BCf$G(B +% \cs{LastDeclaredEncodeng}$B$N:FDj5A$,H4$1$F$$$?$N$GDI2C(B} +% \begin{macrocode} +\def\DeclareFontEncoding{% + \begingroup + \nfss@catcodes + \expandafter\endgroup + \DeclareFontEncoding@} +% +\def\DeclareFontEncoding@#1#2#3{% + \expandafter + \ifx\csname T@#1\endcsname\relax + \def\cdp@elt{\noexpand\cdp@elt}% + \xdef\cdp@list{\cdp@list\cdp@elt{#1}% + {\default@family}{\default@series}% + {\default@shape}}% + \expandafter\let\csname#1-cmd\endcsname\@changed@cmd + \def\enc@elt{\noexpand\enc@elt}% + \xdef\fenc@list{\fenc@list\enc@elt<#1>}% + \else + \@font@info{Redeclaring font encoding #1}% + \fi + \global\@namedef{T@#1}{#2}% + \global\@namedef{M@#1}{\default@M#3}% + \xdef\LastDeclaredEncoding{#1}% + } +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\DeclareKanjiEncoding} +% \begin{macro}{\DeclareYokoKanjiEncoding} +% \begin{macro}{\DeclareYokoKanjiEncoding@} +% \begin{macro}{\DeclareTateKanjiEncoding} +% \begin{macro}{\DeclareTateKanjiEncoding@} +% $BOBJ8%(%s%3!<%I$N@k8@$r$9$k%3%^%s%I$G$9!#(B +% \changes{v1.3c}{1997/04/08}{$BOBJ8%(%s%3!<%I@k8@%3%^%s%I$r=DAHMQ$H2#AHMQ$G(B +% $BJ,$1$k$h$&$K$7$?!#(B} +% \begin{macrocode} +\def\DeclareKanjiEncoding#1{% + \@latex@warning{% + The \string\DeclareKanjiEncoding\space is obsoleted command. Please use + \MessageBreak + the \string\DeclareTateKanjiEncoding\space for `Tate-kumi' encoding, and + \MessageBreak + the \string\DeclareYokoKanjiEncoding\space for `Yoko-kumi' encoding. + \MessageBreak + I treat the `#1' encoding as `Yoko-kumi'.} + \DeclareYokoKanjiEncoding{#1}% +} +\def\DeclareYokoKanjiEncoding{% + \begingroup + \nfss@catcodes + \expandafter\endgroup + \DeclareYokoKanjiEncoding@} +% +\def\DeclareYokoKanjiEncoding@#1#2#3{% + \expandafter + \ifx\csname T@#1\endcsname\relax + \def\cdp@elt{\noexpand\cdp@elt}% + \xdef\cdp@list{\cdp@list\cdp@elt{#1}% + {\default@k@family}{\default@k@series}% + {\default@k@shape}}% + \expandafter\let\csname#1-cmd\endcsname\@changed@kcmd + \def\enc@elt{\noexpand\enc@elt}% + \xdef\kyenc@list{\kyenc@list\enc@elt<#1>}% + \xdef\kenc@list{\kenc@list\enc@elt<#1>}% + \else + \@font@info{Redeclaring KANJI (yoko) font encoding #1}% + \fi + \global\@namedef{T@#1}{#2}% + \global\@namedef{M@#1}{\default@KM#3}% + } +% +\def\DeclareTateKanjiEncoding{% + \begingroup + \nfss@catcodes + \expandafter\endgroup + \DeclareTateKanjiEncoding@} +% +\def\DeclareTateKanjiEncoding@#1#2#3{% + \expandafter + \ifx\csname T@#1\endcsname\relax + \def\cdp@elt{\noexpand\cdp@elt}% + \xdef\cdp@list{\cdp@list\cdp@elt{#1}% + {\default@k@family}{\default@k@series}% + {\default@k@shape}}% + \expandafter\let\csname#1-cmd\endcsname\@changed@kcmd + \def\enc@elt{\noexpand\enc@elt}% + \xdef\ktenc@list{\ktenc@list\enc@elt<#1>}% + \xdef\kenc@list{\kenc@list\enc@elt<#1>}% + \else + \@font@info{Redeclaring KANJI (tate) font encoding #1}% + \fi + \global\@namedef{T@#1}{#2}% + \global\@namedef{M@#1}{\default@KM#3}% + } +% +\@onlypreamble\DeclareKanjiEncoding +\@onlypreamble\DeclareYokoKanjiEncoding +\@onlypreamble\DeclareYokoKanjiEncoding@ +\@onlypreamble\DeclareTateKanjiEncoding +\@onlypreamble\DeclareTateKanjiEncoding@ +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\DeclareKanjiEncodingDefaults} +% $BOBJ8%(%s%3!<%I$N%G%U%)%k%HCM$r@k8@$9$k%3%^%s%I$G$9!#(B +% \begin{macrocode} +\def\DeclareKanjiEncodingDefaults#1#2{% + \ifx\relax#1\else + \ifx\default@KT\@empty\else + \@font@info{Overwriting KANJI encoding scheme text defaults}% + \fi + \gdef\default@KT{#1}% + \fi + \ifx\relax#2\else + \ifx\default@KM\@empty\else + \@font@info{Overwriting KANJI encoding scheme math defaults}% + \fi + \gdef\default@KM{#2}% + \fi} +\let\default@KT\@empty +\let\default@KM\@empty +\@onlypreamble\DeclareKanjiEncodingDefaults +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\DeclareFontFamily} +% $B2$J8%U%!%_%j$r@k8@$9$k$?$a$N%3%^%s%I$G$9!#(B +% |\ffam@list|$B$r:n$k$h$&$K:FDj5A$r$7$^$9!#(B +% \begin{macrocode} +\def\DeclareFontFamily#1#2#3{% + \@ifundefined{T@#1}% + {\@latex@error{Encoding scheme `#1' unknown}\@eha}% + {\edef\tmp@item{{#2}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\ffam@list}% + \ifin@ \else + \def\fam@elt{\noexpand\fam@elt}% + \xdef\ffam@list{\ffam@list\fam@elt<#2>}% + \fi + \def\reserved@a{#3}% + \global + \expandafter\let\csname #1+#2\expandafter\endcsname + \ifx \reserved@a\@empty + \@empty + \else \reserved@a + \fi + }% +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\DeclareKanjiFamily} +% $B2$J8%U%!%_%j$r@k8@$9$k$?$a$N%3%^%s%I$G$9!#(B +% \begin{macrocode} +\def\DeclareKanjiFamily#1#2#3{% + \@ifundefined{T@#1}% + {\@latex@error{KANJI Encoding scheme `#1' unknown}\@eha}% + {\edef\tmp@item{{#2}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kfam@list}% + \ifin@ \else + \def\fam@elt{\noexpand\fam@elt}% + \xdef\kfam@list{\kfam@list\fam@elt<#2>}% + \fi + \def\reserved@a{#3}% + \global + \expandafter\let\csname #1+#2\expandafter\endcsname + \ifx \reserved@a\@empty + \@empty + \else \reserved@a + \fi + }% +} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\DeclareKanjiSubstitution} +% \begin{macro}{\DeclareErrorKanjiFont} +% $BL\E*$NOBJ8%U%)%s%H$,8+$D$+$i$J$+$C$?$H$-$K;H$&%U%)%s%H$N@k8@$r$9$k(B +% $B%3%^%s%I$G$9!#(B +% $B$=$l$>$l!"(B|\DeclareFontSubstitution|$B$H(B|\DeclareErrorFont|$B$KBP1~$7$^$9!#(B +% \begin{macrocode} +\def\DeclareKanjiSubstitution#1#2#3#4{% + \expandafter\ifx\csname T@#1\endcsname\relax + \@latex@error{KANJI Encoding scheme `#1' unknown}\@eha + \else + \begingroup + \def\reserved@a{#1}% + \toks@{}% + \def\cdp@elt##1##2##3##4{% + \def\reserved@b{##1}% + \ifx\reserved@a\reserved@b + \addto@hook\toks@{\cdp@elt{#1}{#2}{#3}{#4}}% + \else + \addto@hook\toks@{\cdp@elt{##1}{##2}{##3}{##4}}% + \fi}% + \cdp@list + \xdef\cdp@list{\the\toks@}% + \endgroup + \global\@namedef{D@#1}{\def\default@family{#2}% + \def\default@series{#3}% + \def\default@shape{#4}}% + \fi} +% +\def\DeclareErrorKanjiFont#1#2#3#4#5{% + \xdef\error@kfontshape{% + \noexpand\expandafter\noexpand\split@name\noexpand\string + \expandafter\noexpand\csname#1/#2/#3/#4/#5\endcsname + \noexpand\@nil}% + \gdef\default@k@family{#2}% + \gdef\default@k@series{#3}% + \gdef\default@k@shape{#4}% + \global\let\k@family\default@k@family + \global\let\k@series\default@k@series + \global\let\k@shape\default@k@shape + \gdef\f@size{#5}% + \gdef\f@baselineskip{#5pt}} +% +\@onlypreamble\DeclareKanjiSubstitution +\@onlypreamble\DeclareErrorKanjiFont +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\DeclareFixedFont} +% $B%U%)%s%HL>$r@k8@$9$k%3%^%s%I$G$9!#(B +% +% \changes{v1.2}{1995/11/09}{\cs{DeclareFixedFont}$B$NF|K\8l2=(B} +% \changes{v1.3c}{1997/04/09}{$B=D2#%(%s%3!<%I!&%j%9%H$NJ,N%$K$h$k3HD%(B} +% \changes{v1.3f}{1998/08/10}{$B%W%j%"%s%V%k!&%3%^%s%I$K$7$F$7$^$C$F$$$?$N$r2r=|(B} +% \begin{macrocode} +\def\DeclareFixedFont#1#2#3#4#5#6{% + \begingroup + \let\afont\font + \math@fontsfalse + \every@math@size{}% + \fontsize{#6}\z@ + \edef\tmp@item{{#2}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kyenc@list}% + \ifin@ + \usekanji{#2}{#3}{#4}{#5}% + \let\font\jfont + \else + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\ktenc@list}% + \ifin@ + \usekanji{#2}{#3}{#4}{#5}% + \let\font\tfont + \else + \useroman{#2}{#3}{#4}{#5}% + \let\font\afont + \fi + \fi + \global\expandafter\let\expandafter#1\the\font + \let\font\afont + \endgroup + } +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\reDeclareMathAlphabet} +% \changes{v1.0}{1997/01/30}{\cs{reDeclareMathAlphabet}$B$rDI2C!#(B +% $B$"$j$,$H$&!"(Bymt$B$5$s!#(B} +% \changes{v1.4}{2006/06/27}{\cs{reDeclareMathAlphabet}$B$r=$@5!#(B +% $B$"$j$,$H$&!"(Bymt$B$5$s!#(B} +% \changes{v1.5}{2006/11/10}{\cs{reDeclareMathAlphabet}$B$r=$@5!#(B +% $B$"$j$,$H$&!"(Bymt$B$5$s!#(B} +% $B?t<0%b!<%IFb$G!"?t<0J8;zMQ$NOB2$J8%U%)%s%H$rF1;~$K@Z$jBX$($k%3%^%s%I$G$9!#(B +% +% p\LaTeXe{}$B$K$O!"K\Mh$NF0:n%b!<%I$H(B2.09$B8_49%b!<%I$NFs$D$,$"$j!"(B +% $BN>%b!<%I$G?t<0J8;z$rJQ99$9$k%3%^%s%I$dF0:n$,0[$J$j$^$9!#(B +% $BK\Mh$NF0:n%b!<%I$G$O!"(B|\mathrm{...}|$B$N$h$&$K(B|\math??|$B$K0z?t$r;XDj$7$F(B +% $B;H$$$^$9!#$3$N$H$-$O0z?t$K$@$11F6A$7$^$9!#(B2.09$B8_49%b!<%I$G$O!"(B|\rm|$B$N(B +% $B$h$&$JFsJ8;z%3%^%s%I$r;H$$$^$9!#$3$N%3%^%s%I$K$O0z?t$r<h$i$:!"=qBN$O(B +% $B%0%k!<%T%s%0$NHO0O$GH?1G$5$l$^$9!#FsJ8;z%3%^%s%I$O!"%M%$%F%#%V%b!<%I(B +% $B$G$b;H$($k$h$&$K$J$C$F$$$F!"F0:n$b(B2.09$B8_49%b!<%I$N%3%^%s%I$HF1$8$G$9!#(B +% +% $B$7$+$7!"FbItE*$K$O(B|\math??|$B$H$$$&0l$D$N%3%^%s%I$,$9$Y$F$NF0:n$r<u$1;}$A!"(B +% |\math??|$B%3%^%s%I$d(B|\??|$B%3%^%s%I$+$i8F$S=P$5$l$?>uBV$K1~$8$F!"F0:n$rJQ$((B +% $B$F$$$^$9!#$7$?$,$C$F!"2$J8%U%)%s%H$HOBJ8%U%)%s%H$NN>J}$r0lEY$KJQ99$9$k!"(B +% $B?t<0J8;zJQ99%3%^%s%I$r:n$k$H$-!"$=$l$>$l$N>uBV$K9g$C$?F0:n$GF0$/$h$&$K(B +% $B%U%)%s%H@Z$jBX$(%3%^%s%I$r<B9T$5$;$kI,MW$,$"$j$^$9!#(B +% +% \textbf{$B;H$$J}(B} +% \begin{verbatim} +% usage: \reDeclareMathAlphabet{\mathAA}{\mathBB}{\mathCC} +% \end{verbatim} +% $B2$J8!&OBJ8N>MQ$N?t<0J8;zJQ99%3%^%s%I(B |\mathAA| $B$r(B($B:F(B)$BDj5A$7$^$9!#(B +% $B2$J8MQ$N%3%^%s%I(B |\mathBB| $B$H!"OBJ8MQ$N(B |\mathCC| $B$r(B (p)\LaTeX{} $BI8=`$N(B +% $BJ}K!$GDj5A$7$F$*$$$?8e!">e$N$h$&$K5-=R$7$^$9!#$J$*!"(B|{\mathBB}{\mathCC}| +% $B$NItJ,$K$D$$$F$O(B |{\@mathBB}{\@mathCC}| $B$N$h$&$K(B @ $B$r$D$1$?5-=R(B +% $B$r$7$F$b$+$^$$$^$;$s(B($B8_49@-$N$?$a(B)$B!#>e$N$h$&$JL?Na$rH/9T$9$k$H!"(B +% |\mathAA| $B$,!"2$J8$KBP$7$F$O(B |\mathBB|$B!"(B $BOBJ8$KBP$7$F$O(B |\mathCC| $B$N0UL#$r(B +% $B;}$D$h$&$K$J$j$^$9!#(B +% $BDL>o$O!"(B|\reDeclareMathAlphabet{\mathrm}{\mathrm}{\mathmc}| $B$N$h$&$K(B +% |AA=BB| $B$H$7$FMQ$$$^$9!#$^$?!"(B|\mathrm| $B$O(B \LaTeX{} kernel $B$K$*$$$F(B +% $BI8=`$N%3%^%s%I$H$7$F4{$KDj5A$5$l$F$$$k$N$G!"$3$N>l9g$O(B |\mathrm| $B$N(B +% $B:FDj5A$H$J$j$^$9!#(Bnative mode $B$G$N(B |\rm| $B$N$h$&$J(B two letter command +% (old font command) $B$KBP$7$F$bF1MM$J$3$H$,0z$-$*$3$j$^$9!#$D$^$j!"(B +% $B?t<0%b!<%I$K$*$$$F!"?7$?$J(B |\rm| $B$O!"(B\LaTeX{} original $B$N(B |\rm| $B$H(B |\mc| +% ($B@53N$K8@$($P(B |\mathrm| $B$H(B |\mathmc| $B$G$"$k$,(B)$B$N0UL#$r9g$o$;;}$D$h$&$K(B +% $B$J$j$^$9!#(B +% +% \textbf{$BJdB-(B} +% \begin{itemize} +% \item +% |\mathAA| $B$r:FDj5A$9$kB>$NL?Na(B(|\DeclareSymbolFontAlphabet| $B$rMQ$$$k(B +% $B%Q%C%1!<%8$N;HMQEy(B)$B$H$N>WFM$rHr$1$k$?$a$K$O!"(B|\AtBeginDocument| $B$rJ;MQ(B +% $B$9$k$J$I$7$FE83+0LCV$N@)8f$r9T$C$F$/$@$5$$!#(B +% \item +% $B%F%-%9%H%b!<%I;~$N%(%i!<I=<(MQ$K(B |\mathBB| $B$N$_$rMQ$$$k$3$H$r=|$$$F!"(B +% |\mathBB| $B$H(B |\mathCC| $B$N=g$O<B:]$K$O0UL#$r;}$A$^$;$s!#OBJ8!"2$J8$N=g$K(B +% $BDj5A$7$F$bLdBj$O$"$j$^$;$s!#(B +% \item +% $BBh(B2,3$B0z$-?t$K$O(B |{\@mathBB}{\@mathCC}| $B$N$h$&$K(B |@| $B$r$D$1$?5-=R$b(B +% $B9T$($^$9!#$?$@$7!"7A<0$OE}0l$7$F$/$@$5$$!#H=CG$OBh(B2$B0z$-?t$G9T$C$F(B +% $B$$$k$?$a!"(B |{\@mathBB}{\mathCC}| $B$N$h$&$J5-=R$G$O$&$^$/F0:n$7$^$;$s!#(B +% $B$^$?!"(B|\makeatletter| $B$J>uBV$G(B |{\@mathBB }{\@mathCC }| $B$N$h$&$J(B |@| $B$H(B +% $BM>J,$J%9%Z!<%9$r$D$1$?>l9g$K$OL58B%k!<%W$r0z$-5/$3$9$3$H$,$"$j$^$9!#(B +% $B$3$N$h$&$J5-=R$OHr$1$k$h$&$K$7$F2<$5$$!#(B +% \item +% |\reDeclareMathAlphabet| $B$r<B9T$9$k:]$K$O!"(B|\mathBB|, |\mathCC| $B$,Dj5A(B +% $B$5$l$F$$$kI,MW$O$"$j$^$;$s!#<B:]$K(B |\mathAA| $B$rMQ$$$k:]$K$O$3$l$i$N(B +% |\mathBB|, |\mathCC| $B$,(B (p)\LaTeX{}$BI8=`$NJ}K!$GDj5A$5$l$F$$$kI,MW$,$"$j$^$9!#(B +% \item +% $BB>$NItJ,$G(B |\mathAA| $B$rA4$/Dj5A$7$J$$>l9g$r=|$-!"(B|\mathAA| $B$O(B +% |\reDeclareMathAlphabet| $B$r<B9T$9$k0JA0$G(B (p)\LaTeX{}$BI8=`$NJ}K!$GDj5A$5$l(B +% $B$F$$$kI,MW$,$"$j$^$9(B(|\mathrm| $B$d(B |\mathbf| $B$NI8=`E*$J%3%^%s%I$O!"(B +% \LaTeX{} kernel $B$G4{$KDj5A$5$l$F$$$^$9(B)$B!#(B +% |\DeclareMathAlphabet| $B$N>l9g$K$O!"(B|\reDeclareMathAlphabet| $B$h$j$bA0$G(B1$BEY(B +% |\mathAA| $B$rDj5A$7$F$"$l$P!"(B|\reDeclareMathAlphabet| $B$N8e$m$G:FEY(B +% |\DeclareMathAlphabet| $B$rMQ$$$F(B |\mathAA| $B$NFbIt$NDj5AFbMF$rJQ99$9$k$3$H(B +% $B$K$OLdBj$"$j$^$;$s!#(B +% |\DeclareSymbolFontAlphabet| $B$N>l9g!":FDj5A$K$*$$$F$b(B |\mathAA| $B$,D>@\(B +% $BDj5A$5$l$k$N$G!"(B|\mathAA| $B$KBP$9$k:G8e$N(B |\DeclareSymbolFontAlphabet| $B$N(B +% $B$5$i$K8e$G(B |\reDeclareMathAlphabet| $B$r<B9T$7$J$1$l$PM-8z$H$O$J$j$^$;$s!#(B +% \item +% |\documentstyle| $B$N8_49%b!<%I$N>l9g!"(B|\rm| $BEy$N(B two letter command +% (old font command) $B$O!"(B|\reDeclareMathAlphabet| $B$H$O4XO"$9$k$3$H$N$J$$(B +% $BJL8D$N%3%^%s%I$H$7$FDj5A$5$l$^$9!#=>$C$F!"$3$N>l9g$K$O(B +% |\reDeclareMathAlphabet| $B$rMQ$$$F$b(B |\rm| $BEy$O?t<0%b!<%I$K$*$$$F(B +% $B2$J8!&OBJ8N>MQ$N$b$N$H$O$J$j$^$;$s!#(B +% \end{itemize} +% \begin{macrocode} +\def\reDeclareMathAlphabet#1#2#3{% + \edef#1{\noexpand\protect\expandafter\noexpand\csname% + \expandafter\@gobble\string#1\space\space\endcsname}% + \edef\@tempa{\expandafter\@gobble\string#2}% + \edef\@tempb{\expandafter\@gobble\string#3}% + \edef\@tempc{\string @\expandafter\@gobbletwo\string#2}% + \ifx\@tempc\@tempa% + \edef\@tempa{\expandafter\@gobbletwo\string#2}% + \edef\@tempb{\expandafter\@gobbletwo\string#3}% + \fi + \expandafter\edef\csname\expandafter\@gobble\string#1\space\space\endcsname% + {\noexpand\DualLang@mathalph@bet% + {\expandafter\noexpand\csname\@tempa\space\endcsname}% + {\expandafter\noexpand\csname\@tempb\space\endcsname}% + }% +} +\@onlypreamble\reDeclareMathAlphabet +\def\DualLang@mathalph@bet#1#2{% + \relax\ifmmode + \ifx\math@bgroup\bgroup% 2e normal style (\mathrm{...}) + \bgroup\let\DualLang@Mfontsw\DLMfontsw@standard + \else + \ifx\math@bgroup\relax% 2e two letter style (\rm->\mathrm) + \let\DualLang@Mfontsw\DLMfontsw@oldstyle + \else + \ifx\math@bgroup\@empty% 2.09 oldlfont style ({\mathrm ...}) + \let\DualLang@Mfontsw\DLMfontsw@oldlfont + \else% panic! assume 2e normal style + \bgroup\let\DualLang@Mfontsw\DLMfontsw@standard + \fi + \fi + \fi + \else + \let\DualLang@Mfontsw\@firstoftwo + \fi + \DualLang@Mfontsw{#1}{#2}% +} +\def\DLMfontsw@standard#1#2#3{#1{#2{#3}}\egroup} +\def\DLMfontsw@oldstyle#1#2{#1\relax\@fontswitch\relax{#2}} +\def\DLMfontsw@oldlfont#1#2{#1\relax#2\relax} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\DeclareRelationFont} +% \begin{macro}{\SetRelationFont} +% $BOBJ8=qBN$KBP$9$k=>B0=qBN$r@k8@$9$k%3%^%s%I$G$9!#(B\emph{$B=>B0=qBN(B}$B$H$O!"(B +% $B$"$kOBJ8=qBN$H%Z%"$K$J$k2$J8=qBN$N$3$H$G$9!#(B +% $B<g$KB?=qBN%Q%C%1!<%8(B|skfonts|$B$rMQ$$$k$?$a$N;EAH$_$G$9!#(B +% +% |\DeclareRelationFont|$B%3%^%s%I$N:G=i$N(B4$B$D$N0z?t$NAH$,OBJ8=qBN$NB0@-!"(B +% $B$=$N8e$N(B4$B$D$N0z?t$NAH$,=>B0=qBN$NB0@-$G$9!#(B +% \begin{verbatim} +% \DeclareRelationFont{JY1}{mc}{m}{n}{OT1}{cmr}{m}{n} +% \DeclareRelationFont{JY1}{gt}{m}{n}{OT1}{cmr}{bx}{n} +% \end{verbatim} +% $B>e5-$NNc$O!"L@D+BN$N=>B0=qBN$H$7$F%3%s%T%e!<%?%b%@%s%m!<%^%s!"(B +% $B%4%7%C%/BN$N=>B0=qBN$H$7$F%3%s%T%e!<%?%b%@%s%\!<%k%I$r@k8@$7$F$$$^$9!#(B +% $B%+%l%s%HOBJ8=qBN$,(B|\JY1/mc/m/n|$B$H$J$k$H!"(B +% $B<+F0E*$K2$J8=qBN$,(B|\OT1/cmr/m/n|$B$K$J$j$^$9!#(B +% $B$^$?!"OBJ8=qBN$,(B|\JY1/gt/m/n|$B$K$J$C$?$H$-$O!"(B +% $B2$J8=qBN$,(B|\OT1/cmr/bx/n|$B$K$J$j$^$9!#(B +% +% $BOBJ8=qBN$N%7%'%$%W;XDj$r>JN,$9$k$H%(%s%3!<%I!?%U%!%_%j!?%7%j!<%:$NAH9g$;$G(B +% $B=>B0=qBN$,;H$o$l$^$9!#$3$N$H$-$O!"(B|\selectfont|$B$,8F$S=P$5$l$?;~E@$G$N(B +% $B%7%'%$%W!J(B|\f@shape|$B!K$NCM$,;H$o$l$^$9!#(B +% +% |\DeclareRelationFont|$B$N@_DjCM$O%0%m!<%P%k$KM-8z$G$9!#(B +% |\SetRelationFont|$B$N@_DjCM$O%m!<%+%k$KM-8z$G$9!#(B +% $B%U%)%s%HDj5A%U%!%$%k$G@k8@$r$9$k>l9g$O!"(B +% |\DeclareRelationFont|$B$r;H$C$F$/$@$5$$!#(B +% \begin{macrocode} +\def\all@shape{all}% +\def\DeclareRelationFont#1#2#3#4#5#6#7#8{% + \def\rel@shape{#4}% + \ifx\rel@shape\@empty + \global + \expandafter\def\csname rel@#1/#2/#3/all\endcsname{% + \romanencoding{#5}\romanfamily{#6}% + \romanseries{#7}}% + \else + \global + \expandafter\def\csname rel@#1/#2/#3/#4\endcsname{% + \romanencoding{#5}\romanfamily{#6}% + \romanseries{#7}\romanshape{#8}}% + \fi +} +\def\SetRelationFont#1#2#3#4#5#6#7#8{% + \def\rel@shape{#4}% + \ifx\rel@shape\@empty + \expandafter\def\csname rel@#1/#2/#3/all\endcsname{% + \romanencoding{#5}\romanfamily{#6}% + \romanseries{#7}}% + \else + \expandafter\def\csname rel@#1/#2/#3/#4\endcsname{% + \romanencoding{#5}\romanfamily{#6}% + \romanseries{#7}\romanshape{#8}}% + \fi +} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\if@knjcmd} +% \begin{macro}{\userelfont} +% |\if@knjcmd|$B$O2$J8=qBN$r=>B0=qBN$K$9$k$+$I$&$+$N%U%i%0$G$9!#(B +% $B$3$N%U%i%0$,??$K$J$k$H!"2$J8=qBN$K=>B0=qBN$,;H$o$l$^$9!#(B +% $B$3$N%U%i%0$O(B|\userelfont|$B%3%^%s%I$K$h$C$F!"(B\emph{$B??(B}$B$H$J$j$^$9!#(B +% $B$=$7$F(B|\selectfont|$B<B9T8e$K$O(B\emph{$B56(B}$B$K=i4|2=$5$l$^$9!#(B +% \begin{macrocode} +\newif\if@knjcmd +\def\userelfont{\@knjcmdtrue} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\selectfont} +% |\selectfont|$B$N%*%j%8%J%k$+$i$NJQ99ItJ,$O!"<!$N#3E@$G$9!#(B +% \begin{itemize} +% \item $BOBJ8=qBN$rJQ99$9$kItJ,(B +% \item $B=>B0=qBN$KJQ99$9$kItJ,(B +% \item $BOB2$J8$N%Y!<%9%i%$%s$rD4@0$9$kItJ,(B +% \end{itemize} +% +% \changes{v1.0c}{1995/08/22}{$B=D2#N>J}$N%U%)%s%H$r@Z$jBX$($k$h$&$K$7$?(B} +% \changes{v1.2}{1995/11/22}{$B%(%i!<%U%)%s%H$KBP1~$7$?(B} +% \changes{v1.3n}{2004/08/10}{$BOBJ8%(%s%3!<%G%#%s%0$N@Z$jBX$($rM-8z2=(B} +% |\selectfont|$B%3%^%s%I$O!"$^$:!"OBJ8%U%)%s%H$r@Z$jBX$($^$9!#(B +% \begin{macrocode} +%</plcore> +%<*plcore|trace> +\DeclareRobustCommand\selectfont{% + \let\tmp@error@fontshape\error@fontshape + \let\error@fontshape\error@kfontshape + \edef\tmp@item{{\k@encoding}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kyenc@list}% + \ifin@ + \let\cy@encoding\k@encoding + \edef\ct@encoding{\csname t@enc@\k@encoding\endcsname}% + \else + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\ktenc@list}% + \ifin@ + \let\ct@encoding\k@encoding + \edef\cy@encoding{\csname y@enc@\k@encoding\endcsname}% + \else + \@latex@error{KANJI Encoding scheme `\k@encoding' unknown}\@eha + \fi + \fi + \let\font\tfont + \let\k@encoding\ct@encoding + \xdef\font@name{\csname\curr@kfontshape/\f@size\endcsname}% + \pickup@font + \font@name + \let\font\jfont + \let\k@encoding\cy@encoding + \xdef\font@name{\csname\curr@kfontshape/\f@size\endcsname}% + \pickup@font + \font@name + \expandafter\def\expandafter\k@encoding\tmp@item + \kenc@update + \let\error@fontshape\tmp@error@fontshape +% \end{macrocode} +% $B<!$K!"(B|\if@knjcmd|$B$,??$N>l9g!"(B +% $B2$J8=qBN$r8=:_$NOBJ8=qBN$K4XO"IU$1$5$l$?%U%)%s%H$KJQ$($^$9!#(B +% $B$3$N%U%i%0$O(B|\userelfont|$B%3%^%s%I$K$h$C$F(B\emph{$B??(B}$B$H$J$j$^$9!#(B +% $B$3$N%U%i%0$O$3$3$G:F$S!"(B\emph{$B56(B}$B$K@_Dj$5$l$^$9!#(B +% \begin{macrocode} + \if@knjcmd \@knjcmdfalse + \expandafter\ifx + \csname rel@\k@encoding/\k@family/\k@series/\k@shape\endcsname\relax + \expandafter\ifx + \csname rel@\k@encoding/\k@family/\k@series/all\endcsname\relax + \else + \csname rel@\k@encoding/\k@family/\k@series/all\endcsname + \fi + \else + \csname rel@\k@encoding/\k@family/\k@series/\k@shape\endcsname + \fi + \fi +% \end{macrocode} +% $B$=$7$F!"2$J8%U%)%s%H$r@Z$jBX$($^$9!#(B +% \begin{macrocode} + \let\font\afont + \xdef\font@name{\csname\curr@fontshape/\f@size\endcsname}% + \pickup@font + \font@name +%<trace>\ifnum \tracingfonts>\tw@ +%<trace> \@font@info{Roman:Switching to \font@name}\fi + \enc@update +% \end{macrocode} +% $B:G8e$K!"%5%$%:$,JQ99$5$l$F$$$l$P!"%Y!<%9%i%$%s$ND4@0$J$I$r9T$J$$$^$9!#(B +% $B1Q8lHG$N(B|\selectfont|$B$G$O:G=i$K9T$J$C$F$$$^$9$,!"(B +% p\LaTeXe{}$B$G$O%Y!<%9%i%$%s%7%U%H$ND4@0$r$9$k$?$a$K!"(B +% $B=qBN$r3NDj$7$J$1$l$P$J$i$J$$$?$a!"0lHV:G8e$K9T$J$$$^$9(B +% +% \changes{v1.1b}{1995/04/26}{$B%Y!<%9%i%$%s$ND4@0$r%5%$%:JQ99;~$K(B +% $B9T$J$&$h$&$K$7$?(B} +% \begin{macrocode} + \ifx\f@linespread\baselinestretch \else + \set@fontsize\baselinestretch\f@size\f@baselineskip + \fi + \size@update} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\KanjiEncodingPair} +% $BOBJ8$N=D2#$N%(%s%3!<%G%#%s%0$O$=$l$>$lBP$K$7$F07$&$?$a!"%;%C%H2=$7$^$9(B +% \changes{v1.3n}{2004/08/10}{$BOBJ8%(%s%3!<%G%#%s%0$N@Z$jBX$($rM-8z2=(B} +% \begin{macrocode} +\def\KanjiEncodingPair#1#2{\@namedef{t@enc@#1}{#2}\@namedef{y@enc@#2}{#1}} +\KanjiEncodingPair{JY1}{JT1} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\set@fontsize} +% |\fontsize|$B%3%^%s%I$NFbIt7A<0$G$9!#(B +% $B%Y!<%9%i%$%s$N@_Dj$H!";YCl$N@_Dj$r9T$J$$$^$9!#(B +% \begin{macrocode} +\def\set@fontsize#1#2#3{% + \@defaultunits\@tempdimb#2pt\relax\@nnil + \edef\f@size{\strip@pt\@tempdimb}% + \@defaultunits\@tempskipa#3pt\relax\@nnil + \edef\f@baselineskip{\the\@tempskipa}% + \edef\f@linespread{#1}% + \let\baselinestretch\f@linespread + \def\size@update{% + \baselineskip\f@baselineskip\relax + \baselineskip\f@linespread\baselineskip + \normalbaselineskip\baselineskip +% \end{macrocode} +% $B$3$3$G!"%Y!<%9%i%$%s%7%U%H$ND4@0$H;YCl$rAH$_N)$F$^$9!#(B +% \begin{macrocode} + \adjustbaseline + \setbox\strutbox\hbox{\yoko + \vrule\@width\z@ + \@height.7\baselineskip \@depth.3\baselineskip}% + \setbox\tstrutbox\hbox{\tate + \vrule\@width\z@ + \@height.5\baselineskip \@depth.5\baselineskip}% + \setbox\zstrutbox\hbox{\tate + \vrule\@width\z@ + \@height.7\baselineskip \@depth.3\baselineskip}% +% \end{macrocode} +% $B%U%)%s%H%5%$%:$H%Y!<%9%i%$%s$K4X$9$k?GCG>pJs$r=PNO$7$^$9!#(B +% \begin{macrocode} +%<*trace> + \ifnum \tracingfonts>\tw@ + \ifx\f@linespread\@empty + \let\reserved@a\@empty + \else + \def\reserved@a{\f@linespread x}% + \fi + \@font@info{Changing size to\space + \f@size/\reserved@a \f@baselineskip}% + \aftergroup\type@restoreinfo + \fi +%</trace> + \let\size@update\relax}} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\adjustbaseline} +% $B8=:_$NOBJ8%U%)%s%H$N6uGr!J(BEUC$B%3!<%I(B\texttt{0xA1A1}$B!K$NCf1{$K(B +% $B8=:_$N2$J8%U%)%s%H$N(B``/''$B$NCf1{$,$/$k$h$&$K%Y!<%9%i%$%s%7%U%H$r@_Dj$7$^$9!#(B +% \changes{v1.0c}{1995/08/31}{$B2$J8=qBN$N4p=`$r(B`M'$B$+$i(B`/'$B$KJQ99(B} +% \changes{v1.2}{1995/11/21}{$B=DAH;~$N$_D4@0$9$k$h$&$K$7$?(B} +% \changes{v1.3j}{2000/10/24}{$BJ8F,$K3C3g8L$J$I$,$"$k$H$-$KM>7W$J%"%-$,$G(B +% $B$kLdBj$KBP=h(B} +% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}$B$G%U%)%s%H$N4p=`CM$,=D=q$-(B +% $B0J30$G$O@_Dj$5$l$J$$$N$r=$@5(B} +% +% $BEv=i$O$^$:%Y!<%9%i%$%s%7%U%HNL$r%<%m$K$7$F$$$^$7$?$,!"(B +% \cs{tbaselineshift}$B$rO"B3$7$FJQ99$7$?8e$K3C3g8LN`$r;H$&$HM>7W$J%"%-$,(B +% $B$G$kLdBj$,5/$3$k$?$a!"(B\cs{tbaselineshift}$B$r%<%m%/%j%"$9$k=hM}$r:o=|$7(B +% $B$^$7$?!#(B +% +% $B$7$+$7!"$=$l$G$O%Y!<%9%i%$%s%7%U%H$rD4@0:Q$_$N2$J8%\%C%/%9$HHf3S$7$F(B +% $B$7$^$&$?$a!"7W;;$7$?CM$,Bg$-$/$J$C$F$7$^$$$^$9!#$=$3$G!"$3$N%\%C%/%9(B +% $B$NCf$G%<%m$K$9$k$h$&$K$7$^$7$?!#$^$?!"(B``/''$B$HHf3S$7$F$$$?$N$r(B``M''$B$K(B +% $B$7$^$7$?!#(B +% \changes{v1.3k}{2001/05/10}{\cs{adjustbaseline}$B$ND4@0NL(B} +% \begin{macrocode} +\newbox\adjust@box +\newdimen\adjust@dimen +\def\adjustbaseline{% +% \end{macrocode} +% $BOBJ8%U%)%s%H$N4p=`CM$r@_Dj$7$^$9!#(B +% \begin{macrocode} + \setbox\adjust@box\hbox{\char\euc"A1A1}% + \cht\ht\adjust@box + \cdp\dp\adjust@box + \cwd\wd\adjust@box + \cvs\normalbaselineskip + \chs\cwd + \cHT\cht \advance\cHT\cdp +% \end{macrocode} +% $B4p=`$H$J$k2$J8%U%)%s%H$NJ8;z$r4^$s$@%\%C%/%9$r:n@.$7!"(B +% $B%Y!<%9%i%$%s%7%U%HNL$N7W;;$r9T$J$$$^$9!#(B +% $B7W;;<0$O<!$N$H$*$j$G$9!#(B +% +% \begin{eqnarray*} +% \textmc{$B%Y!<%9%i%$%s%7%U%HNL(B} &=& +% \{ (\textmc{$BA43Q6uGr$N?<$5(B}) - (\textmc{/$B$N?<$5(B}) \} \\ +% &&- \frac{(\textmc{$BA43Q6uGr$N9b$5(B$+$$B?<$5(B}) +% - (\textmc{/$B$N9b$5(B$+$$B?<$5(B})}{2} +% \end{eqnarray*} +% +% \begin{macrocode} + \iftdir + \setbox\adjust@box\hbox{\tbaselineshift\z@ M}% + \adjust@dimen\ht\adjust@box + \advance\adjust@dimen\dp\adjust@box + \advance\adjust@dimen-\cHT + \divide\adjust@dimen\tw@ + \advance\adjust@dimen\cdp + \advance\adjust@dimen-\dp\adjust@box + \tbaselineshift\adjust@dimen +%<trace> \ifnum \tracingfonts>\tw@ +%<trace> \typeout{baselineshift:\the\tbaselineshift} +%<trace> \fi + \fi} +%</plcore|trace> +%<*plcore> +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\romanencoding} +% \begin{macro}{\kanjiencoding} +% \begin{macro}{\fontencoding} +% $B=qBN$N%(%s%3!<%I$r;XDj$9$k%3%^%s%I$G$9!#(B +% |\fontencoding|$B%3%^%s%I$OOB2$J8$N$I$A$i$+$K1F6A$7$^$9!#(B +% |\DeclareKanjiEncoding|$B$G;XDj$5$l$?%(%s%3!<%I$OOBJ8%(%s%3!<%I$H$7$F!"(B +% |\DeclareFontEncoding|$B$G;XDj$5$l$?%(%s%3!<%I$O2$J8%(%s%3!<%I$H$7$F(B +% $BG'<1$5$l$^$9!#(B +% +% |\kanjiencoding|$B$H(B|\romanencoding|$B$OM?$($i$l$?0z?t$,!"(B +% $B%(%s%3!<%I$H$7$FEPO?$5$l$F$$$k$+$I$&$+$@$1$r3NG'$7!"(B +% $B$=$l$,OBJ8$+2$J8$+$N%A%'%C%/$O9T$J$C$F$$$^$;$s!#(B +% $B$=$N$?$a!"9bB.$KF0:n$r$7$^$9$,!"(B|\kanjiencoding|$B$K2$J8%(%s%3!<%I$r;XDj$7$?$j!"(B +% $B5U$K(B|\romanencoding|$B$KOBJ8%(%s%3!<%I$r;XDj$7$?>l9g$O%(%i!<$H$J$j$^$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\romanencoding[1]{% + \expandafter\ifx\csname T@#1\endcsname\relax + \@latex@error{Encoding scheme `#1' unknown}\@eha + \else + \edef\f@encoding{#1}% + \ifx\cf@encoding\f@encoding + \let\enc@update\relax + \else + \let\enc@update\@@enc@update + \fi + \fi +} +\DeclareRobustCommand\kanjiencoding[1]{% + \expandafter\ifx\csname T@#1\endcsname\relax + \@latex@error{KANJI Encoding scheme `#1' unknown}\@eha + \else + \edef\k@encoding{#1}% + \ifx\ck@encoding\k@encoding + \let\kenc@update\relax + \else + \let\kenc@update\@@kenc@update + \fi + \fi +} +\DeclareRobustCommand\fontencoding[1]{% + \edef\tmp@item{{#1}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kenc@list}% + \ifin@ \kanjiencoding{#1}\else\romanencoding{#1}\fi} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\@@kenc@update} +% |\kanjiencoding|$B%3%^%s%I$N%3!<%I$+$i$b$o$+$k$h$&$K!"(B +% |\ck@encoding|$B$H(B|\k@encoding|$B$,0[$J$k>l9g!"(B +% |\kenc@update|$B%3%^%s%I$O(B|\@@kenc@update|$B%3%^%s%I$HEy$7$/$J$j$^$9!#(B +% +% |\@@kenc@update|$B%3%^%s%I$O!"$=$N%(%s%3!<%I$G$N%G%U%)%k%HCM$r@_Dj$9$k$?$a$N(B +% $B%3%^%s%I$G$9!#2$J8MQ$N(B|\@@enc@update|$B%3%^%s%I$G$O!"(B +% \mlineplus{2}$B9TL\$H(B\mlineplus{3}$B9TL\$N$h$&$JBeF~$b$7$F$$$^$9$,!"(B +% $BOBJ8MQ$K$O%3%a%s%H$K$7$F$"$j$^$9!#(B +% $B$3$l$i$O(B|\DeclareTextCommand|$B$d(B|\ProvideTextCommand|$B$J$I$G(B +% $B%(%s%3!<%I$4$H$K@_Dj$5$l$k%3%^%s%I$r;H$&$?$a$N;EAH$_$G$9!#(B +% $B$7$+$7!"OBJ8%(%s%3!<%I$K0MB8$9$k$h$&$J%3%^%s%I$d%^%/%m$r:n@.$9$k$3$H$O!"(B +% $B8=;~E@$G$O!"$J$$$H;W$$$^$9!#(B +% +% \changes{v1.0c}{1995/08/22}{$B=D2#MQ%(%s%3!<%I$NJ]B8(B} +% \begin{macrocode} +\def\@@kenc@update{% +% \expandafter\let\csname\ck@encoding -cmd\endcsname\@changed@kcmd +% \expandafter\let\csname\k@encoding-cmd\endcsname\@current@cmd + \default@KT + \csname T@\k@encoding\endcsname + \csname D@\k@encoding\endcsname + \let\kenc@update\relax + \let\ck@encoding\k@encoding + \edef\tmp@item{{\k@encoding}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kyenc@list}% + \ifin@ \let\cy@encoding\k@encoding + \else + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\ktenc@list}% + \ifin@ \let\ct@encoding\k@encoding + \else + \@latex@error{KANJI Encoding scheme `\k@encoding' unknown}\@eha + \fi + \fi +} +\let\kenc@update\relax +% \end{macrocode} +% +% |\@changed@cmd|$B$NOBJ8%(%s%3!<%G%#%s%0%P!<%8%g%s!#(B +% \changes{v1.3n}{2004/08/10}{$BOBJ8%(%s%3!<%G%#%s%0$N@Z$jBX$($rM-8z2=(B} +% \begin{macrocode} +\def\@changed@kcmd#1#2{% + \ifx\protect\@typeset@protect + \@inmathwarn#1% + \expandafter\ifx\csname\ck@encoding\string#1\endcsname\relax + \expandafter\ifx\csname ?\string#1\endcsname\relax + \expandafter\def\csname ?\string#1\endcsname{% + \TextSymbolUnavailable#1% + }% + \fi + \global\expandafter\let + \csname\cf@encoding \string#1\expandafter\endcsname + \csname ?\string#1\endcsname + \fi + \csname\ck@encoding\string#1% + \expandafter\endcsname + \else + \noexpand#1% + \fi} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\@notkfam} +% \begin{macro}{\@notffam} +% |\fontfamily|$B%3%^%s%IFb$G;HMQ$9$k%U%i%0$G$9!#(B +% |@notkfam|$B%U%i%0$OOBJ8%U%!%_%j$G$J$+$C$?$3$H$r!"(B +% |@notffam|$B%U%i%0$O2$J8%U%!%_%j$G$J$+$C$?$3$H$r<($7$^$9!#(B +% +% \changes{v1.2}{1995/11/21}{\cs{fontfamily}$B%3%^%s%IMQ$N%U%i%0DI2C(B} +% \begin{macrocode} +\newif\if@notkfam +\newif\if@notffam +% \end{macrocode} +% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}$B%3%^%s%IFbIt%U%i%0JQ99(B} +% \begin{macrocode} +\newif\if@tempswz +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\romanfamily} +% \begin{macro}{\kanjifamily} +% \begin{macro}{\fontfamily} +% $B=qBN$N%U%!%_%j$r;XDj$9$k%3%^%s%I$G$9!#(B +% +% |\kanjifamily|$B$H(B|\romanfamily|$B$OM?$($i$l$?0z?t$,!"(B +% $BOBJ8$"$k$$$O2$J8$N%U%!%_%j$H$7$F@5$7$$$+$N%A%'%C%/$O9T$J$C$F$$$^$;$s!#(B +% $B$=$N$?$a!"9bB.$KF0:n$r$7$^$9$,!"(B|\kanjifamily|$B$K2$J8%U%!%_%j$r;XDj$7$?$j!"(B +% $B5U$K(B|\romanfamily|$B$KOBJ8%U%!%_%j$r;XDj$7$?>l9g$O!"%(%i!<$H$J$j!"(B +% $BBeMQ%U%)%s%H$+%(%i!<%U%)%s%H$,;H$o$l$^$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\romanfamily[1]{\edef\f@family{#1}} +\DeclareRobustCommand\kanjifamily[1]{\edef\k@family{#1}} +% \end{macrocode} +% +% |\fontfamily|$B$O!";XDj$5$l$?CM$K$h$C$F!"OBJ8%U%!%_%j$+2$J8%U%!%_%j!"(B +% \emph{$B$"$k$$$ON>J}(B}$B$N%U%!%_%j$r@Z$jBX$($^$9!#(B +% $BOB2$J8$H$b$KL58z$J%U%!%_%jL>$,;XDj$5$l$?>l9g$O!"OB2$J8$H$b$KBeBX=qBN$,(B +% $B;HMQ$5$l$^$9!#(B +% +% $B0z?t$,(B|\rmfamily|$B$N$h$&$JL>A0$GM?$($i$l$k2DG=@-$,$"$k$?$a!"(B +% $B$^$:!"$3$l$rE83+$7$?$b$N$r:n$j$^$9!#(B +% +% $B$^$?!"OBJ8%U%!%_%j$H2$J8%U%!%_%j$N$=$l$>$l$K$J$+$C$?$3$H$r<($9%U%i%0$r(B +% $B56$K%;%C%H$7$^$9!#(B +% +% \changes{v1.2}{1995/11/21}{$BBeMQ%U%)%s%H$,;H$o$l$J$$%P%0$r=$@5(B} +% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}$B%3%^%s%IFbIt%U%i%0JQ99(B} +% \changes{v1.3o}{2005/01/04}{\cs{fontfamily}$BCf$N%U%i%0=$@5(B} +% \begin{macrocode} +\DeclareRobustCommand\fontfamily[1]{% + \edef\tmp@item{{#1}}% + \@notkfamfalse + \@notffamfalse +% \end{macrocode} +% $B<!$K!"$3$N0z?t$,(B|\kfam@list|$B$KEPO?$5$l$F$$$k$+$I$&$+$rD4$Y$^$9!#(B +% $BEPO?$5$l$F$$$l$P!"(B|\k@family|$B$K$=$NCM$rF~$l$^$9!#(B +% \begin{macrocode} + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kfam@list}% + \ifin@ \edef\k@family{#1}% +% \end{macrocode} +% $B$=$&$G$J$$$H$-$O!"(B|\notkfam@list|$B$KEPO?$5$l$F$$$k$+$I$&$+$rD4$Y$^$9!#(B +% $BEPO?$5$l$F$$$l$P!"$3$N0z?t$OOBJ8%U%!%_%j$G$O$"$j$^$;$s$N$G!"(B +% |\@notkfam|$B%U%i%0$r??$K$7$F!"2$J8%U%!%_%j$N%k!<%A%s$K0\$j$^$9!#(B +% +% $B$3$N$H$-!"(B|\efam@list|$B$rD4$Y$k$N$G$O$J$$$3$H$KCm0U$r$7$F$/$@$5$$!#(B +% |\efam@list|$B$rD4$Y!"$3$l$K$J$$%U%!%_%j$rOBJ8%U%!%_%j$G$"$k$H$9$k$H!"(B +% $B$?$H$($P!"2$J8%J!<%k%U%!%_%j$,Dj5A$5$l$F$$$k$1$l$I$b!"OBJ8%J!<%k%U%!%_%j(B +% $B$,L$Dj5A$N>l9g!"(B|\fontfamily{nar}|$B$H$$$&;XDj$O!"(B|nar|$B$,(B|\efam@list|$B$K$@$1!"(B +% $BEPO?$5$l$F$$$k$?$a!"OBJ8=qBN$r%J!<%k$K$9$k$3$H$,$G$-$^$;$s!#(B +% +% $B5U$K!"(B|\kfam@list|$B$KEPO?$5$l$F$$$J$$$+$i$H$$$C$F!"(B|\k@family|$B$K(B|nar|$B$r@_Dj(B +% $B$9$k$H!"(B|cmr|$B$N$h$&$J%U%!%_%j$b(B|\k@family|$B$K@_Dj$5$l$k2DG=@-$,$"$j$^$9!#(B +% $B$7$?$,$C$F!"!V2$J8$G$J$$!W$rL@<(E*$K<($9(B|\notkfam@list|$B$r8+$kI,MW$,$"$j$^$9!#(B +% \begin{macrocode} + \else + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\notkfam@list}% + \ifin@ \@notkfamtrue +% \end{macrocode} +% |\notkfam@list|$B$KEPO?$5$l$F$$$J$$>l9g$O!"(B +% $B%U%)%s%HDj5A%U%!%$%k$,B8:_$9$k$+$I$&$+$rD4$Y$^$9!#(B +% $B%U%!%$%k$,B8:_$9$k>l9g$O!"(B|\k@family|$B$rJQ99$7$^$9!#(B +% $B%U%!%$%k$,B8:_$7$J$$>l9g$O!"(B|\notkfam@list|$B$KEPO?$7$^$9!#(B +% +% |\kenc@list|$B$KEPO?$5$l$F$$$k%(%s%3!<%I$H!";XDj$5$l$?OBJ8%U%!%_%j$N(B +% $BAH9g$;$N%U%)%s%HDj5A%U%!%$%k$,B8:_$9$k>l9g$O!"(B|\k@family|$B$K;XDj$5$l$?(B +% $BCM$rF~$l$^$9!#(B +% \changes{v1.3c}{1997/04/24}% +% {$B%U%)%s%HDj5A%U%!%$%kL>$r>.J8;z$KJQ49$7$F$+$iC5$9$h$&$K$7$?!#(B} +% \changes{v1.3e}{1997/07/10}{fd$B%U%!%$%kL>$N>.J8;z2=$,8z$$$F$$$J$+$C$?$N$r(B +% $B=$@5!#$"$j$,$H$&!"Bg4d$5$s(B} +% \begin{macrocode} + \else + \@tempswzfalse + \def\fam@elt{\noexpand\fam@elt}% + \message{(I search kanjifont definition file:}% + \def\enc@elt<##1>{\message{.}% + \edef\reserved@a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}% + \reserved@a{\@tempswztrue}{}\relax}% + \kenc@list + \message{)}% + \if@tempswz + \edef\k@family{#1}% +% \end{macrocode} +% $B$D$.$NItJ,$,<B9T$5$l$k$N$O!"OBJ8%U%!%_%j$H$7$FG'<1$G$-$J$+$C$?>l9g$G$9!#(B +% $B$3$N>l9g$O!"(B|\@notkfam|$B%U%i%0$r??$K$7$F!"(B|\notkfam@list|$B$KEPO?$7$^$9!#(B +% \changes{v1.1b}{1995/05/10}{\cs{notkfam@list}$B$K!"(B +% $B%(%s%3!<%I$4$H$KEPO?$5$l$F$7$^$&$N$r=$@5$7$?!#2$J8$K$D$$$F$bF1MM!#(B} +% \begin{macrocode} + \else + \@notkfamtrue + \xdef\notkfam@list{\notkfam@list\fam@elt<#1>}% + \fi +% \end{macrocode} +% |\kfam@list|$B$H(B|\notkfam@list|$B$KEPO?$5$l$F$$$k$+$I$&$+$r(B +% $BD4$Y$?(B|\ifin@|$B$rJD$8$^$9!#(B +% \begin{macrocode} + \fi\fi +% \end{macrocode} +% $B2$J8%U%!%_%j$N>l9g$b!"OBJ8%U%!%_%j$HF1MM$NJ}K!$G3NG'$r$7$^$9!#(B +% \changes{v1.3e}{1997/07/10}{fd$B%U%!%$%kL>$N>.J8;z2=$,8z$$$F$$$J$+$C$?$N$r=$@5(B} +% \begin{macrocode} + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\ffam@list}% + \ifin@ \edef\f@family{#1}\else + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\notffam@list}% + \ifin@ \@notffamtrue \else + \@tempswzfalse + \def\fam@elt{\noexpand\fam@elt}% + \message{(I search font definition file:}% + \def\enc@elt<##1>{\message{.}% + \edef\reserved@a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}% + \reserved@a{\@tempswztrue}{}\relax}% + \fenc@list + \message{)}% + \if@tempswz + \edef\f@family{#1}% + \else + \@notffamtrue + \xdef\notffam@list{\notffam@list\fam@elt<#1>}% + \fi + \fi\fi +% \end{macrocode} +% $B:G8e$K!";XDj$5$l$?J8;zNs$,!"OBJ8%U%!%_%j$H2$J8%U%!%_%j$N$$$:$l$+!"(B +% $B$"$k$$$ON>J}$H$7$FG'<1$5$l$?$+$I$&$+$r3NG'$7$^$9!#(B +% +% $B$I$A$i$H$bG'<1$5$l$F$$$J$$>l9g$O!"%U%!%_%j$N;XDj%_%9$G$9$N$G!"(B +% $BBeMQ%U%)%s%H$r;H$&$?$a$K!"8N0U$K;XDj$5$l$?J8;zNs$r%U%!%_%j$K(B +% $BF~$l$^$9!#(B +% \begin{macrocode} + \if@notkfam\if@notffam + \edef\k@family{#1}\edef\f@family{#1}% + \fi\fi} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\romanseries} +% \begin{macro}{\kanjiseries} +% \begin{macro}{\fontseries} +% $B=qBN$N%7%j!<%:$r;XDj$9$k%3%^%s%I$G$9!#(B +% |\fontseries|$B%3%^%s%I$OOB2$J8$NN>J}$K1F6A$7$^$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\romanseries[1]{\edef\f@series{#1}} +\DeclareRobustCommand\kanjiseries[1]{\edef\k@series{#1}} +\DeclareRobustCommand\fontseries[1]{\kanjiseries{#1}\romanseries{#1}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\romanshape} +% \begin{macro}{\kanjishape} +% \begin{macro}{\fontshape} +% $B=qBN$N%7%'%$%W$r;XDj$9$k%3%^%s%I$G$9!#(B +% |\fontshape|$B%3%^%s%I$OOB2$J8$NN>J}$K1F6A$7$^$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\romanshape[1]{\edef\f@shape{#1}} +\DeclareRobustCommand\kanjishape[1]{\edef\k@shape{#1}} +\DeclareRobustCommand\fontshape[1]{\kanjishape{#1}\romanshape{#1}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\usekanji} +% \begin{macro}{\useroman} +% \begin{macro}{\usefont} +% $B=qBNB0@-$r0lEY$K;XDj$9$k%3%^%s%I$G$9!#(B +% $BOBJ8=qBN$K$O(B|\usekanji|$B$r!"2$J8=qBN$K$O(B|\useroman|$B$r;XDj$7$F$/$@$5$$!#(B +% +% |\usefont|$B%3%^%s%I$O!"Bh0l0z?t$G;XDj$5$l$k%(%s%3!<%I$K$h$C$F!"(B +% $BOBJ8$^$?$O2$J8%U%)%s%H$r@Z$jBX$($^$9!#(B +% \begin{macrocode} +\def\usekanji#1#2#3#4{% + \kanjiencoding{#1}\kanjifamily{#2}\kanjiseries{#3}\kanjishape{#4}% + \selectfont\ignorespaces} +\def\useroman#1#2#3#4{% + \romanencoding{#1}\romanfamily{#2}\romanseries{#3}\romanshape{#4}% + \selectfont\ignorespaces} +\def\usefont#1#2#3#4{% + \edef\tmp@item{{#1}}% + \expandafter\expandafter\expandafter + \inlist@\expandafter\tmp@item\expandafter{\kenc@list}% + \ifin@ \usekanji{#1}{#2}{#3}{#4}% + \else\useroman{#1}{#2}{#3}{#4}% + \fi} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\normalfont} +% $B=qBN$r%G%U%)%k%HCM$K$9$k%3%^%s%I$G$9!#(B +% $BOBJ8=qBN$b%G%U%)%k%HCM$K$J$k$h$&$K:FDj5A$7$F$$$^$9!#(B +% $B$?$@$79bB.2=$N$?$a!"(B|\usekanji|$B$H(B|\useroman|$B$rE83+$7!"(B +% |\selectfont|$B$r0lEY$7$+8F$S=P$5$J$$$h$&$K$7$F$$$^$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\normalfont{% + \kanjiencoding{\kanjiencodingdefault}% + \kanjifamily{\kanjifamilydefault}% + \kanjiseries{\kanjiseriesdefault}% + \kanjishape{\kanjishapedefault}% + \romanencoding{\encodingdefault}% + \romanfamily{\familydefault}% + \romanseries{\seriesdefault}% + \romanshape{\shapedefault}% + \selectfont\ignorespaces} + \adjustbaseline +\let\reset@font\normalfont +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\mcfamily} +% \begin{macro}{\gtfamily} +% $BOBJ8=qBN$rL@D+BN$K$9$k(B|\mcfamily|$B$H%4%7%C%/BN$K$9$k(B|\gtfamily|$B$rDj5A$7$^$9!#(B +% $B$3$l$i$O!"(B|\rmfamily|$B$J$I$KBP1~$7$^$9!#(B +% |\mathmc|$B$H(B|\mathgt|$B$O?t<0Fb$GMQ$$$k$H$-$N%3%^%s%IL>$G$9!#(B +% \begin{macrocode} +\DeclareRobustCommand\mcfamily + {\not@math@alphabet\mcfamily\mathmc + \kanjifamily\mcdefault\selectfont} +\DeclareRobustCommand\gtfamily + {\not@math@alphabet\gtfamily\mathgt + \kanjifamily\gtdefault\selectfont} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \begin{macro}{\romanprocess@table} +% \begin{macro}{\kanjiprocess@table} +% \begin{macro}{\process@table} +% $BJ8=q$N@hF,$G!"OBJ8%G%U%)%k%H%U%)%s%H$NJQ99$,H?1G$5$l$J$$$N$r=$@5$7$^$9!#(B +% \changes{v1.3g}{1999/04/05}{plpatch.ltx$B$NFbMF$rH?1G!#(B +% $B$"$j$,$H$&!";3K\$5$s!#(B} +% \begin{macrocode} +\let\romanprocess@table\process@table +\def\kanjiprocess@table{% + \kanjiencoding{\kanjiencodingdefault}% + \kanjifamily{\kanjifamilydefault}% + \kanjiseries{\kanjiseriesdefault}% + \kanjishape{\kanjishapedefault}% +} +\def\process@table{% + \romanprocess@table + \kanjiprocess@table +} +\@onlypreamble\romanprocess@table +\@onlypreamble\kanjiprocess@table +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% +% \begin{macro}{\textunderscore} +% \changes{v1.1b}{1995/04/12}{$B2<@~%^%/%m$rDI2C(B} +% $B$3$N%3%^%s%I$O%F%-%9%H%b!<%I$G;XDj$5$l$?(B|\_|$B$NFbIt%3%^%s%I$G$9!#(B +% $B=DAH$G$N0LCV$rD4@0$9$k$h$&$K:FDj5A$r$7$^$9!#(B +% $B$b$H$O(B\file{ltoutenc.dtx}$B$GDj5A$5$l$F$$$^$9!#(B +% +% $B$J$*!"(B|\_|$B$r?t<0%b!<%I$G;H$&$H(B|\mathunderscore|$B$,<B9T$5$l$^$9!#(B +% \begin{macrocode} +\DeclareTextCommandDefault{\textunderscore}{% + \leavevmode\kern.06em + \iftdir\raise-\tbaselineshift\fi + \vbox{\hrule\@width.3em}} +% \end{macrocode} +% \end{macro} +% +% +% +% \subsection{$B%G%U%)%k%H@_Dj%U%!%$%k$NFI$_9~$_(B} +% $B:G8e$K!"%G%U%)%k%H@_Dj%U%!%$%k$G$"$k!"(B\file{pldefs.ltx}$B$rFI$_9~$_$^$9!#(B +% $B$3$N%U%!%$%k$K$D$$$F$N>\:Y$O!"Bh(B\ref{plfonts:pldefs}$B@a$r;2>H$7$F$/$@$5$$!#(B +% \TeX{}$B$NF~NO%U%!%$%k8!:w%Q%9$K@_Dj$5$l$F$$$k%G%#%l%/%H%j$K(B\file{pldefs.cfg}% +% $B%U%!%$%k$,$"$k>l9g$O!"$=$N%U%!%$%k$r;H$$$^$9!#(B +% \begin{macrocode} +\InputIfFileExists{pldefs.cfg} + {\typeout{*************************************^^J% + * Local config file pldefs.cfg used^^J% + *************************************}}% + {\input{pldefs.ltx}} +%</plcore> +% \end{macrocode} +% +% +% +% +% \section{$B%G%U%)%k%H@_Dj%U%!%$%k(B}\label{plfonts:pldefs} +% $B$3$3$G$O!"%U%)!<%^%C%H%U%!%$%k$KFI$_9~$^$l$k%G%U%)%k%HCM$r@_Dj$7$F$$$^$9!#(B +% $B$3$N@a$G$NFbMF$O(B\file{pldefs.ltx}$B$K=PNO$5$l$^$9!#(B +% $B$3$N%U%!%$%k$NFbMF$r(B\file{plcore.ltx}$B$K4^$a$F$b$h$$$N$G$9$,!"(B +% $B%G%U%)%k%H$N@_Dj$r;2>H$7$d$9$$$h$&$K!"JL%U%!%$%k$K$7$F$"$j$^$9!#(B +% \file{pldefs.ltx}$B$O(B\file{plcore.ltx}$B$+$iFI$_9~$^$l$^$9!#(B +% +% $B%W%j%m!<%I%5%$%:$O!"(B\dst{}$B%W%m%0%i%`$N%*%W%7%g%s$GJQ99$9$k$3$H$,$G$-$^$9!#(B +% $B$3$l0J30$N@_Dj$rJQ99$7$?$$>l9g$O!"(B\file{pldefs.ltx}$B$r(B +% $BD>@\!"=$@5$9$k$N$G$O$J$/!"$3$N%U%!%$%k$r(B\file{pldefs.cfg}$B$H$$$&L>A0$G(B +% $B%3%T!<$r$7$F!"$=$N%U%!%$%k$KBP$7$F=$@5$r2C$($k$h$&$K$7$F$/$@$5$$!#(B +% \begin{macrocode} +%<*pldefs> +\ProvidesFile{pldefs.ltx} + [2000/07/13 v1.2 pLaTeX Kernel (Default settings)] +% \end{macrocode} +% +% \subsection{$B%$%?%j%C%/Jd@5(B} +% \changes{v1.3i}{2000/07/13}{\cs{text..}$B%3%^%s%I$N:8B&$K(B\cs{xkanjiskip}$B$,(B +% $BF~$i$J$$$N$r=$@5!J$"$j$,$H$&!"25It!wElBg$5$s!K(B} +% \begin{macro}{\check@nocorr@} +% $B!V(B\verb|$B$"(B\texttt{abc}$B$$(B|$B!W$H$7$?$H$-!"=qBN$NJQ99$r;XDj$5$l$?2$J8$N:8B&$K(B +% $BOB2$J84V%9%Z!<%9$,F~$i$J$$$N$r=$@5$7$^$9!#(B +% \begin{macrocode} +\def \check@nocorr@ #1#2\nocorr#3\@nil {% + \let \check@icl \relax% \maybe@ic $B$+$iJQ99(B + \def \check@icr {\ifvmode \else \aftergroup \maybe@ic \fi}% + \def \reserved@a {\nocorr}% + \def \reserved@b {#1}% + \def \reserved@c {#3}% + \ifx \reserved@a \reserved@b + \ifx \reserved@c \@empty + \let \check@icl \@empty + \else + \let \check@icl \@empty + \let \check@icr \@empty + \fi + \else + \ifx \reserved@c \@empty + \else + \let \check@icr \@empty + \fi + \fi +} +% \end{macrocode} +% \end{macro} +% +% +% \subsection{$B%F%-%9%H%U%)%s%H(B} +% $B%F%-%9%H%U%)%s%H$N$?$a$NB0@-$d%(%i!<=qBN$J$I$N@k8@$G$9!#(B +% +% \noindent +% $B=D2#%(%s%3!<%I6&DL!'(B +% \begin{macrocode} +\DeclareKanjiEncodingDefaults{}{} +\DeclareErrorKanjiFont{JY1}{mc}{m}{n}{10} +% \end{macrocode} +% $B2#AH%(%s%3!<%I!'(B +% \begin{macrocode} +\DeclareYokoKanjiEncoding{JY1}{}{} +\DeclareKanjiSubstitution{JY1}{mc}{m}{n} +% \end{macrocode} +% $B=DAH%(%s%3!<%I!'(B +% \begin{macrocode} +\DeclareTateKanjiEncoding{JT1}{}{} +\DeclareKanjiSubstitution{JT1}{mc}{m}{n} +% \end{macrocode} +% $B%U%)%s%HB0@-$N%G%U%)%k%HCM!'(B +% \begin{macrocode} +\newcommand\mcdefault{mc} +\newcommand\gtdefault{gt} +\newcommand\kanjiencodingdefault{JY1} +\newcommand\kanjifamilydefault{\mcdefault} +\newcommand\kanjiseriesdefault{\mddefault} +\newcommand\kanjishapedefault{\updefault} +% \end{macrocode} +% $BOBJ8%(%s%3!<%I$N;XDj!'(B +% \begin{macrocode} +\kanjiencoding{JY1} +% \end{macrocode} +% $B%U%)%s%HDj5A!'(B +% $B$3$l$i$N6qBNE*$JFbMF$OBh(B\ref{plfonts:fontdef}$B@a$r;2>H$7$F$/$@$5$$!#(B +% \changes{v1.3}{1997/01/24}{Rename font definition filename.} +% \begin{macrocode} +\input{jy1mc.fd} +\input{jy1gt.fd} +\input{jt1mc.fd} +\input{jt1gt.fd} +% \end{macrocode} +% $B%U%)%s%H$rM-8z$K$9$k(B +% \begin{macrocode} +\fontencoding{JT1}\selectfont +\fontencoding{JY1}\selectfont +% \end{macrocode} +% +% \begin{macro}{\textmc} +% \begin{macro}{\textgt} +% \changes{v1.3b}{1997/01/28}{\cs{textmc}, \cs{textgt}$B$NF0:n=$@5(B} +% $B%F%-%9%H%U%!%_%j$r@Z$jBX$($k$?$a$N%3%^%s%I$G$9!#(B +% \file{ltfntcmd.dtx}$B$GDj5A$5$l$F$$$k(B|\textrm|$B$J$I$KBP1~$7$^$9!#(B +% \begin{macrocode} +\DeclareTextFontCommand{\textmc}{\mcfamily} +\DeclareTextFontCommand{\textgt}{\gtfamily} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\em} +% \begin{macro}{\emph} +% \changes{v1.3d}{1997/06/25}{\cs{em},\cs{emph}$B$GOBJ8$r6/D4=qBN$K(B} +% $B=>Mh$O(B|\em|, |\emph|$B$GOBJ8%U%)%s%H$N@Z$jBX$($O9T$C$F$$$^$;$s$G$7$?$,!"(B +% $BOBJ8%U%)%s%H$b(B|\gtfamily|$B$K@Z$jBX$($k$h$&$K$7$^$7$?!#(B +% \begin{macrocode} +\DeclareRobustCommand\em + {\@nomath\em \ifdim \fontdimen\@ne\font >\z@ + \mcfamily \upshape \else \gtfamily \itshape \fi} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \changes{v1.3b}{1997/01/30}{$B?t<0MQ%U%)%s%H$N@k8@$r%/%i%9%U%!%$%k$K0\F0$7$?(B} +% +% +% \subsection{$B%W%j%m!<%I%U%)%s%H(B} +% $B$"$i$+$8$a%U%)!<%^%C%H%U%!%$%k$K%m!<%I$5$l$k%U%)%s%H$N@k8@$G$9!#(B +% \dst{}$B%W%m%0%i%`$N%*%W%7%g%s$G%m!<%I$5$l$k%U%)%s%H$N%5%$%:$r(B +% $BJQ99$9$k$3$H$,$G$-$^$9!#(B\file{platex.ins}$B$G$O(B|xpt|$B$r;XDj$7$F$$$^$9!#(B +% \begin{macrocode} +%<*xpt> +\DeclarePreloadSizes{JY1}{mc}{m}{n}{5,7,10,12} +\DeclarePreloadSizes{JY1}{gt}{m}{n}{5,7,10,12} +\DeclarePreloadSizes{JT1}{mc}{m}{n}{5,7,10,12} +\DeclarePreloadSizes{JT1}{gt}{m}{n}{5,7,10,12} +%</xpt> +%<*xipt> +\DeclarePreloadSizes{JY1}{mc}{m}{n}{5,7,10.95,12} +\DeclarePreloadSizes{JY1}{gt}{m}{n}{5,7,10.95,12} +\DeclarePreloadSizes{JT1}{mc}{m}{n}{5,7,10.95,12} +\DeclarePreloadSizes{JT1}{gt}{m}{n}{5,7,10.95,12} +%</xipt> +%<*xiipt> +\DeclarePreloadSizes{JY1}{mc}{m}{n}{7,9,12,14.4} +\DeclarePreloadSizes{JY1}{gt}{m}{n}{7,9,12,14.4} +\DeclarePreloadSizes{JT1}{mc}{m}{n}{7,9,12,14.4} +\DeclarePreloadSizes{JT1}{gt}{m}{n}{7,9,12,14.4} +%</xiipt> +%<*ori> +\DeclarePreloadSizes{JY1}{mc}{m}{n} + {5,6,7,8,9,10,10.95,12,14.4,17.28,20.74,24.88} +\DeclarePreloadSizes{JY1}{gt}{m}{n} + {5,6,7,8,9,10,10.95,12,14.4,17.28,20.74,24.88} +\DeclarePreloadSizes{JT1}{mc}{m}{n} + {5,6,7,8,9,10,10.95,12,14.4,17.28,20.74,24.88} +\DeclarePreloadSizes{JT1}{gt}{m}{n} + {5,6,7,8,9,10,10.95,12,14.4,17.28,20.74,24.88} +%</ori> +% \end{macrocode} +% +% +% \subsection{$BAHHG%Q%i%a!<%?(B} +% $B6XB'%Q%i%a!<%?$dJ8;z4V$XA^F~$9$k%9%Z!<%9$N@_Dj$J$I$G$9!#(B +% $B<B:]$N3FJ8;z$X$N6XB'%Q%i%a!<%?$*$h$S%9%Z!<%9$NA^F~$N5v2D@_Dj$J$I$O!"(B +% \file{kinsoku.tex}$B$G9T$J$C$F$$$^$9!#(B +% $B6qBNE*$J@_Dj$K$D$$$F$O!"(B\file{kinsoku.dtx}$B$r;2>H$7$F$/$@$5$$!#(B +% \begin{macrocode} +\InputIfFileExists{kinsoku.tex}% + {\message{Loading kinsoku patterns for japanese.}} + {\errhelp{The configuration for kinsoku is incorrectly installed.^^J% + If you don't understand this error message you need + to seek^^Jexpert advice.}% + \errmessage{OOPS! I can't find any kinsoku patterns for japanese^^J% + \space Think of getting some or the + platex2e setup will never succeed}\@@end} +% \end{macrocode} +% +% $BAHHG%Q%i%a!<%?$N@_Dj$r$7$^$9!#(B +% |\kanjiskip|$B$O!"4A;z$H4A;z$N4V$KA^F~$5$l$k%0%k!<$G$9!#(B +% |\noautospacing|$B$G!"A^F~$rCf;_$9$k$3$H$,$G$-$^$9!#(B +% $B%G%U%)%k%H$O(B|\autospacing|$B$G$9!#(B +% \begin{macrocode} +\kanjiskip=0pt plus .4pt minus .5pt +\autospacing +% \end{macrocode} +% |\xkanjiskip|$B$O!"OB2$J84V$K<+F0E*$KA^F~$5$l$k%0%k!<$G$9!#(B +% |\noautoxspacing|$B$G!"A^F~$rCf;_$9$k$3$H$,$G$-$^$9!#(B +% $B%G%U%)%k%H$O(B|\autoxspacing|$B$G$9!#(B +% \changes{v1.1c}{1995/09/12}{\cs{xkanjiskip}$B$N%G%U%)%k%HCM(B} +% \begin{macrocode} +\xkanjiskip=.25zw plus1pt minus1pt +\autoxspacing +% \end{macrocode} +% |\jcharwidowpenalty|$B$O!"%Q%i%0%i%U$KBP$9$k6XB'$G$9!#(B +% $B%Q%i%0%i%U$N:G8e$N9T$,#1J8;z$@$1$K$J$i$J$$$h$&$KD4@0$9$k$?$a$K;H$o$l$^$9!#(B +% \begin{macrocode} +\jcharwidowpenalty=500 +% \end{macrocode} +% $B:G8e$K!"(B|\inhibitglue|$B$N4JN,7A$rDj5A$7$^$9!#(B +% $B$3$N%3%^%s%I$O!"OBJ8%U%)%s%H$N%a%H%j%C%/>pJs$+$i!"<+F0E*$KA^F~$5$l$k(B +% $B%0%k!<$NA^F~$r6X;_$7$^$9!#(B +% \begin{macrocode} +\def\<{\inhibitglue} +% \end{macrocode} +% +% $B$3$3$^$G$,!"(B\file{pldefs.ltx}$B$NFbMF$G$9!#(B +% \begin{macrocode} +%</pldefs> +% \end{macrocode} +% +% +% +% \section{$B%U%)%s%HDj5A%U%!%$%k(B}\label{plfonts:fontdef} +% \changes{v1.3}{1997/01/24}{Rename provided font definition filename.} +% $B$3$3$G$O!"%U%)%s%HDj5A%U%!%$%k$N@_Dj$r$7$F$$$^$9!#%U%)%s%HDj5A%U%!%$%k$O!"(B +% \LaTeX{}$B$N%U%)%s%HB0@-$r(B\TeX{}$B%U%)%s%H$KCV$-49$($k$?$a$N%U%!%$%k$G$9!#(B +% $B5-=RJ}K!$K$D$$$F$N>\:Y$O!"(B|fntguide.tex|$B$r;2>H$7$F$/$@$5$$!#(B +% +% $B2$J8=qBN$N@_Dj$K$D$$$F$O!"(B +% \file{cmfonts.fdd}$B$d(B\file{slides.fdd}$B$J$I$r;2>H$7$F$/$@$5$$!#(B +% \file{skfonts.fdd}$B$K$O!"<L8&BeMQ=qBN$r;H$&$?$a$N%Q%C%1!<%8$H(B +% $B%U%)%s%HDj5A$,5-=R$5$l$F$$$^$9!#(B +% \begin{macrocode} +%<JY1mc>\ProvidesFile{jy1mc.fd} +%<JY1gt>\ProvidesFile{jy1gt.fd} +%<JT1mc>\ProvidesFile{jt1mc.fd} +%<JT1gt>\ProvidesFile{jt1gt.fd} +%<JY1mc,JY1gt,JT1mc,JT1gt> [1997/01/24 v1.3 KANJI font defines] +% \end{macrocode} +% $B2#AHMQ!"=DAHMQ$H$b$K!"(B +% $BL@D+BN$N%7%j!<%:(B|bx|$B$,%4%7%C%/BN$H$J$k$h$&$K@k8@$7$F$$$^$9!#(B +% \changes{v1.2}{1995/11/24}{it, sl, sc $B$N@k8@$r30$7$?(B} +% \changes{v1.3b}{1997/01/29}{$B%U%)%s%HDj5A%U%!%$%k$N%5%$%:;XDj$ND4@0(B} +% \changes{v1.3b}{1997/03/11}{$B$9$Y$F$N%5%$%:$r%m!<%I2DG=$K$7$?(B} +% \begin{macrocode} +%<*JY1mc> +\DeclareKanjiFamily{JY1}{mc}{} +\DeclareRelationFont{JY1}{mc}{m}{}{OT1}{cmr}{m}{} +\DeclareRelationFont{JY1}{mc}{bx}{}{OT1}{cmr}{bx}{} +\DeclareFontShape{JY1}{mc}{m}{n}{<5> <6> <7> <8> <9> <10> sgen*min + <10.95><12><14.4><17.28><20.74><24.88> min10 + <-> min10 + }{} +\DeclareFontShape{JY1}{mc}{bx}{n}{<->ssub*gt/m/n}{} +%</JY1mc> +%<*JT1mc> +\DeclareKanjiFamily{JT1}{mc}{} +\DeclareRelationFont{JT1}{mc}{m}{}{OT1}{cmr}{m}{} +\DeclareRelationFont{JT1}{mc}{bx}{}{OT1}{cmr}{bx}{} +\DeclareFontShape{JT1}{mc}{m}{n}{<5> <6> <7> <8> <9> <10> sgen*tmin + <10.95><12><14.4><17.28><20.74><24.88> tmin10 + <-> tmin10 + }{} +\DeclareFontShape{JT1}{mc}{bx}{n}{<->ssub*gt/m/n}{} +%</JT1mc> +%<*JY1gt> +\DeclareKanjiFamily{JY1}{gt}{} +\DeclareRelationFont{JY1}{gt}{m}{}{OT1}{cmr}{bx}{} +\DeclareFontShape{JY1}{gt}{m}{n}{<5> <6> <7> <8> <9> <10> sgen*goth + <10.95><12><14.4><17.28><20.74><24.88> goth10 + <-> goth10 + }{} +\DeclareFontShape{JY1}{gt}{bx}{n}{<->ssub*gt/m/n}{} +%</JY1gt> +%<*JT1gt> +\DeclareKanjiFamily{JT1}{gt}{} +\DeclareRelationFont{JT1}{gt}{m}{}{OT1}{cmr}{bx}{} +\DeclareFontShape{JT1}{gt}{m}{n}{<5> <6> <7> <8> <9> <10> sgen*tgoth + <10.95><12><14.4><17.28><20.74><24.88> tgoth10 + <-> tgoth10 + }{} +\DeclareFontShape{JT1}{gt}{bx}{n}{<->ssub*gt/m/n}{} +%</JT1gt> +% \end{macrocode} +% +% +% \Finale +% +\endinput |