texlive[46903] Master/texmf-dist: uplatex (9mar18)
commits+karl at tug.org
commits+karl at tug.org
Fri Mar 9 23:46:27 CET 2018
Revision: 46903
http://tug.org/svn/texlive?view=revision&revision=46903
Author: karl
Date: 2018-03-09 23:46:27 +0100 (Fri, 09 Mar 2018)
Log Message:
-----------
uplatex (9mar18)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/uplatex/base/README.md
trunk/Master/texmf-dist/doc/uplatex/base/uplatex-en.pdf
trunk/Master/texmf-dist/doc/uplatex/base/uplatex.pdf
trunk/Master/texmf-dist/doc/uplatex/base/upldoc.pdf
trunk/Master/texmf-dist/source/uplatex/base/Makefile
trunk/Master/texmf-dist/source/uplatex/base/ujclasses.dtx
trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
trunk/Master/texmf-dist/source/uplatex/base/uplatex.dtx
trunk/Master/texmf-dist/source/uplatex/base/uplcls.ins
trunk/Master/texmf-dist/source/uplatex/base/upldocs.ins
trunk/Master/texmf-dist/source/uplatex/base/uplfmt.ins
trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx
trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx
trunk/Master/texmf-dist/tex/uplatex/base/jt2gt.fd
trunk/Master/texmf-dist/tex/uplatex/base/jt2mc.fd
trunk/Master/texmf-dist/tex/uplatex/base/jy2gt.fd
trunk/Master/texmf-dist/tex/uplatex/base/jy2mc.fd
trunk/Master/texmf-dist/tex/uplatex/base/ujarticle.cls
trunk/Master/texmf-dist/tex/uplatex/base/ujbk10.clo
trunk/Master/texmf-dist/tex/uplatex/base/ujbk11.clo
trunk/Master/texmf-dist/tex/uplatex/base/ujbk12.clo
trunk/Master/texmf-dist/tex/uplatex/base/ujbook.cls
trunk/Master/texmf-dist/tex/uplatex/base/ujreport.cls
trunk/Master/texmf-dist/tex/uplatex/base/ujsize10.clo
trunk/Master/texmf-dist/tex/uplatex/base/ujsize11.clo
trunk/Master/texmf-dist/tex/uplatex/base/ujsize12.clo
trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex
trunk/Master/texmf-dist/tex/uplatex/base/uplatex.ltx
trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx
trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx
trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty
trunk/Master/texmf-dist/tex/uplatex/base/utarticle.cls
trunk/Master/texmf-dist/tex/uplatex/base/utbk10.clo
trunk/Master/texmf-dist/tex/uplatex/base/utbk11.clo
trunk/Master/texmf-dist/tex/uplatex/base/utbk12.clo
trunk/Master/texmf-dist/tex/uplatex/base/utbook.cls
trunk/Master/texmf-dist/tex/uplatex/base/utreport.cls
trunk/Master/texmf-dist/tex/uplatex/base/utsize10.clo
trunk/Master/texmf-dist/tex/uplatex/base/utsize11.clo
trunk/Master/texmf-dist/tex/uplatex/base/utsize12.clo
Removed Paths:
-------------
trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx
Modified: trunk/Master/texmf-dist/doc/uplatex/base/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/uplatex/base/README.md 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/doc/uplatex/base/README.md 2018-03-09 22:46:27 UTC (rev 46903)
@@ -17,6 +17,6 @@
## Release Date
-2018-01-27
+2018-03-09
Japanese TeX Development Community
Modified: trunk/Master/texmf-dist/doc/uplatex/base/uplatex-en.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/uplatex/base/uplatex.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/uplatex/base/upldoc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/source/uplatex/base/Makefile
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/Makefile 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/Makefile 2018-03-09 22:46:27 UTC (rev 46903)
@@ -14,8 +14,7 @@
PLFMT = uplatex.ltx uplcore.ltx ukinsoku.tex upldefs.ltx \
jy2mc.fd jy2gt.fd jt2mc.fd jt2gt.fd uptrace.sty
-PLFMT_SRC = uplatex.dtx uplvers.dtx uplfonts.dtx plcore.dtx \
- ukinsoku.dtx
+PLFMT_SRC = uplatex.dtx uplvers.dtx uplfonts.dtx ukinsoku.dtx
PLCLS = ujarticle.cls ujreport.cls ujbook.cls ujsize10.clo \
ujsize11.clo ujsize12.clo ujbk10.clo ujbk11.clo ujbk12.clo \
Deleted: trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -1,1968 +0,0 @@
-% \iffalse meta-comment
-%% File: plcore.dtx
-%
-% Copyright 1994-2001 ASCII Corporation.
-% Copyright (c) 2010 ASCII MEDIA WORKS
-% Copyright (c) 2016-2018 Japanese TeX Development Community
-%
-% This file is part of the pLaTeX2e system (community edition).
-% -------------------------------------------------------------
-%
-% \fi
-%
-%
-% \setcounter{StandardModuleDepth}{1}
-% \StopEventually{}
-%
-% \iffalse
-% \changes{v1.0}{1994/09/16}{first edition}
-% \changes{v1.1}{1995/04/12}{$B5SCm%^%/%m=$@5(B}
-% \changes{v1.1a}{1995/11/10}{\cs{topmargin}$B$,H?1G$5$l$J$$%P%0$r=$@5(B}
-% \changes{v1.1b}{1996/01/26}{$B5SCm%^!<%/$N8e$m$KM>7W$J%9%Z!<%9$,F~$k$N$r=$@5(B}
-% \changes{v1.1c}{1996/01/30}{$B%U%!%$%kL>$r(B\file{ploutput.dtx}$B$+$i(B
-% \file{plcore.dtx}$B$H$7$?!#%-%c%W%7%g%s3HD%$r(B\file{plext.dtx}$B$K0\F0!#(B
-% $B%W%j%"%s%V%k%3%^%s%I$rDI2C(B}
-% \changes{v1.1d}{1996/02/17}{\cs{printglossary}$B$rDI2C(B}
-% \changes{v1.1e}{1996/03/12}{tabbing$B4D6-$G$NOB2$J84V%9%Z!<%9(B}
-% \changes{v1.1f}{1996/07/10}{$B%H%s%\$^$o$j$r=$@5(B}
-% \changes{v1.1g}{1997/01/16}{\LaTeX\ \textt{!<1996/06/01!>}$B$KBP1~(B}
-% \changes{v1.1h}{1997/06/25}{\LaTeX\ $B$N2~9T%^%/%m$NJQ99$KBP1~(B}
-% \changes{v1.1i}{1998/02/03}{\cs{@shipoutsetup}$B$r(B\cs{@outputpage}$BFb$KF~$l$?(B}
-% \changes{v1.1j}{2001/05/10}{\cs{@makecol}$B$GAH$_N)$F$i$l$k(B
-% \cs{@outputbox}$B$NBg$-$5$,!"=DAH$GCf?H$,6u$N%\%C%/%9$@$1$N>l9g$bE, at 5$K$J$k(B
-% $B$h$&$K=$@5(B}
-% \changes{v1.2}{2001/09/04}{$BK\J8$H(B\cs{footnoterule}$B$,=E$J$C$F$7$^$&$N$r=$@5(B}
-% \changes{v1.2a}{2001/09/26}{\LaTeX\ \texttt{!<2001/06/01!>}$B$KBP1~(B}
-% \changes{v1.2b}{2016/01/26}{2013$BG/0J9_$N(Bp\TeX\ (r28720)$B$G5SCmHV9f$NA08e$NOBJ8J8;z(B
-% $B$H$N4V$K(Bxkanjiskip$B$,F~$C$F$7$^$&LdBj$KBP1~!#(B
-% \cs{@outputbox}$B$N?<$5$,B>$N$b$N$N0LCV$K1F6A$rM?$($J$$(B
-% $B$h$&$K$9$k(B\texttt{\cs{vskip}~-\cs{dimen@}}$B$,=DAH%b!<%I$G$OL58z$K$J$C$F$$$?$N$G=$@5(B}
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(Btabular$B4D6-$K$b9T$C$?(B}
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(B\cs{parbox}$BL?Na$K$b9T$C$?(B}
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(B\cs{underline}$BL?Na$K$b9T$C$?(B}
-% \changes{v1.2d}{2016/04/01}{multicol$B%Q%C%1!<%8$r;H$&$H%H%s%\$N2<C<$,=L$`LdBj$r=$@5(B}
-% \changes{v1.2e}{2016/05/20}{\file{fltrace}$B%Q%C%1!<%8$N(Bp\LaTeX{}$BHG(B
-% $B$H$7$F(B\file{pfltrace}$B%Q%C%1!<%8$r?7 at _(B}
-% \changes{v1.2f}{2016/06/30}{\cs{@begindvibox}$B$r>o$K2#AH$K(B}
-% \changes{v1.2g}{2016/08/25}{$B%+%&%s%?(B\cs{pltx at foot@penalty}$B$rDI2C(B}
-% \changes{v1.2g}{2016/08/25}{$B9g0u$NA0$NJ8;z$H9g0u$N4V$r%Y%?AH$K(B}
-% \changes{v1.2g}{2016/08/25}{$BJD$83g8LN`$ND>8e$K(B\cs{footnotetext}$B$,B3$/(B
-% $B>l9g$K2~9T$,5/$-$k$3$H$,$"$kLdBj$KBP=h(B}
-% \changes{v1.2g}{2016/08/25}{$B5SCm$N9g0uD>8e$G$N2~9T$,6X;_$5$l$F$7$^$&(B
-% $BLdBj$KBP=h(B}
-% \changes{v1.2h}{2016/09/01}{$B=DAH$G(Blongtable$B%Q%C%1!<%8$r;H$C$FI=AH$NESCf$G2~%Z!<%8(B
-% $B$9$k$H$-L58B%k!<%W$,5/$3$kLdBj$KBP=h(B(Issue 21)}
-% \changes{v1.2i}{2016/09/08}{v1.2g$B$N=$@5$GF~$l$?(B\cs{null}$B$,$^$:$+$C$?$N$G(B
-% $B?eJ?%b!<%I$N$H$-$@$1H/9T$9$k$3$H$K$7$?(B(Issue 23)}
-% \changes{v1.2j}{2016/11/09}{FAM256$B%Q%C%AE,MQ(Be-p\TeX{}$B$KBP1~(B}
-% \changes{v1.2k}{2017/02/20}{$BL\<!$G(B\cs{ref}$B$r;H$C$?>l9g$K8e$m$N6uGr$,>C$($k(B
-% $B8=>]$KBP=h$9$k$?$a!"(B\cs{relax}$B$N$"$H$K(B\{\}$B$rDI2C(B}
-% \changes{v1.2l}{2017/02/25}{$B5SCm$H%\%H%`%U%m!<%H$N=g=x$rF~$lBX$($?$3$H$G(B
-% $BHGLLA4BN$N?bD>0LCV$,$:$l$F$$$?$N$r=$@5(B(Issue 32)}
-% \changes{v1.2l}{2017/02/25}{\cs{@makecol}$B$rJQ99$7$?$N$K(B
-% \cs{@makespecialcolbox}$B$rJQ99$7$J$$!"$H$$$&H=CG$K$D$$$FL at J82=(B}
-% \changes{v1.2m}{2017/03/19}{\cs{language}$B$r%j%;%C%H(B
-% (sync with ltoutput.dtx 2017/03/10 v1.3c)}
-% \changes{v1.2m}{2017/03/19}{\cs{verb}$B$NESCf$G%O%$%U%M!<%7%g%s$,5/$-$J$$(B
-% $B$h$&$K(B\cs{language}$B$r at _Dj(B(sync with ltmiscen.dtx 2017/03/09 v1.1m)}
-% \changes{v1.2n}{2017/04/23}{$B%I%-%e%a%s%H$NDI2C(B}
-% \changes{v1.2o}{2017/05/03}{$B9TF,6XB'J8;z$ND>A0$G$b2~9T$9$k$h$&$K$7$?(B}
-% \changes{v1.2p}{2017/07/21}{tabular$B4D6-$N%;%kFb$N(BJFM$B%0%k!=$r:o=|(B}
-% \changes{v1.2q}{2017/08/25}{\cs{nolinebreak}$B$N>l9g$K(B\cs{(x)kanjiskip}$B$,(B
-% $BF~$i$J$/$J$C$F$$$?$N$r=$@5(B}
-% \changes{v1.2r}{2017/09/26}{tabular$B4D6-$N1&B7$((B(r)$B$G7S@~$,$:$l$k$h$&$K(B
-% $B$J$C$F$$$?%P%0$r=$@5(B}
-% \changes{v1.2s}{2017/09/27}{$BAj8_;2>H$N%9%Z!<%9%U%!%/%?!<$rJd at 5(B}
-% \changes{v1.2s}{2017/09/27}{\cs{verb}$B$NKAF,$NH>3Q6uGr$rJ];}(B}
-% \changes{v1.2s}{2017/09/27}{tabbing$B4D6-$N9TKAF,$N(BJFM$B%0%k!=$r:o=|(B}
-% \changes{v1.2t}{2017/10/31}{v1.2s$B$NJQ99$KH<$$!"(B\cs{ref}$B$,?t<0%b!<%I$G(B
-% $B%(%i!<$K$J$C$F$$$?$N$r=$@5(B}
-% \changes{v1.2u}{2017/11/04}{emath$B$N(B\cs{marusuuref}$BBP:v(B}
-% \changes{v1.2v}{2018/01/27}{v1.2o$B$H(Bv1.2q$B$N=$@5$G(B\cs{nolinebreak}$B$,(B
-% $B8z$+$J$$>l9g$,$"$C$?$N$G!"85$KLa$7$?(B}
-% \fi
-%
-% \iffalse
-%<*driver>
-\NeedsTeXFormat{pLaTeX2e}
-% \fi
-\ProvidesFile{plcore.dtx}[2018/01/27 v1.2v pLaTeX core file]
-% \iffalse
-\documentclass{jltxdoc}
-\GetFileInfo{plcore.dtx}
-\title{p\LaTeXe{}$B$N3HD%(B\space\fileversion}
-\author{Ken Nakano \& Hideaki Togashi}
-\date{$B:n at .F|!'(B\filedate}
-\begin{document}
- \maketitle
- \tableofcontents
- \DocInput{\filename}
-\end{document}
-%</driver>
-% \fi
-%
-%
-% \section{$B35MW(B}\label{plcore:intro}
-% $B$3$N%U%!%$%k$G$O!"$D$.$N5!G=$N3HD%$d=$@5$r9T$C$F$$$^$9!#(B
-% $B>\:Y$O!"$=$l$>$l$N9`L\$N at bL@$r;2>H$7$F$/$@$5$$!#(B
-%
-% \begin{itemize}
-% \item $B%W%j%"%s%V%k%3%^%s%I(B
-% \item $B2~%Z!<%8(B
-% \item $B2~9T(B
-% \item $B%*%V%8%'%/%H$N=PNO=g=x(B
-% \item $B%H%s%\(B
-% \item $B5SCm%^%/%m(B
-% \item $BAj8_;2>H(B
-% \item $B5?;w%?%$%WF~NO(B
-% \item tabbing$B4D6-(B
-% \item $BMQ8l=8$N=PNO(B
-% \item $B;~J,$r<($9%+%&%s%?(B
-% \end{itemize}
-%
-%
-% \section{$B%3!<%I(B}
-%
-% $B$3$N%U%!%$%k$NFbMF$O!"(Bp\LaTeXe{}$B$N%3%"ItJ,$G$9!#(B
-% \begin{macrocode}
-%<*plcore>
-% \end{macrocode}
-%
-% \subsection{$B%W%j%"%s%V%k%3%^%s%I(B}
-% $BJ8=q%U%!%$%k$,I,MW$H$9$k%U%)!<%^%C%H%U%!%$%k$N;XDj$r$9$k%3%^%s%I$r(B
-% $B3HD%$7!"(Bp\LaTeXe{}$B%U%)!<%^%C%H%U%!%$%k$bG'<1$9$k$h$&$K$7$^$9!#(B
-%
-% \begin{macro}{\NeedsTeXFormat}
-% \begin{macro}{\@needsPformat}
-% \begin{macro}{\@needsPf at rmat}
-% |\NeedsTeXFormats|$B$K(B``pLaTeX2e''$B$r;XDj$9$k$H!"(B
-% ``LaTeX2e''$B%U%)!<%^%C%H$rI,MW$H$9$k1Q8lHG$N%/%i%9%U%!%$%k$d(B
-% $B%Q%C%1!<%8%U%!%$%k$J$I$,;H$($J$/$J$C$F$7$^$&$?$a$K:FDj5A$7$^$9!#(B
-% $B$3$N%3%^%s%I$O(B\file{ltclass.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \begin{macrocode}
-\def\NeedsTeXFormat#1{%
- \def\reserved at a{#1}%
- \ifx\reserved at a\pfmtname
- \expandafter\@needsPformat
- \else
- \ifx\reserved at a\fmtname
- \expandafter\expandafter\expandafter\@needsformat
- \else
- \@latex at error{This file needs format `\reserved at a'%
- \MessageBreak but this is `\pfmtname'}{%
- The current input file will not be processed
- further,\MessageBreak
- because it was written for some other flavor of
- TeX.\MessageBreak\@ehd}%
- \endinput
- \fi
- \fi}
-%
-\def\@needsPformat{\@ifnextchar[\@needsPf at rmat{}}
-%
-\def\@needsPf at rmat[#1]{%
- \@ifl at t@r\pfmtversion{#1}{}%
- {\@latex at warning@no at line
- {You have requested release `#1' of pLaTeX,\MessageBreak
- but only release `\pfmtversion' is available}}}
-%
-\@onlypreamble\@needsPformat
-\@onlypreamble\@needsPf at rmat
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\documentstyle}
-% |\documentclass|$B$NBe$o$j$K(B|\documentstyle|$B$,;H$o$l$k$H!"(B
-% \LaTeX~2.09$B8_49%b!<%I$KF~$j$^$9!#$3$N$H$-!"(B
-% $B%*%j%8%J%k$N(B\LaTeX{}$B$G$O(B\file{latex209.def}$B$rFI$_9~$_$^$9$,!"(B
-% p\LaTeXe{}$B$G$O(B\file{pl209.def}$B$rFI$_9~$_$^$9!#(B
-% $B$3$N%3%^%s%I$O(B\file{ltclass.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \begin{macrocode}
-\def\documentstyle{%
- \makeatletter\input{pl209.def}\makeatother
- \documentclass}
-% \end{macrocode}
-% \end{macro}
-%
-%
-%
-% \subsection{$B2~%Z!<%8(B}
-% $B=DAH$N$H$-!"2~%Z!<%88e$NFbMF$,6v?t%Z!<%8!J1&%Z!<%8!K$+$i$O$8$^$k$h$&$K$7$^$9!#(B
-% $B2#AH$N$H$-$K$O!"4q?t%Z!<%8!J1&%Z!<%8!K$+$i$O$8$^$j$^$9!#(B
-%
-% \begin{macro}{\cleardoublepage}
-% $B$3$N%3%^%s%I$K$h$C$F=PNO$5$l$k!"Gr%Z!<%8$N%Z!<%8%9%?%$%k$r(B
-% \pstyle{empty}$B$K$7!"%X%C%@$H%U%C%?$,F~$i$J$$$h$&$K$7$F$$$^$9!#(B
-% \file{ltoutput.dtx}$B$NDj5A$r!"=DAH!"2#AH$K9g$o$;$F!"Dj5A$7$J$*$7$?$b$N$G$9!#(B
-% \begin{macrocode}
-\def\cleardoublepage{\clearpage\if at twoside
- \ifodd\c at page
- \iftdir
- \hbox{}\thispagestyle{empty}\newpage
- \if at twocolumn\hbox{}\newpage\fi
- \fi
- \else
- \ifydir
- \hbox{}\thispagestyle{empty}\newpage
- \if at twocolumn\hbox{}\newpage\fi
- \fi
- \fi\fi}
-% \end{macrocode}
-% \end{macro}
-%
-% \subsection{$B2~9T(B}
-%
-% \begin{macro}{\@gnewline}
-% \changes{v1.1c}{1995/08/25}{$B9TF,6XB'J8;z$ND>A0$G$N2~9T$G$NIT6q9g$N=$@5(B}
-% $BF|K\8l(B\TeX{}$B$N9TF,6XB'=hM}$O!"6XB'BP>]J8;z$ND>A0$K!"(B
-% |\prebreakpenalty|$B$G;XDj$5$l$?%Z%J%k%F%#$NCM$rA^F~$9$k$3$H$G(B
-% $B9T$J$C$F$$$^$9!#(B
-% $B$H$3$m$,!"2~9T%3%^%s%I$OIi$N%Z%J%k%F%#$NCM$rA^F~$9$k$3$H$G2~9T$r9T$J$$$^$9!#(B
-% $B$=$N$?$a$K!"6XB'%Z%J%k%F%#$NCM$,(B$10000$$B$NJ8;z$ND>8e$G$O!"%Z%J%k%F%#$NCM$,(B
-% $BAj;&$5$l!"2~9T$9$k$3$H$,$G$-$^$;$s!#(B
-%
-%\begin{verbatim}
-% $B$"$$$&$($*(B\\
-% $B!*$+$-$/$1$3(B
-%\end{verbatim}
-%
-% $B$7$?$,$C$F!"(B|\newline|$B%^%/%m$K(B|\mbox{}|$B$rF~$l$k$3$H$K$h$C$F!"(B
-% |\newline|$B%^%/%m$N%Z%J%k%F%#(B$-10000$$B$H9TF,J8;z$N%Z%J%k%F%#(B$10000$$B$,(B
-% $B2C;;$5$l$J$$$h$&$K$7$^$9!#(B|\\|$B$O(B|\newline|$B%^%/%m$r8F$S=P$7$F$$$^$9!#(B
-%
-% $B$J$*!"(B|\newline|$B%^%/%m$O(B\file{ltspaces.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-%
-% \changes{v1.1j}{1999/04/05}{$B%*%W%7%g%s$rIU$1$?>l9g$K!"M>7W$J6uGr(B
-% $B$,F~$C$F$7$^$&$N$r=$@5!#$"$j$,$H$&!"NkLZN4;V!w5~ETBg3X$5$s!#(B}
-% \changes{v1.1h}{1997/06/25}{\LaTeX\ $B$N2~9T%^%/%m$NJQ99$KBP1~!#(B
-% $B$"$j$,$H$&!"1|B<$5$s!#(B}
-% \LaTeX\ \texttt{<1996/12/01>}$B$G2~9T%^%/%m$,JQ99$5$l!"(B|\\|$B$,(B
-% |\newline|$B$r8F$S=P$5$J$/$J$C$?$?$a!"JQ99$5$l$?2~9T%^%/%m$KBP1~$7$^$7(B
-% $B$?!#(B|\null|$B$NA^F~0LCV$OF1$8$G$9!#(B
-% \file{ltspace.dtx}$B$NDj5A$r>e5-$K9g$o$;$F!"Dj5A$7$J$*$7$^$7$?!#(B
-%
-% \emph{$BF|K\8l(B\TeX{}$B3+H/%3%_%e%K%F%#$K$h$kJdB-(B}$B!'(B
-% $B%"%9%-!<$K$h$k(Bp\LaTeX{}$B$G$O!"9TF,6XB'J8;z$ND>A0$G(B|\\|$B$K$h$k6/@)2~9T$r(B
-% $B9T$($k$h$&$K$9$k$H$$$&L\E*$G(B
-% |\null|$B$r(B|\@gnewline|$B%^%/%mFb$KA^F~$7$F$$$^$7$?!#(B
-% $B$7$+$7!"$3$l$G$O(B|\\\par|$B$H=q$$$?>l9g$K(BUnderfull$B7Y9p$,=P$J$/$J$C$F(B
-% $B$$$^$9!J(B|tests/newline_par.tex|$B$r(B\texttt{latex}$B$H(B\texttt{platex}$B$G(B
-% $B=hM}$7$F$_$F$/$@$5$$!K!#(B
-%
-% $B$b$7(B|\null|$B$NBe$o$j$K(B|\hskip\z@|$B$rA^F~$9$l$P!"(B\LaTeX{}$B$HF1MM$K(B
-% Underfull$B7Y9p$r=P$9$3$H$,$G$-$^$9!#(B
-% $B$?$@$7!"(B|\null|$B$rA^F~$7$?>l9g$H0[$J$j!"6/@)2~9T8e$N9TF,$K(B
-% JFM$B%0%k!=$,F~$i$J$/$J$j$^$9!#$3$l$O$`$7$m!"1|B<$5$s$N(Bjsclasses$B$G(B
-% $B9TF,$rE7%D%-$KD>$7$F$$$k$N$HF1$8$G$9$,!"(Bp\LaTeX{}$B$H$7$F$O5sF0$,(B
-% $BJQ2=$7$F$7$^$$$^$9$N$G!"8=;~E@$G$O(B|\null|$B"*(B|\hskip\z@|$B$X$NJQ99$r(B
-% $B8+Aw$C$F$$$^$9!#(B
-% \changes{v1.2n}{2017/04/23}{$B%I%-%e%a%s%H$NDI2C(B}
-%
-% \begin{macrocode}
-\def\@gnewline #1{%
- \ifvmode
- \@nolnerr
- \else
- \unskip \reserved at e {\reserved at f#1}\nobreak \hfil \break \null
- \ignorespaces
- \fi}
-%</plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@no at lnbk}
-% \emph{$BF|K\8l(B\TeX{}$B3+H/%3%_%e%K%F%#$K$h$kDI2C(B}$B!'(B
-% $B$5$i$K!"(B|\\|$B$@$1$G$J$/(B|\linebreak|$B$K$D$$$F$bF1MM$NBP=h$r$7$^$9!#(B
-% \LaTeX{}$B$NDj5A$N$^$^$G$O%^%/%m$K$h$k%Z%J%k%F%#(B$-10000$$B$H(B
-% $B9TF,J8;z$N%Z%J%k%F%#(B$10000$$B$,2C;;$5$l$F$7$^$&$?$a!"(B
-% |\hskip\z@\relax|$B$rF~$l$F$*$-$^$9!#$J$*!"(B|\linebreak|$B$rH/9T$7$F(B
-% $B9TJ,3d$,5/$-$?>l9g!"?7$7$$9TF,$N(BJFM$B%0%k!=$O>C$($k$H$$$&=>Mh$N(B
-% p\LaTeX{}$B$N5sF0$b0];}$7$F$$$^$9!#(B
-% \changes{v1.2o}{2017/05/03}{$B9TF,6XB'J8;z$ND>A0$G$b2~9T$9$k$h$&$K$7$?(B}
-%
-% $BA02s$N(B|\hskip\z@\relax|$B$NDI2C$G$O!"(B|\nolinebreak|$B$N>l9g$K(B|\kanjiskip|$B$d(B
-% |\xkanjiskip|$B$,F~$i$J$$LdBj$,5/$-$F$7$^$$$^$7$?!#$=$3$G!"(B
-% |\penalty\z@\relax|$B$KJQ99$7$^$7$?!#$3$l$O!"L@<(E*$J(B|\penalty|$B%W%j%_%F%#%V(B
-% $BF1;N$N9g;;$O9T$o$l$J$$$3$H$rMxMQ$7$F$$$^$9!#(B
-% \changes{v1.2q}{2017/08/25}{\cs{nolinebreak}$B$N>l9g$K(B\cs{(x)kanjiskip}$B$,(B
-% $BF~$i$J$/$J$C$F$$$?$N$r=$@5(B}
-%
-% $B$H$3$m$,!"$=$NJQ99$K$h$C$F$=$b$=$b(B|\nolinebreak|$B$,8z$+$J$$>l9g$,(B
-% $B at 8$8$?$N$G!"JQ99A4BN$r$$$C$?$s%-%c%s%;%k$7$F85$KLa$7$^$9!#(B
-% \changes{v1.2v}{2018/01/27}{v1.2o$B$H(Bv1.2q$B$N=$@5$G(B\cs{nolinebreak}$B$,(B
-% $B8z$+$J$$>l9g$,$"$C$?$N$G!"85$KLa$7$?(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/10/28}{\@no at lnbk}
-%<platexrelease> {Break before prebreakpenalty}%
-%<platexrelease>\def\@no at lnbk #1[#2]{%
-%<platexrelease> \ifvmode
-%<platexrelease> \@nolnerr
-%<platexrelease> \else
-%<platexrelease> \@tempskipa\lastskip
-%<platexrelease> \unskip
-%<platexrelease> \penalty #1\@getpen{#2}%
-%<platexrelease> \ifdim\@tempskipa>\z@
-%<platexrelease> \hskip\@tempskipa
-%<platexrelease> \ignorespaces
-%<platexrelease> \fi
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2017/07/29}{\@no at lnbk}
-%<platexrelease> {Break before prebreakpenalty}%
-%<platexrelease>\def\@no at lnbk #1[#2]{%
-%<platexrelease> \ifvmode
-%<platexrelease> \@nolnerr
-%<platexrelease> \else
-%<platexrelease> \@tempskipa\lastskip
-%<platexrelease> \unskip
-%<platexrelease> \penalty #1\@getpen{#2}%
-%<platexrelease> \penalty\z@\relax %% added (2017/08/25)
-%<platexrelease> \ifdim\@tempskipa>\z@
-%<platexrelease> \hskip\@tempskipa
-%<platexrelease> \ignorespaces
-%<platexrelease> \fi
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2017/05/05}{\@no at lnbk}
-%<platexrelease> {Break before prebreakpenalty}%
-%<platexrelease>\def\@no at lnbk #1[#2]{%
-%<platexrelease> \ifvmode
-%<platexrelease> \@nolnerr
-%<platexrelease> \else
-%<platexrelease> \@tempskipa\lastskip
-%<platexrelease> \unskip
-%<platexrelease> \penalty #1\@getpen{#2}%
-%<platexrelease> \hskip\z@\relax %% added (2017/05/03)
-%<platexrelease> \ifdim\@tempskipa>\z@
-%<platexrelease> \hskip\@tempskipa
-%<platexrelease> \ignorespaces
-%<platexrelease> \fi
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@no at lnbk}
-%<platexrelease> {Break before prebreakpenalty}%
-%<platexrelease>\def\@no at lnbk #1[#2]{%
-%<platexrelease> \ifvmode
-%<platexrelease> \@nolnerr
-%<platexrelease> \else
-%<platexrelease> \@tempskipa\lastskip
-%<platexrelease> \unskip
-%<platexrelease> \penalty #1\@getpen{#2}%
-%<platexrelease> \ifdim\@tempskipa>\z@
-%<platexrelease> \hskip\@tempskipa
-%<platexrelease> \ignorespaces
-%<platexrelease> \fi
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% $B$J$*!"(B\LaTeX{}$BMQ$NL?Na$G$"$k(B|\\|$B$H(B|\linebreak|$B$K$O>e5-$N$h$&$J(B
-% $B6XB'J8;z$X$NBP:v$rF~$l$F$$$^$9$,!"(Bplain \TeX{}$B8_49$N%7%s%W%k$J(B
-% $BL?Na$G$"$k(B|\break|$B$d(B|\nobreak|$B$K$O!"BP:v$r9T$$$^$;$s!#(B
-%
-% \subsection{$B%*%V%8%'%/%H$N=PNO=g=x(B}
-% $B%*%j%8%J%k$N(B\LaTeX{}$B$O!"%H%C%W%U%m!<%H!"K\J8!"5SCm!"%\%H%`%U%m!<%H(B
-% $B$N=gHV$G=PNO$7$^$9$1$l$I$b!"F|K\8lAHHG$G$O!"%H%C%W%U%m!<%H!"K\J8!"(B
-% $B%\%H%`%U%m!<%H!"5SCm$H$$$&=gHV$NJ}$,0lHLE*$G$9$N$G!"(B
-% $B$3$N$h$&$J=gHV$K$J$k$h$&=$@5$r$7$^$9!#(B
-%
-% $B$7$?$,$C$F!"J8=q%U%!%$%k$K$h$C$F$O(B\LaTeX{}$B$NAHHG7k2L$H0[$J$k>l9g$,(B
-% $B$"$j$^$9$N$G!"Cm0U$r$7$F$/$@$5$$!#(B
-%
-% 2014$BG/$K(B\LaTeX{}$B$K(B\file{fltrace}$B%Q%C%1!<%8$,DI2C$5$l$^$7$?$N$G!"(B
-% $B$=$N(Bp\LaTeX{}$BHG$H$7$F(B\file{pfltrace}$B%Q%C%1!<%8$rDI2C$7$^$9!#(B
-% $B$3$N(B\file{pfltrace}$B%Q%C%1!<%8$O(B\LaTeX{}$B$N(B\file{fltrace}$B%Q%C%1!<%8$K(B
-% $B0MB8$7$^$9!#(B
-% \changes{v1.2e}{2016/05/20}{\file{fltrace}$B%Q%C%1!<%8$N(Bp\LaTeX{}$BHG(B
-% $B$H$7$F(B\file{pfltrace}$B%Q%C%1!<%8$r?7 at _(B}
-% \begin{macrocode}
-%<*fltrace>
-\NeedsTeXFormat{pLaTeX2e}
-\ProvidesPackage{pfltrace}
- [2016/05/20 v1.2e Standard pLaTeX package (float tracing)]
-\RequirePackageWithOptions{fltrace}
-%</fltrace>
-% \end{macrocode}
-%
-% \begin{macro}{\@makecol}
-% $B$3$N%^%/%m$,AH$_N)$F$kItJ,$NCf?4$H$J$j$^$9!#(B
-% \file{ltoutput.dtx}$B$GDj5A$5$l$F$$$k$b$N$G$9!#(B
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\@makecol}{\@makecol}%
-%<*plcore|platexrelease>
-\gdef\@makecol{%
- \setbox\@outputbox\box\@cclv%
- \let\@elt\relax % added on LaTeX (ltoutput.dtx 2003/12/16 v1.2k)
- \xdef\@freelist{\@freelist\@midlist}%
- \global \let \@midlist \@empty
- \@combinefloats
-% \end{macrocode}
-% $B%*%j%8%J%k$N(B\LaTeX{}$B$O!"%H%C%W%U%m!<%H!"K\J8!"5SCm!"%\%H%`%U%m!<%H$N=gHV$G(B
-% $B=PNO$7$^$9!#0lJ}(Bp\LaTeX{}$B$O!"%H%C%W%U%m!<%H!"K\J8!"%\%H%`%U%m!<%H!"5SCm$N(B
-% $B=gHV$G=PNO$7$^$9!#$H$3$m$,!"%"%9%-!<HG$N%3!<%I$O=gHV$rF~$lBX$($k$@$1$G$J$/!"(B
-% $BHGLLA4BN$N?bD>0LCV$,!JFC$K=DAH$G82Cx$K!K$:$l$F$7$^$C$F$$$^$7$?!#(B
-% $B$3$l$OJd at 5NL(B|\dp\@outputbox|$B$N<hF@$,Aa$9$.$?$?$a$G$9$N$G!"%3%_%e%K%F%#HG(B
-% p\LaTeX{}$B$G$O$3$NLdBj$KBP=h$7$F$"$j$^$9!#7k2LE*$K!"(Bfnpos$B%Q%C%1!<%8(B(yafoot)$B$N(B
-% |\makeFNbottom|$B$+$D(B|\makeFNbelow|$B$J>uBV$H40A4$KEy2A$K$J$j$^$7$?!#(B
-% \changes{v1.2l}{2017/02/25}{$B5SCm$H%\%H%`%U%m!<%H$N=g=x$rF~$lBX$($?$3$H$G(B
-% $BHGLLA4BN$N?bD>0LCV$,$:$l$F$$$?$N$r=$@5(B(Issue 32)}
-% \begin{macrocode}
- \let\pltx at textbottom\@textbottom % save (pLaTeX 2017/02/25)
- \ifvoid\footins\else % changed (pLaTeX 2017/02/25)
- \setbox\@outputbox \vbox {%
- \boxmaxdepth \@maxdepth
- \unvbox \@outputbox
- \@textbottom % inserted here (pLaTeX 2017/02/25)
- \vskip \skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- }%
- \let\@textbottom\relax % disable temporarily (pLaTeX 2017/02/25)
- \fi
- \ifvbox\@kludgeins
- \@makespecialcolbox
- \else
- \setbox\@outputbox \vbox to\@colht {%
-% \boxmaxdepth \@maxdepth % comment out on LaTeX 1997/12/01
- \@texttop
- \dimen@ \dp\@outputbox
- \unvbox \@outputbox
-% \end{macrocode}
-% $B=DAH$N:]$K(B|\@outputbox|$B$NFbMF$,6u$N%\%C%/%9$@$1$N>l9g$K!"(B|\wd\@outputbox|$B$,(B
-% 0pt$B$K$J$C$F$7$^$$!"7k2L$H$7$F%U%C%?$N0LCV$,$/$k$C$F$7$^$C$F$$$?!#(B
-% 0$B$N(B|\hskip|$B$rH/@8$5$;$k$H(B|\wd\@outputbox|$B$NCM$,4|BT$7$?$b$N$H$J$k$N$G!"(B
-% $B=DAH$N>l9g$O$=$NJ}K!$GBP=h$9$k!#(B
-%
-% $B$?$@$7!"(B0$B$N(B|\hskip|$B$rH/@8$5$;$k$H$-!"?eJ?%b!<%I$KF~$C$F$7$^$&$H!"$?$H$($P(B
-% longtable$B%Q%C%1!<%8$r;HMQ$7$FI=AHESCf$G2~%Z!<%8$9$k$H$-$K(B|\par -> {\vskip}|$B$N(B
-% $BL58B%k!<%W$,5/$-$F$7$^$$$^$9!#$=$3$G!"(B|\vbox|$B$NCf$GH/@8$5$;$^$9!#(B
-% \changes{v1.1j}{2001/05/10}{\cs{@makecol}$B$GAH$_N)$F$i$l$k(B
-% \cs{@outputbox}$B$NBg$-$5$,!"=DAH$GCf?H$,6u$N%\%C%/%9$@$1$N>l9g$bE, at 5$K$J$k(B
-% $B$h$&$K=$@5(B}
-% \changes{v1.2b}{2016/01/26}{\cs{@outputbox}$B$N?<$5$,B>$N$b$N$N0LCV$K1F6A$rM?$($J$$(B
-% $B$h$&$K$9$k(B\texttt{\cs{vskip}~-\cs{dimen@}}$B$,=DAH%b!<%I$G$OL58z$K$J$C$F$$$?$N$G=$@5(B}
-% \changes{v1.2h}{2016/09/01}{$B=DAH$G(Blongtable$B%Q%C%1!<%8$r;H$C$FI=AH$NESCf$G2~%Z!<%8(B
-% $B$9$k$H$-L58B%k!<%W$,5/$3$kLdBj$KBP=h(B(Issue 21)}
-% \begin{macrocode}
- \iftdir\vbox{\hskip\z@}\fi
- \vskip -\dimen@
- \@textbottom
- }%
- \fi
- \let\@textbottom\pltx at textbottom % restore (pLaTeX 2017/02/25)
- \global \maxdepth \@maxdepth
-}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/09/03}{\@makecol}{\@makecol}%
-%<platexrelease>\gdef\@makecol{%
-%<platexrelease> \setbox\@outputbox\box\@cclv%
-%<platexrelease> \xdef\@freelist{\@freelist\@midlist}%
-%<platexrelease> \global \let \@midlist \@empty
-%<platexrelease> \@combinefloats
-%<platexrelease> \ifvbox\@kludgeins
-%<platexrelease> \@makespecialcolbox
-%<platexrelease> \else
-%<platexrelease> \setbox\@outputbox \vbox to\@colht {%
-%<platexrelease>% \boxmaxdepth \@maxdepth % comment out on LaTeX 1997/12/01
-%<platexrelease> \@texttop
-%<platexrelease> \dimen@ \dp\@outputbox
-%<platexrelease> \unvbox \@outputbox
-%<platexrelease> \iftdir\vbox{\hskip\z@}\fi
-%<platexrelease> \vskip -\dimen@
-%<platexrelease> \@textbottom
-%<platexrelease> \ifvoid\footins\else % for pLaTeX
-%<platexrelease> \vskip \skip\footins
-%<platexrelease> \color at begingroup
-%<platexrelease> \normalcolor
-%<platexrelease> \footnoterule
-%<platexrelease> \unvbox \footins
-%<platexrelease> \color at endgroup
-%<platexrelease> \fi
-%<platexrelease> }%
-%<platexrelease> \fi
-%<platexrelease> \global \maxdepth \@maxdepth
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@makecol}{\@makecol}%
-%<platexrelease>\gdef\@makecol{%
-%<platexrelease> \setbox\@outputbox\box\@cclv%
-%<platexrelease> \xdef\@freelist{\@freelist\@midlist}%
-%<platexrelease> \global \let \@midlist \@empty
-%<platexrelease> \@combinefloats
-%<platexrelease> \ifvbox\@kludgeins
-%<platexrelease> \@makespecialcolbox
-%<platexrelease> \else
-%<platexrelease> \setbox\@outputbox \vbox to\@colht {%
-%<platexrelease>% \boxmaxdepth \@maxdepth % comment out on LaTeX 1997/12/01
-%<platexrelease> \@texttop
-%<platexrelease> \dimen@ \dp\@outputbox
-%<platexrelease> \unvbox \@outputbox
-%<platexrelease> \iftdir\hskip\z@\fi
-%<platexrelease> \vskip -\dimen@
-%<platexrelease> \@textbottom
-%<platexrelease> \ifvoid\footins\else % for pLaTeX
-%<platexrelease> \vskip \skip\footins
-%<platexrelease> \color at begingroup
-%<platexrelease> \normalcolor
-%<platexrelease> \footnoterule
-%<platexrelease> \unvbox \footins
-%<platexrelease> \color at endgroup
-%<platexrelease> \fi
-%<platexrelease> }%
-%<platexrelease> \fi
-%<platexrelease> \global \maxdepth \@maxdepth
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@makecol}{\@makecol}%
-%<platexrelease>\gdef\@makecol{%
-%<platexrelease> \setbox\@outputbox\box\@cclv%
-%<platexrelease> \xdef\@freelist{\@freelist\@midlist}%
-%<platexrelease> \global \let \@midlist \@empty
-%<platexrelease> \@combinefloats
-%<platexrelease> \ifvbox\@kludgeins
-%<platexrelease> \@makespecialcolbox
-%<platexrelease> \else
-%<platexrelease> \setbox\@outputbox \vbox to\@colht {%
-%<platexrelease>% \boxmaxdepth \@maxdepth % comment out on LaTeX 1997/12/01
-%<platexrelease> \@texttop
-%<platexrelease> \dimen@ \dp\@outputbox
-%<platexrelease> \unvbox \@outputbox
-%<platexrelease> \iftdir\hskip\z@
-%<platexrelease> \else\vskip -\dimen@\fi
-%<platexrelease> \@textbottom
-%<platexrelease> \ifvoid\footins\else % for pLaTeX
-%<platexrelease> \vskip \skip\footins
-%<platexrelease> \color at begingroup
-%<platexrelease> \normalcolor
-%<platexrelease> \footnoterule
-%<platexrelease> \unvbox \footins
-%<platexrelease> \color at endgroup
-%<platexrelease> \fi
-%<platexrelease> }%
-%<platexrelease> \fi
-%<platexrelease> \global \maxdepth \@maxdepth
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\@makespecialcolbox}
-% $BK\J8!J$"$k$$$O%\%H%`%U%m!<%H!K$H5SCm$N4V$K(B|\@textbottom|$B$rF~$l$?$$$N$G!"(B
-% |\@makespecialcolbox|$B%3%^%s%I$b=$@5$r$7$^$9!#(B
-% $B$d$O$j!"(B\file{ltoutput.dtx}$B$GDj5A$5$l$F$$$k$b$N$G$9!#(B
-%
-% $B$3$N%^%/%m$O!"(B|\enlargethispage|$B$,;H$o$l$?$H$-$K!"(B
-% |\@makecol|$B%^%/%m$+$i8F$S=P$5$l$^$9!#(B
-%
-% \noindent\emph{$BF|K\8l(B\TeX{}$B3+H/%3%_%e%K%F%#$K$h$kJdB-(B(2017/02/25)}$B!'(B
-% 2016/11/29$B0JA0$N(Bp\LaTeX{}$B$G$O!"(B|\@makecol|$B$O%\%H%`%U%m!<%H$rA^F~$7$?8e!"(B
-% $B$9$0$K(B|\@kludgeins|$B$,6u$+$I$&$+H=Dj$7(B
-% \begin{itemize}
-% \item $B6u$N>l9g$O!";D$j$9$Y$F$N=hM}$r(B|\@makespecialcolbox|$B$KG$$;$k(B
-% \item $B6u$G$J$$>l9g$O!"(B|\@makecol|$B<+?H$G;D$j$9$Y$F$N=hM}$r9T$&(B
-% \end{itemize}
-% $B$H$7$F$$$^$7$?!#$7$+$7(B2017/04/08$B0J9_$N(Bp\LaTeX{}$B$G$O!"(B|\@makecol|$B$O%\%H%`(B
-% $B%U%m!<%H$H5SCm$rA^F~$7$F$+$i(B|\@kludgeins|$B$NH=Dj$K0\$k$h$&$K$7$F$$$^$9!#(B
-% $B$7$?$,$C$F!"?7$7$$(B|\@makecol|$B$+$i0J2<$K5-$9(B|\@makespecialcolbox|$B$,8F$S(B
-% $B=P$5$l$k>l9g$O!"(B|\ifvoid\footins|$B!JFs2U=j!K$NH=Dj$O>o$K??$H$J$k$O$:$G$9!#(B
-% $BMW$9$k$K!V$D$.$NItJ,$,(Bp\LaTeX{}$BMQ$N=$@5$G$9!#!W$H$$$&Fs2U=j$N%3!<%I$O(B
-% $B<B<AE*$KITMW$H$J$j$^$7$?!#(B
-%
-% $B$7$+$7!"$@$+$i$H$$$C$F>C$7$F$7$^$&$H!"8E$$(Bp\LaTeX{}$B$N(B|\@makecol|$B$r(B
-% $B%Y!<%9$K:n$i$l$?30It%Q%C%1!<%8$+$i(B|\@makespecialcolbox|$B$,8F$S=P$5$l$k(B
-% $B>l9g$K5SCm$,>CLG$9$k$*$=$l$,$"$j$^$9!#$3$N$?$a!"(B|\@makespecialcolbox|$B$O(B
-% $B=>Mh$N%3!<%I$N$^$^0];}$7$F$"$j$^$9!J32$O$"$j$^$;$s!K!#(B
-% \changes{v1.2l}{2017/02/25}{\cs{@makecol}$B$rJQ99$7$?$N$K(B
-% \cs{@makespecialcolbox}$B$rJQ99$7$J$$!"$H$$$&H=CG$K$D$$$FL at J82=(B}
-% \begin{macrocode}
-%<*plcore|fltrace>
-\gdef\@makespecialcolbox{%
-%<*trace>
- \fl at trace{Krudgeins ht \the\ht\@kludgeins\space
- dp \the\dp\@kludgeins\space
- wd \the\wd\@kludgeins}%
-%</trace>
- \setbox\@outputbox \vbox {%
- \@texttop
- \dimen@ \dp\@outputbox
- \unvbox\@outputbox
- \vskip-\dimen@
- }%
- \@tempdima \@colht
- \ifdim \wd\@kludgeins>\z@
- \advance \@tempdima -\ht\@outputbox
- \advance \@tempdima \pageshrink
-%<*trace>
- \fl at trace {Natural ht of col: \the\ht\@outputbox}%
- \fl at trace {\string \@colht: \the\@colht}%
- \fl at trace {Pageshrink added: \the\pageshrink}%
- \fl at trace {Hence, space added: \the\@tempdima}%
-%</trace>
- \setbox\@outputbox \vbox to \@colht {%
-% \boxmaxdepth \maxdepth
- \unvbox\@outputbox
- \vskip \@tempdima
- \@textbottom
-% \end{macrocode}
-% $B$D$.$NItJ,$,(Bp\LaTeX{}$BMQ$N=$@5$G$9!#(B
-% \changes{v1.2}{2001/09/04}{$BK\J8$H(B\cs{footnoterule}$B$,=E$J$C$F$7$^$&$N$r=$@5(B}
-% \begin{macrocode}
- \ifvoid\footins\else % for pLaTeX
- \vskip\skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- \fi
- }%
- \else
- \advance \@tempdima -\ht\@kludgeins
-%<*trace>
- \fl at trace {Natural ht of col: \the\ht\@outputbox}%
- \fl at trace {\string \@colht: \the\@colht}%
- \fl at trace {Extra size added: -\the \ht \@kludgeins}%
- \fl at trace {Hence, height of inner box: \the\@tempdima}%
- \fl at trace {Max? pageshrink available: \the\pageshrink}%
-%</trace>
- \setbox \@outputbox \vbox to \@colht {%
- \vbox to \@tempdima {%
- \unvbox\@outputbox
- \@textbottom
-% \end{macrocode}
-% $B$D$.$NItJ,$,(Bp\LaTeX{}$BMQ$N=$@5$G$9!#(B
-% $B5SCm$,$"$l$P!"$3$3$G$=$l$r=PNO$7$^$9!#(B
-% \changes{v1.2}{2001/09/04}{$BK\J8$H(B\cs{footnoterule}$B$,=E$J$C$F$7$^$&$N$r=$@5(B}
-% \begin{macrocode}
- \ifvoid\footins\else % for pLaTeX
- \vskip\skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- \fi
- }\vss}%
- \fi
- {\setbox \@tempboxa \box \@kludgeins}%
-%<*trace>
- \fl at trace {kludgeins box made void}%
-%</trace>
-}
-%</plcore|fltrace>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\@reinserts}
-% $B$3$N%^%/%m$O!"(B|\@specialoutput|$B%^%/%m$+$i8F$S=P$5$l$^$9!#(B
-% $B%\%C%/%9(B|footins|$B$,AH$_N)$F$i$l$?%b!<%I$K9g$o$;$F(B
-% $B=D%b!<%I$+2#%b!<%I$G(B|\unvbox|$B$r$7$^$9!#(B
-% \begin{macrocode}
-%<*plcore>
-\def\@reinserts{%
- \ifvoid\footins\else\insert\footins{%
- \iftbox\footins\tate\else\yoko\fi
- \unvbox\footins}\fi
- \ifvbox\@kludgeins\insert\@kludgeins{\unvbox\@kludgeins}\fi
-}
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{$B%H%s%\(B}
-% $B$3$3$G$O%H%s%\$r=PNO$9$k$?$a$N%^%/%m$rDj5A$7$F$$$^$9!#(B
-%
-% \begin{macro}{\iftombow}
-% \begin{macro}{\iftombowdate}
-% |\iftombow|$B$O%H%s%\$r=PNO$9$k$+$I$&$+!"(B|\iftombowdate|$B$O(BDVI$B$r:n at .$7$?(B
-% $BF|IU$r%H%s%\$NOF$K=PNO$9$k$+$I$&$+$r<($9$?$a$KMQ$$$^$9!#(B
-% \begin{macrocode}
-\newif\iftombow \tombowfalse
-\newif\iftombowdate \tombowdatetrue
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@tombowwidth}
-% |\@tombowwidth|$B$K$O!"%H%s%\MQ7S@~$NB@$5$r;XDj$7$^$9!#(B
-% $B%G%U%)%k%H$O(B0.1$B%]%$%s%H$G$9!#(B
-% $B$3$NCM$rJQ99$7!"(B|\maketombowbox|$B%3%^%s%I$r<B9T$9$k$3$H$K$h$j!"%H%s%\$N(B
-% $B7S@~B@$5$rJQ99$7$F=PNO$9$k$3$H$,$G$-$^$9!#DL>o$N;H$$J}$G$O!"(B
-% $B%H%s%\$N7S@~$rJQ99$9$kI,MW$O$"$j$^$;$s!#(BDVI$B$r%U%#%k%`$KLLIU$1=PNO$9$k(B
-% $B$H$-!"%H%s%\$r$D$1$:$K0LCV$O$=$N$^$^$K$9$kI,MW$,$"$k$H$-$K!"$3$NB@$5$r(B
-% $B%<%m%]%$%s%H$K$7$^$9!#(B
-% \begin{macrocode}
-\newdimen\@tombowwidth
-\setlength{\@tombowwidth}{.1\p@}
-% \end{macrocode}
-% \end{macro}
-%
-% $B%H%s%\MQ$N7S@~$rDj5A$7$^$9!#(B
-%
-% \begin{macro}{\@TL}
-% \begin{macro}{\@Tl}
-% \begin{macro}{\@TC}
-% \begin{macro}{\@TR}
-% \begin{macro}{\@Tr}
-% |\@TL|$B$H(B|\@Tl|$B$O%Z!<%8>eIt$N:8B&!"(B
-% |\@TC|$B$O%Z!<%8>eIt$NCf1{!"(B
-% |\@TR|$B$H(B|\@Tr|$B$O%Z!<%8>eIt$N:8B&$N%H%s%\$H$J$k%\%C%/%9$G$9!#(B
-% \begin{macrocode}
-\newbox\@TL\newbox\@Tl
-\newbox\@TC
-\newbox\@TR\newbox\@Tr
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@BL}
-% \begin{macro}{\@Bl}
-% \begin{macro}{\@BC}
-% \begin{macro}{\@BR}
-% \begin{macro}{\@Br}
-% |\@BL|$B$H(B|\@Bl|$B$O%Z!<%82<It$N:8B&!"(B
-% |\@BC|$B$O%Z!<%82<It$NCf1{!"(B
-% |\@BR|$B$H(B|\@Br|$B$O%Z!<%82<It$N:8B&$N%H%s%\$H$J$k%\%C%/%9$G$9!#(B
-% \begin{macrocode}
-\newbox\@BL\newbox\@Bl
-\newbox\@BC
-\newbox\@BR\newbox\@Br
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@CL}
-% \begin{macro}{\@CR}
-% |\@CL|$B$O%Z!<%8:8B&$NCf1{!"(B|\@CR|$B$O%Z!<%81&B&$NCf1{$N%H%s%\$H$J$k(B
-% $B%\%C%/%9$G$9!#(B
-% \begin{macrocode}
-\newbox\@CL
-\newbox\@CR
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@bannertoken}
-% \begin{macro}{\@bannerfont}
-% |\@bannertoken|$B%H!<%/%s$O!"%H%s%\$N2#$K=PNO$9$kJ8;zNs$rF~$l$^$9!#(B
-% $B%G%U%)%k%H$G$O2?$b=PNO$7$^$;$s!#(B
-% |\@bannerfont|$B%U%)%s%H$O!"$=$NJ8;zNs$r=PNO$9$k$?$a$N%U%)%s%H$G$9!#(B
-% 9$B%]%$%s%H$N%?%$%W%i%$%?BN$H$7$F$$$^$9!#(B
-% \changes{v1.1f}{1996/09/03}{Add \cs{@bannertoken}.}
-% \begin{macrocode}
-\font\@bannerfont=cmtt9
-\newtoks\@bannertoken
-\@bannertoken{}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\maketombowbox}
-% |\maketombow|$B%3%^%s%I$O!"%H%s%\$H$J$k%\%C%/%9$r:n$k$?$a$KMQ$$$^$9!#(B
-% $B$3$N%3%^%s%I$O!"%H%s%\$H$J$k%\%C%/%9$r:n$k$@$1$G!"$=$l$i$N%\%C%/%9$r(B
-% $B=PNO$9$k$N$G$O$J$$$3$H$KCm0U$r$7$F$/$@$5$$!#(B
-% \begin{macrocode}
-\def\maketombowbox{%
- \setbox\@TL\hbox to\z@{\yoko\hss
- \vrule width13mm height\@tombowwidth depth\z@
- \vrule height10mm width\@tombowwidth depth\z@
-% \end{macrocode}
-% \changes{v1.0f}{1996/07/10}{$B%H%s%\$N2#$K(BDVI$B%U%!%$%k$N:n at .F|$r=PNO$9$k(B
-% $B$h$&$K$7$?!#(B}
-% \changes{v1.0g}{1997/01/23}{$B:n at .F|$N=PNO$r$9$k$+$I$&$+$r%U%i%0$G;XDj$9$k(B
-% $B$h$&$K$7$?!#(B}
-% \begin{macrocode}
- \iftombowdate
- \raise4pt\hbox to\z@{\hskip5mm\@bannerfont\the\@bannertoken\hss}%
- \fi}%
- \setbox\@Tl\hbox to\z@{\yoko\hss
- \vrule width10mm height\@tombowwidth depth\z@
- \vrule height13mm width\@tombowwidth depth\z@}%
- \setbox\@TC\hbox{\yoko
- \vrule width10mm height\@tombowwidth depth\z@
- \vrule height10mm width\@tombowwidth depth\z@
- \vrule width10mm height\@tombowwidth depth\z@}%
- \setbox\@TR\hbox to\z@{\yoko
- \vrule height10mm width\@tombowwidth depth\z@
- \vrule width13mm height\@tombowwidth depth\z@\hss}%
- \setbox\@Tr\hbox to\z@{\yoko
- \vrule height13mm width\@tombowwidth depth\z@
- \vrule width10mm height\@tombowwidth depth\z@\hss}%
-%
- \setbox\@BL\hbox to\z@{\yoko\hss
- \vrule width13mm depth\@tombowwidth height\z@
- \vrule depth10mm width\@tombowwidth height\z@}%
- \setbox\@Bl\hbox to\z@{\yoko\hss
- \vrule width10mm depth\@tombowwidth height\z@
- \vrule depth13mm width\@tombowwidth height\z@}%
- \setbox\@BC\hbox{\yoko
- \vrule width10mm depth\@tombowwidth height\z@
- \vrule depth10mm width\@tombowwidth height\z@
- \vrule width10mm depth\@tombowwidth height\z@}%
- \setbox\@BR\hbox to\z@{\yoko
- \vrule depth10mm width\@tombowwidth height\z@
- \vrule width13mm depth\@tombowwidth height\z@\hss}%
- \setbox\@Br\hbox to\z@{\yoko
- \vrule depth13mm width\@tombowwidth height\z@
- \vrule width10mm depth\@tombowwidth height\z@\hss}%
-%
- \setbox\@CL\hbox to\z@{\yoko\hss
- \vrule width10mm height.5\@tombowwidth depth.5\@tombowwidth
- \vrule height10mm depth10mm width\@tombowwidth}%
- \setbox\@CR\hbox to\z@{\yoko
- \vrule height10mm depth10mm width\@tombowwidth
- \vrule height.5\@tombowwidth depth.5\@tombowwidth width10mm\hss}%
-}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@outputtombow}
-% |\@outputtombow|$B%3%^%s%I$O!"%H%s%\$r=PNO$9$k$N$KMQ$$$^$9!#(B
-% \changes{v1.2d}{2016/04/01}{multicol$B%Q%C%1!<%8$r;H$&$H%H%s%\$N2<C<$,=L$`LdBj$r=$@5(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@outputtombow}{\@outputtombow}%
-%<*plcore|platexrelease>
-\def\@outputtombow{%
- \iftombow
- \vbox to\z@{\kern-13mm\relax
- \boxmaxdepth\maxdimen%% Added (Apr 1, 2016)
- \moveleft3mm\vbox to\@@paperheight{%
- \hbox to\@@paperwidth{\hskip3mm\relax
- \copy\@TL\hfill\copy\@TC\hfill\copy\@TR\hskip3mm}%
- \kern-10mm
- \hbox to\@@paperwidth{\copy\@Tl\hfill\copy\@Tr}%
- \vfill
- \hbox to\@@paperwidth{\copy\@CL\hfill\copy\@CR}%
- \vfill
- \hbox to\@@paperwidth{\copy\@Bl\hfill\copy\@Br}%
- \kern-10mm
- \hbox to\@@paperwidth{\hskip3mm\relax
- \copy\@BL\hfill\copy\@BC\hfill\copy\@BR\hskip3mm}%
- }\vss
- }%
- \fi
-}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@outputtombow}{\@outputtombow}%
-%<platexrelease>\def\@outputtombow{%
-%<platexrelease> \iftombow
-%<platexrelease> \vbox to\z@{\kern-13mm\relax
-%<platexrelease> \moveleft3mm\vbox to\@@paperheight{%
-%<platexrelease> \hbox to\@@paperwidth{\hskip3mm\relax
-%<platexrelease> \copy\@TL\hfill\copy\@TC\hfill\copy\@TR\hskip3mm}%
-%<platexrelease> \kern-10mm
-%<platexrelease> \hbox to\@@paperwidth{\copy\@Tl\hfill\copy\@Tr}%
-%<platexrelease> \vfill
-%<platexrelease> \hbox to\@@paperwidth{\copy\@CL\hfill\copy\@CR}%
-%<platexrelease> \vfill
-%<platexrelease> \hbox to\@@paperwidth{\copy\@Bl\hfill\copy\@Br}%
-%<platexrelease> \kern-10mm
-%<platexrelease> \hbox to\@@paperwidth{\hskip3mm\relax
-%<platexrelease> \copy\@BL\hfill\copy\@BC\hfill\copy\@BR\hskip3mm}%
-%<platexrelease> }\vss
-%<platexrelease> }%
-%<platexrelease> \fi
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@@paperheight}
-% \begin{macro}{\@@paperwidth}
-% \begin{macro}{\@@topmargin}
-% |\@@pageheight|$B$O!"MQ;f$N=D$ND9$5$K%H%s%\$ND9$5$r2C$($?D9$5$K$J$j$^$9!#(B
-%
-% |\@@pagewidth|$B$O!"MQ;f$N2#$ND9$5$K%H%s%\$ND9$5$r2C$($?D9$5$K$J$j$^$9!#(B
-%
-% |\@@topmargin|$B$O!"8=:_$N%H%C%W%^!<%8%s$K(B1$B%$%s%A2C$($?D9$5$K$J$j$^$9!#(B
-% \begin{macrocode}
-\newdimen\@@paperheight
-\newdimen\@@paperwidth
-\newdimen\@@topmargin
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@shipoutsetup}
-% \changes{v1.1i}{1998/02/03}{Command removed}
-% |\@outputpage|$BFb$KA^F~$7$?$N$G:o=|$7$^$7$?!#(B
-% \end{macro}
-%
-% \begin{macro}{\@outputpage}
-% |\textwidth|$B$H(B|\textheight|$B$N8r49$O!"(B|\@shipoutsetup|$BFb$G$O9T$J$$$^$;$s!#(B
-% $B$J$<$J$i!"(B|\@shipoutsetup|$B%^%/%m$,<B9T$5$l$k$H$-$O!"(B
-% |\shipout|$B$5$l$k(Bvbox$B$NCf$G$"$j!"$3$N$H$-$O2#AH%b!<%I$G$9$N$G!"(B
-% $B$D$M$K(B|\iftdir|$B$O56$HH=CG$5$l!"=D$H2#$N%5%$%:$r8r49$G$-$J$$$+$i$G$9!#(B
-%
-% $B$J$*!"$3$NJQ99$r%m!<%+%k$J$b$N$K$9$k$?$a$K!"(B
-% |\begingroup|$B$H(B|\endgroup|$B$G0O$_$^$9!#(B
-% \changes{v1.2a}{2001/09/26}{\LaTeX\ \texttt{!<2001/06/01!>}$B$KBP1~(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\@outputpage}
-%<platexrelease> {Reset language for hyphenation}%
-%<*plcore|platexrelease>
-\def\@outputpage{%
-\begingroup % the \endgroup is put in by \aftergroup
- \iftdir
- \dimen\z@\textwidth \textwidth\textheight \textheight\dimen\z@
- \fi
- \let \protect \noexpand
-% \end{macrocode}
-% \LaTeXe\ 2017-04-15$B$G$O(Bverbatim$B4D6-Fb$G%O%$%U%M!<%7%g%s$,5/$-$J$$$h$&$K(B
-% $B=$@5$5$l$^$7$?$,!"(Bverbatim$B4D6-$NESCf$G2~%Z!<%8$,5/$-$?>l9g$K%X%C%@$G(B
-% $B%O%$%U%M!<%7%g%s$,M^@)$5$l$k$N$O at 5$7$/$J$$$N$G!"(B|\language|$B$r(B
-% |\begin{document}|$B$G$NCM$K%j%;%C%H$7$^$9!J;29M!'(Blatex2e svn r1407$B!K!#(B
-% $B%W%j%"%s%V%k$GFCJL$K at _Dj$5$l$l$P$=$NCM!"@_Dj$5$l$J$1$l$P(B0$B$G$9!JK|$,0l(B
-% |\document|$B$NDj5A$,8E$$>l9g(B\footnote{\LaTeXe\ 2017/01/01$B0JA0$r;H$C$F(B
-% p\LaTeXe{}$B$N%U%)!<%^%C%H$r:n at .$7$?>l9g$d!"(Bdinbrief.cls$B$N$h$&$KFH<+$N(B
-% $B:FDj5A$r9T$&%/%i%9$d%Q%C%1!<%8$r;H$C$?>l9g$K5/$3$k$+$b$7$l$^$;$s!#(B}$B$O(B
-% $-1$$B$K$J$j$^$9$,!"$3$l$O(B0$B$HF1$8$O$?$i$-$r$9$k$N$GLdBj$O5/$-$^$;$s!K!#(B
-% \changes{v1.2m}{2017/03/19}{\cs{language}$B$r%j%;%C%H(B
-% (sync with ltoutput.dtx 2017/03/10 v1.3c)}
-% \begin{macrocode}
- \language\document at default@language
- \@resetactivechars
- \global\let\@@if at newlist\if at newlist
- \global\@newlistfalse
- \@parboxrestore
- \shipout\vbox{\yoko
- \set at typeset@protect
- \aftergroup\endgroup
- \aftergroup\set at typeset@protect
-% \end{macrocode}
-% \changes{v1.1g}{1998/02/03}{\cs{@shipoutsetup}$B$r(B\cs{@outputpage}$BFb$KF~$l$?(B}
-% $B$3$3$+$i(B|\@shipoutsetup|$B$NFbMF!#(B
-% \begin{macrocode}
- \if at specialpage
- \global\@specialpagefalse\@nameuse{ps@\@specialstyle}%
- \fi
-% \end{macrocode}
-% \changes{v1.1c}{1995/02/05}{\cs{oddsidemargin}$B$H(B\cs{evensidemargin}$B$,(B
-% $B5U$@$C$?$N$r=$@5(B}
-% \begin{macrocode}
- \if at twoside
- \ifodd\count\z@ \let\@thehead\@oddhead \let\@thefoot\@oddfoot
- \iftdir\let\@themargin\evensidemargin
- \else\let\@themargin\oddsidemargin\fi
- \else \let\@thehead\@evenhead
- \let\@thefoot\@evenfoot
- \iftdir\let\@themargin\oddsidemargin
- \else\let\@themargin\evensidemargin\fi
- \fi\fi
-% \end{macrocode}
-% $B%H%s%\=PNO%*%W%7%g%s$,;XDj$5$l$F$$$k>l9g!"$3$3$GMQ;f%5%$%:$r:F at _Dj$7$^$9!#(B
-% \TeX $B$N2C$($k:8$H>eIt$N(B1$B%$%s%A$O!"%H%s%\$NFbB&$KF~$j$^$9!#(B
-% \changes{v1.1a}{1995/11/10}{\cs{topmargin}$B$,H?1G$5$l$J$$%P%0$r=$@5(B}
-% \begin{macrocode}
- \@@topmargin\topmargin
- \iftombow
- \@@paperwidth\paperwidth \advance\@@paperwidth 6mm\relax
- \@@paperheight\paperheight \advance\@@paperheight 16mm\relax
- \advance\@@topmargin 1in\relax \advance\@themargin 1in\relax
- \fi
- \reset at font
- \normalsize
- \normalsfcodes
- \let\label\@gobble
- \let\index\@gobble
- \let\glossary\@gobble
- \baselineskip\z at skip \lineskip\z at skip \lineskiplimit\z@
-% \end{macrocode}
-% $B$3$3$^$G$,(B|\@shipoutsetup|$B$NFbMF!#(B
-% \begin{macrocode}
- \@begindvi
- \@outputtombow
- \vskip \@@topmargin
- \moveright\@themargin\vbox{%
- \setbox\@tempboxa \vbox to\headheight{%
- \vfil
- \color at hbox
- \normalcolor
- \hb at xt@\textwidth{\@thehead}%
- \color at endbox
- }% %% 22 Feb 87
- \dp\@tempboxa \z@
- \box\@tempboxa
- \vskip \headsep
- \box\@outputbox
- \baselineskip \footskip
- \color at hbox
- \normalcolor
- \hb at xt@\textwidth{\@thefoot}%
- \color at endbox
- }%
- }%
-% \endgroup now inserted by \aftergroup
-% \end{macrocode}
-% |\if at newlist|$B$r=i4|2=!#(B
-% \begin{macrocode}
- \global\let\if at newlist\@@if at newlist
- \global \@colht \textheight
- \stepcounter{page}%
- \let\firstmark\botmark
-}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@outputpage}
-%<platexrelease> {Reset language for hyphenation}%
-%<platexrelease>\def\@outputpage{%
-%<platexrelease>\begingroup % the \endgroup is put in by \aftergroup
-%<platexrelease> \iftdir
-%<platexrelease> \dimen\z@\textwidth \textwidth\textheight \textheight\dimen\z@
-%<platexrelease> \fi
-%<platexrelease> \let \protect \noexpand
-%<platexrelease> \@resetactivechars
-%<platexrelease> \global\let\@@if at newlist\if at newlist
-%<platexrelease> \global\@newlistfalse
-%<platexrelease> \@parboxrestore
-%<platexrelease> \shipout\vbox{\yoko
-%<platexrelease> \set at typeset@protect
-%<platexrelease> \aftergroup\endgroup
-%<platexrelease> \aftergroup\set at typeset@protect
-%<platexrelease> \if at specialpage
-%<platexrelease> \global\@specialpagefalse\@nameuse{ps@\@specialstyle}%
-%<platexrelease> \fi
-%<platexrelease> \if at twoside
-%<platexrelease> \ifodd\count\z@ \let\@thehead\@oddhead \let\@thefoot\@oddfoot
-%<platexrelease> \iftdir\let\@themargin\evensidemargin
-%<platexrelease> \else\let\@themargin\oddsidemargin\fi
-%<platexrelease> \else \let\@thehead\@evenhead
-%<platexrelease> \let\@thefoot\@evenfoot
-%<platexrelease> \iftdir\let\@themargin\oddsidemargin
-%<platexrelease> \else\let\@themargin\evensidemargin\fi
-%<platexrelease> \fi\fi
-%<platexrelease> \@@topmargin\topmargin
-%<platexrelease> \iftombow
-%<platexrelease> \@@paperwidth\paperwidth \advance\@@paperwidth 6mm\relax
-%<platexrelease> \@@paperheight\paperheight \advance\@@paperheight 16mm\relax
-%<platexrelease> \advance\@@topmargin 1in\relax \advance\@themargin 1in\relax
-%<platexrelease> \fi
-%<platexrelease> \reset at font
-%<platexrelease> \normalsize
-%<platexrelease> \normalsfcodes
-%<platexrelease> \let\label\@gobble
-%<platexrelease> \let\index\@gobble
-%<platexrelease> \let\glossary\@gobble
-%<platexrelease> \baselineskip\z at skip \lineskip\z at skip \lineskiplimit\z@
-%<platexrelease> \@begindvi
-%<platexrelease> \@outputtombow
-%<platexrelease> \vskip \@@topmargin
-%<platexrelease> \moveright\@themargin\vbox{%
-%<platexrelease> \setbox\@tempboxa \vbox to\headheight{%
-%<platexrelease> \vfil
-%<platexrelease> \color at hbox
-%<platexrelease> \normalcolor
-%<platexrelease> \hb at xt@\textwidth{\@thehead}%
-%<platexrelease> \color at endbox
-%<platexrelease> }% %% 22 Feb 87
-%<platexrelease> \dp\@tempboxa \z@
-%<platexrelease> \box\@tempboxa
-%<platexrelease> \vskip \headsep
-%<platexrelease> \box\@outputbox
-%<platexrelease> \baselineskip \footskip
-%<platexrelease> \color at hbox
-%<platexrelease> \normalcolor
-%<platexrelease> \hb at xt@\textwidth{\@thefoot}%
-%<platexrelease> \color at endbox
-%<platexrelease> }%
-%<platexrelease> }%
-%<platexrelease> \global\let\if at newlist\@@if at newlist
-%<platexrelease> \global \@colht \textheight
-%<platexrelease> \stepcounter{page}%
-%<platexrelease> \let\firstmark\botmark
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\AtBeginDvi}
-% p\LaTeX{}$B$N=PNO%k!<%A%s$N(B|\@outputpage|$B$G$O!"(B|\shipout|$B$9$k(Bvbox$B$NCf?H$K(B
-% |\yoko|$B$r;XDj$7$F$$$^$9!#$3$N$?$a!"(B|\AtBeginDocument{\AtBeginDvi{}}|$B$H$$$&(B
-% $B%3!<%I$r=q$/$H(B\texttt{Incompatible direction list can't be unboxed.}$B$H$$$&(B
-% $B%(%i!<$,=P$F$7$^$$$^$9!#(B
-%
-% $B$=$3$G!"%3%_%e%K%F%#HG(Bp\LaTeX{}$B$G$O!V(B|\shipout|$B$G(B|\yoko|$B$,;XDj$5$l$F$$$k!W(B
-% $B$3$H$r:,5r$H$7$F(B
-% \begin{center}
-% |\@begindvibox|$B$O!J6u$G$J$$8B$j!K>o$K2#AH$G$J$1$l$P$J$i$J$$(B
-% \end{center}
-% $B$H2>Dj$7$^$9!#$3$N2>Dj$K=>$$!"(B|\AtBeginDvi|$B$r:FDj5A$7$^$9!#(B
-% \changes{v1.2f}{2016/06/30}{\cs{@begindvibox}$B$r>o$K2#AH$K(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2016/07/01}{\AtBeginDvi}
-%<platexrelease> {Fix for incompatible direction}%
-%<*plcore|platexrelease>
-\def \AtBeginDvi #1{%
- \global \setbox \@begindvibox
- \vbox{\yoko \unvbox \@begindvibox #1}%
-}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\AtBeginDvi}
-%<platexrelease> {Fix for incompatible direction}%
-%<platexrelease>\def \AtBeginDvi #1{%
-%<platexrelease> \global \setbox \@begindvibox
-%<platexrelease> \vbox{\unvbox \@begindvibox #1}%
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{$B5SCm%^%/%m(B}
-% $B5SCm$rAH$_N)$F$kItJ,$N%^%/%m$r:FDj5A$7$^$9!#(B
-% $B<g$J=$@5E@$O!"=DAH%b!<%I$G$NF0:n$NDI2C$G$9!#(B
-%
-% $B$3$l$i$N%^%/%m$O!"(B\file{ltfloat.dtx}$B$GDj5A$5$l$F$$$?$b$N$G$9!#(B
-%
-% \begin{macro}{\thempfn}
-% $BK\J8$G;H$o$l$k5SCm5-9f$G$9!#(B
-%
-% |\@footnotemark|$B$G=D2#$NH=CG$r$9$k$h$&$K$7$?$?$a!":o=|!#(B
-%
-% \changes{v1.0a}{1995/04/12}{Removed \texttt{\protect\bslash thempfn}}
-% \begin{macrocode}
-%\def\thempfn{%
-% \ifydir\thefootnote\else\hbox{\yoko\thefootnote}\fi}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\thempfootnote}
-% minipage$B4D6-$G;H$o$l$k5SCm5-9f$G$9!#(B
-%
-% \changes{v1.0a}{1995/04/12}{Removed \texttt{\protect\bslash thempfootnote}}
-% \begin{macrocode}
-%\def\thempfootnote{%
-% \ifydir\alph{mpfootnote}\else\hbox{\yoko\alph{mpfootnote}}\fi}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@makefnmark}
-% $B5SCm5-9f$r:n at .$9$k%^%/%m$G$9!#(B
-%
-% \changes{v1.0a}{1995/04/12}{$B=DAH$G$b>eIU$-?t;z$r;H$&$h$&$K=$@5(B}
-% \changes{v1.1b}{1996/01/26}{$B5SCm%^!<%/$N8e$m$KM>7W$J%9%Z!<%9$,F~$k$N$r=$@5(B}
-% \changes{v1.1g}{1997/02/14}{$B=DAH;~$K5SCm%^!<%/$N=qBN$, at 5$7$/$J$$$N$r=$@5(B}
-% \changes{v1.2b}{2016/01/26}{2013$BG/0J9_$N(Bp\TeX\ (r28720)$B$G5SCmHV9f$NA08e$NOBJ8J8;z(B
-% $B$H$N4V$K(Bxkanjiskip$B$,F~$C$F$7$^$&LdBj$KBP1~(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@makefnmark}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<*plcore|platexrelease>
-\renewcommand\@makefnmark{%
- \ifydir \hbox{}\hbox{\@textsuperscript{\normalfont\@thefnmark}}\hbox{}%
- \else\hbox{\yoko\@textsuperscript{\normalfont\@thefnmark}}\fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@makefnmark}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<platexrelease>\renewcommand\@makefnmark{\hbox{%
-%<platexrelease> \ifydir \@textsuperscript{\normalfont\@thefnmark}%
-%<platexrelease> \else\hbox{\yoko\@textsuperscript{\normalfont\@thefnmark}}\fi}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\pltx at foot@penalty}
-% $B3+$-3g8LN`$ND>8e$K(B|\footnotetext|$B$,B3$$$?>l9g!"(B|\footnotetext|$B$NA0$G$N2~9T$O(B
-% $BK>$^$7$/$"$j$^$;$s!#$3$N$h$&$J>l9g$KBP=h$9$k$?$a$K!"(B|\pltx at foot@penalty|$B$H$$$&(B
-% $B%+%&%s%?$rMQ0U$7$^$7$?!#(B|\footnotetext|$B$N:G=i$G!VD>A0$N%Z%J%k%F%#CM!W(B
-% $B$H$7$F$3$N%+%&%s%?$,=i4|2=$5$l$^$9!#(B
-% |\footnotemark|,~|\footnote|$B$G$O;H$o$J$$$N$G(B0$B$K at _Dj$7$F$$$^$9!#(B
-% \changes{v1.2g}{2016/08/25}{$B%+%&%s%?(B\cs{pltx at foot@penalty}$B$rDI2C(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/09/03}{\pltx at foot@penalty}
-%<platexrelease> {Add new counter \pltx at foot@penalty}%
-%<*plcore|platexrelease>
-\ifx\@undefined\pltx at foot@penalty \newcount\pltx at foot@penalty \fi
-\pltx at foot@penalty\z@
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\pltx at foot@penalty}
-%<platexrelease> {Add new counter \pltx at foot@penalty}%
-%<platexrelease>\let\pltx at foot@penalty\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\footnotemark}
-% \begin{macro}{\footnote}
-% $B$^$?!"9g0u$NA0$NJ8;z$H9g0u$N4V$O86B'%Y%?AH$G$9!JC"$7!"(BJIS~X~4051$B$K$ONc30M-$j!K!#(B
-% $B$=$N$?$a!"9g0u$r=PNO$9$k(B|\footnotemark|,~|\footnote|$B$N:G=i$G(B|\inhibitglue|$B$r(B
-% $B<B9T$7$F$*$/$3$H$K$7$^$9!J(B|\@makefnmark|$B$NCf$KCV$$$F$b8zNO$,$"$j$^$;$s!K!#(B
-% \changes{v1.2g}{2016/08/25}{$B9g0u$NA0$NJ8;z$H9g0u$N4V$r%Y%?AH$K(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/09/03}{\footnote}
-%<platexrelease> {Append \inhibitglue in \footnotemark}%
-%<*plcore|platexrelease>
-% \end{macrocode}
-% \begin{macrocode}
-\def\footnote{\inhibitglue
- \@ifnextchar[\@xfootnote{\stepcounter\@mpfn
- \protected at xdef\@thefnmark{\thempfn}%
- \@footnotemark\@footnotetext}}
-\def\footnotemark{\inhibitglue
- \@ifnextchar[\@xfootnotemark
- {\stepcounter{footnote}%
- \protected at xdef\@thefnmark{\thefootnote}%
- \@footnotemark}}
-% \end{macrocode}
-% \begin{macrocode}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\footnote}
-%<platexrelease> {Append \inhibitglue in \footnotemark}%
-%<platexrelease>\def\footnote{\@ifnextchar[\@xfootnote{\stepcounter\@mpfn
-%<platexrelease> \protected at xdef\@thefnmark{\thempfn}%
-%<platexrelease> \@footnotemark\@footnotetext}}
-%<platexrelease>\def\footnotemark{%
-%<platexrelease> \@ifnextchar[\@xfootnotemark
-%<platexrelease> {\stepcounter{footnote}%
-%<platexrelease> \protected at xdef\@thefnmark{\thefootnote}%
-%<platexrelease> \@footnotemark}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\footnotetext}
-% |\footnotetext|$B$ND>A0$N%Z%J%k%F%#CM$rJ];}$7$^$9!#(B
-% \changes{v1.2g}{2016/08/25}{$BJD$83g8LN`$ND>8e$K(B\cs{footnotetext}$B$,B3$/(B
-% $B>l9g$K2~9T$,5/$-$k$3$H$,$"$kLdBj$KBP=h(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/09/03}{\footnotetext}
-%<platexrelease> {Preserve penalty before \footnotetext}%
-%<*plcore|platexrelease>
-% \end{macrocode}
-% \begin{macrocode}
-\def\footnotetext{%
- \ifhmode\pltx at foot@penalty\lastpenalty\unpenalty\fi%
- \@ifnextchar [\@xfootnotenext
- {\protected at xdef\@thefnmark{\thempfn}%
- \@footnotetext}}
-% \end{macrocode}
-% \begin{macrocode}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\footnotetext}
-%<platexrelease> {Preserve penalty before \footnotetext}%
-%<platexrelease>\def\footnotetext{%
-%<platexrelease> \@ifnextchar [\@xfootnotenext
-%<platexrelease> {\protected at xdef\@thefnmark{\thempfn}%
-%<platexrelease> \@footnotetext}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@footnotetext}
-% $B%$%s%5!<%H%\%C%/%9(B|\footins|$B$K5SCm$N%F%-%9%H$rF~$l$^$9!#(B
-% $B%3%_%e%K%F%#HG(Bp\LaTeX{}$B$G$O(B|\footnotetext|,~|\footnote|$B$ND>8e$G(B
-% $B2~9T$r2DG=$K$7$^$9!#(Bjsclasses$B$G$O$3$NJQ99$K2C$(!"5SCm$G(B|\verb|$B$,(B
-% $B;H$($k$h$&$K:FDj5A$5$l$^$9!#(B
-%
-% \changes{v1.0a}{1995/04/07}{$BAHJ}8~$NH=Dj$r%\%C%/%9$N30$G$9$k$h$&$K$7$?(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/09/08}{\@footnotetext}
-%<platexrelease> {Allow break after \footnote (more fix)}%
-%<*plcore|platexrelease>
-% \end{macrocode}
-% \begin{macrocode}
-\long\def\@footnotetext#1{%
- \ifydir\def\@tempa{\yoko}\else\def\@tempa{\tate}\fi
- \insert\footins{\@tempa%
- \reset at font\footnotesize
- \interlinepenalty\interfootnotelinepenalty
- \splittopskip\footnotesep
- \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
- \hsize\columnwidth \@parboxrestore
- \protected at edef\@currentlabel{%
- \csname p at footnote\endcsname\@thefnmark
- }%
- \color at begingroup
- \@makefntext{%
- \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
-% \end{macrocode}
-%
-% p\TeX{}$B$G$O(B|\insert|$B$ND>8e$KOBJ8J8;z$,Mh$?>l9g!"$=$3$G$N2~9T$O5v$5$l$J$$(B
-% $B$H$$$&5sF0$K$J$C$F$$$^$9!#$3$N$?$a!"=>Mh$O5SCmHV9f!J9g0u!K$ND>8e$N2~9T$,(B
-% $BM^@)$5$l$F$$$^$7$?!#$7$+$7!"(B|\hbox|$B$ND>8e$KOBJ8J8;z$,Mh$?>l9g$O!"$=$3$G(B
-% $B$N2~9T$O5v$5$l$^$9$+$i!":G8e$K(B|\null|$B$rDI2C$7$^$9!#(B
-% $B$^$?!"(B|\pltx at foot@penalty|$B$NCM$,(B0$B$G$O$J$+$C$?>l9g!"(B
-% $B5SCm$NA0$K%Z%J%k%F%#$,$"$C$?$H$$$&$3$H$G$9$+$i!"I|3h$5$;$F$*$-$^$9!#(B
-% \changes{v1.2g}{2016/08/25}{$B5SCm$N9g0uD>8e$G$N2~9T$,6X;_$5$l$F$7$^$&(B
-% $BLdBj$KBP=h(B}
-% \changes{v1.2i}{2016/09/08}{v1.2g$B$N=$@5$GF~$l$?(B\cs{null}$B$,$^$:$+$C$?$N$G(B
-% $B?eJ?%b!<%I$N$H$-$@$1H/9T$9$k$3$H$K$7$?(B(Issue 23)}
-% \begin{macrocode}
- \color at endgroup}\ifhmode\null\fi
- \ifnum\pltx at foot@penalty=\z@\else
- \penalty\pltx at foot@penalty
- \pltx at foot@penalty\z@
- \fi}
-% \end{macrocode}
-% \begin{macrocode}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/09/03}{\@footnotetext}
-%<platexrelease> {Allow break after \footnote}%
-%<platexrelease>\long\def\@footnotetext#1{%
-%<platexrelease> \ifydir\def\@tempa{\yoko}\else\def\@tempa{\tate}\fi
-%<platexrelease> \insert\footins{\@tempa%
-%<platexrelease> \reset at font\footnotesize
-%<platexrelease> \interlinepenalty\interfootnotelinepenalty
-%<platexrelease> \splittopskip\footnotesep
-%<platexrelease> \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
-%<platexrelease> \hsize\columnwidth \@parboxrestore
-%<platexrelease> \protected at edef\@currentlabel{%
-%<platexrelease> \csname p at footnote\endcsname\@thefnmark
-%<platexrelease> }%
-%<platexrelease> \color at begingroup
-%<platexrelease> \@makefntext{%
-%<platexrelease> \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
-%<platexrelease> \color at endgroup}\null
-%<platexrelease> \ifnum\pltx at foot@penalty=\z@\else
-%<platexrelease> \penalty\pltx at foot@penalty
-%<platexrelease> \pltx at foot@penalty\z@
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@footnotetext}
-%<platexrelease> {Allow break after \footnote}%
-%<platexrelease>\long\def\@footnotetext#1{%
-%<platexrelease> \ifydir\def\@tempa{\yoko}\else\def\@tempa{\tate}\fi
-%<platexrelease> \insert\footins{\@tempa%
-%<platexrelease> \reset at font\footnotesize
-%<platexrelease> \interlinepenalty\interfootnotelinepenalty
-%<platexrelease> \splittopskip\footnotesep
-%<platexrelease> \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
-%<platexrelease> \hsize\columnwidth \@parboxrestore
-%<platexrelease> \protected at edef\@currentlabel{%
-%<platexrelease> \csname p at footnote\endcsname\@thefnmark
-%<platexrelease> }%
-%<platexrelease> \color at begingroup
-%<platexrelease> \@makefntext{%
-%<platexrelease> \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
-%<platexrelease> \color at endgroup}}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@footnotemark}
-% \changes{v1.0a}{1995/04/12}{$B5SCm5-9f$N=PNO0LCV$ND4 at 0(B}
-% \changes{v1.1g}{1997/02/14}{$B=DAH;~$N0LCVD4 at 0$r(B2\cs{ch}$B$+$i(B.9zh$B$KJQ99(B}
-% $B5SCm5-9f$r=PNO$7$^$9!#(B
-% \begin{macrocode}
-\def\@footnotemark{\leavevmode
- \ifhmode\edef\@x at sf{\the\spacefactor}\nobreak\fi
- \ifydir\@makefnmark
- \else\hbox to\z@{\hskip-.25zw\raise.9zh\@makefnmark\hss}\fi
- \ifhmode\spacefactor\@x at sf\fi\relax}
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{$BAj8_;2>H(B}
-%
-% \begin{macro}{\@setref}
-% \changes{v1.1c}{1995/09/07}{change \cs{null} to \cs{relax} in \cs{@setref}.}
-% \changes{v1.2k}{2017/02/20}{$BL\<!$G(B\cs{ref}$B$r;H$C$?>l9g$K8e$m$N6uGr$,>C$($k(B
-% $B8=>]$KBP=h$9$k$?$a!"(B\cs{relax}$B$N$"$H$K(B\{\}$B$rDI2C(B}
-% |\ref|$B%3%^%s%I$d(B|\pageref|$B%3%^%s%I$G;2>H$7$?$H$-!"$3$l$i$N%3%^%s%I$K(B
-% $B$h$C$F=PNO$5$l$?HV9f$HB3$/#2%P%$%HJ8;z$H$N4V$K(B|\xkanjiskip|$B$,F~$j$^$;$s!#(B
-% $B$3$l$O!"(B|\null|$B$,(B|\hbox{}|$B$HDj5A$5$l$F$$$k$?$a$G$9!#(B
-% $B$=$3$G(B|\null|$B$r<h$j=|$-$^$9!#(B
-% $B$3$N%3%^%s%I$O!"(B\file{ltxref.dtx}$B$GDj5A$5$l$F$$$k$b$N$G$9!#(B
-%
-% $B$7$+$7!"C1$K(B|\null|$B$r(B|\relax|$B$KCV$-49$($k$@$1$G$O!"(B|\section|$B$N$h$&$J(B
-% $B!VF0$/0z?t!W$G(B|\ref|$B$J$I$r;H$C$?>l9g$K!"L\<!$G8e$m$N6uGr$,>C$($F$7$^$$$^$9!#(B
-% $B$=$3$G!"(B|\relax|$B$N$"$H$K(B|{}|$B$rDI2C$7$^$7$?!#=>Mh$b(B|\protect\ref|$B$N$h$&$K;H$($P(B
-% $BLdBj$"$j$^$;$s$G$7$?$,!"(B\LaTeX{}$B$G$OE83+$5$l$F$bLdBj$,5/$-$J$$(Brobust$B$J<BAu$K(B
-% $B$J$C$F$$$^$9$N$G!"$3$l$K=>$$$^$9!#(B
-%
-% $B$5$i$K!"Nc$($P(B``see Appendix A.''$B$N$h$&$J5-=R$,J8Kv$K$"$j!"$+$D(B
-% ``A''$B$rAj8_;2>H$G<hF@$7$?>l9g$N%9%Z!<%9%U%!%/%?!<$rJd at 5$9$k$?$a!"(B
-% |\spacefactor\@m{}|$B$K=$@5$7$^$7$?!#$3$l$G!"(B``A.''$B$N8e$N%9%Z!<%9$,(B
-% $BJ8Kv$H$7$F07$o$l$^$9!#(B
-% $B!V(B\LaTeXe{}$B%^%/%m(B\&$B%/%i%9(B $B%W%m%0%i%_%s%0<BA)2r at b!W$N%3!<%I$r;29M$K(B
-% $B$7$^$7$?$,!"?t<0%b!<%IFb$G$b%(%i!<$K$J$i$J$$$h$&$K2~NI$7$F$$$^$9!#(B
-% \changes{v1.2s}{2017/09/27}{$BAj8_;2>H$N%9%Z!<%9%U%!%/%?!<$rJd at 5(B}
-% \changes{v1.2t}{2017/10/31}{v1.2s$B$NJQ99$KH<$$!"(B\cs{ref}$B$,?t<0%b!<%I$G(B
-% $B%(%i!<$K$J$C$F$$$?$N$r=$@5(B}
-% \changes{v1.2u}{2017/11/04}{emath$B$N(B\cs{marusuuref}$BBP:v(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/10/28}{\@setref}
-%<platexrelease> {Spacing after \ref in moving arguments}%
-%<*plcore|platexrelease>
-\def\@setref#1#2#3{%
- \ifx#1\relax
- \protect\G at refundefinedtrue
- \nfss at text{\reset at font\bfseries ??}%
- \@latex at warning{Reference `#3' on page \thepage \space
- undefined}%
- \else
- \expandafter#2#1\protect\@setref@{}% change \null to \protect\@setref@{}
- \fi}
-\def\@setref@{\ifhmode\spacefactor\@m\fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\@setref}
-%<platexrelease> {Spacing after \ref in moving arguments}%
-%<platexrelease>\def\@setref#1#2#3{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> \protect\G at refundefinedtrue
-%<platexrelease> \nfss at text{\reset at font\bfseries ??}%
-%<platexrelease> \@latex at warning{Reference `#3' on page \thepage \space
-%<platexrelease> undefined}%
-%<platexrelease> \else
-%<platexrelease> \expandafter#2#1\relax{}% change \null to \relax{}
-%<platexrelease> \fi}
-%<platexrelease>\let\@setref@\@undefined
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@setref}
-%<platexrelease> {Spacing after \ref in moving arguments}%
-%<platexrelease>\def\@setref#1#2#3{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> \protect\G at refundefinedtrue
-%<platexrelease> \nfss at text{\reset at font\bfseries ??}%
-%<platexrelease> \@latex at warning{Reference `#3' on page \thepage \space
-%<platexrelease> undefined}%
-%<platexrelease> \else
-%<platexrelease> \expandafter#2#1\relax% change \null to \relax
-%<platexrelease> \fi}
-%<platexrelease>\let\@setref@\@undefined
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{$B5?;w%?%$%WF~NO(B}
-%
-% \begin{macro}{\verb}
-% \changes{v1.1b}{1995/04/05}{$B8_49%b!<%I$N$H$-$O!"(Bpl209.def$B$NDj5A$r;H$&(B}
-% \changes{v1.1g}{1997/01/16}
-% {\cs{verb}$B%3%^%s%I$r(B\LaTeX\ \texttt{!<1996/06/01!>}$B$K9g$o$;$F=$@5(B}
-% \LaTeX{}$B$N(B|\verb|$B%3%^%s%I$G$O!"?t<0%b!<%I$G$J$$$H$-$O!"(B
-% |\leavevmode|$B$G?eJ?%b!<%I$KF~$C$?$"$H!"(B|\null|$B$r=PNO$7$F$$$^$9!#(B
-% $B%^%/%m(B|\null|$B$O(B|\hbox{}|$B$H$7$FDj5A$5$l$F$$$^$9$N$G!"(B
-% $B$3$3$K$OOB2$J84V%9%Z!<%9!J(B|\xkanjiskip|$B!K$,F~$j$^$;$s!#(B
-%
-% $B$7$+$7!"C1$K(B|\null|$B$r=|$$$F$7$^$&$H!":#EY$O(B|\verb+ abc+|$B$N$h$&$K(B
-% |\verb|$B$NKAF,$KH>3Q6uGr$,$"$k>l9g$K$3$l$,>C$($F$7$^$$$^$9(B(TeX.SX 170245)$B!#(B
-% $B$=$3$G!"(Bp\LaTeX{}$B$G$O(B|\null|$B$NBe$o$j$K(B
-% \begin{enumerate}
-% \item $BOB2$J84V%9%Z!<%9$NA^F~=hM}$OF)2a$9$k(B
-% \item $B9TJ,3d;~$K>C$($k(B(discardable)$B%N!<%I$G$O$J$$(B
-% \end{enumerate}
-% $B$NN>>r7o$rK~$?$9%N!<%I$rA^F~$7$^$9!#$3$3$G$O(B|\vadjust{}|$B$H$7$^$7$?!#(B
-%
-% $B$3$N%^%/%m$O!"(B\file{ltmiscen.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \changes{v1.2s}{2017/09/27}{\cs{verb}$B$NKAF,$NH>3Q6uGr$rJ];}(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/10/28}{\verb}
-%<platexrelease> {Preserve beginning space characters}%
-%<*plcore|platexrelease>
-\if at compatibility\else
-\def\verb{\relax\ifmmode\hbox\else\leavevmode\vadjust{}\fi
- \bgroup
- \verb at eol@error \let\do\@makeother \dospecials
- \verbatim at font\@noligs
-% \end{macrocode}
-% \LaTeXe\ 2017-04-15$B$KDI?o$7$F!"(B|\verb|$B$NESCf$G%O%$%U%M!<%7%g%s$,5/$-$J$$(B
-% $B$h$&$K(B|\language|$B$r at _Dj$7$^$9!J;29M!'(Blatex2e svn r1405$B!K!#(B
-% \changes{v1.2m}{2017/03/19}{\cs{verb}$B$NESCf$G%O%$%U%M!<%7%g%s$,5/$-$J$$(B
-% $B$h$&$K(B\cs{language}$B$r at _Dj(B(sync with ltmiscen.dtx 2017/03/09 v1.1m)}
-% \begin{macrocode}
- \language\l at nohyphenation
- \@ifstar\@sverb\@verb}
-\fi
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\verb}
-%<platexrelease> {Disable hyphenation in verb}%
-%<platexrelease>\if at compatibility\else
-%<platexrelease>\def\verb{\relax\ifmmode\hbox\else\leavevmode\fi
-%<platexrelease> \bgroup
-%<platexrelease> \verb at eol@error \let\do\@makeother \dospecials
-%<platexrelease> \verbatim at font\@noligs
-%<platexrelease> \language\l at nohyphenation
-%<platexrelease> \@ifstar\@sverb\@verb}
-%<platexrelease>\fi
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\verb}
-%<platexrelease> {Disable hyphenation in verb}%
-%<platexrelease>\if at compatibility\else
-%<platexrelease>\def\verb{\relax\ifmmode\hbox\else\leavevmode\fi
-%<platexrelease> \bgroup
-%<platexrelease> \verb at eol@error \let\do\@makeother \dospecials
-%<platexrelease> \verbatim at font\@noligs
-%<platexrelease> \@ifstar\@sverb\@verb}
-%<platexrelease>\fi
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{tabbing$B4D6-(B}
-%
-% \begin{macro}{\@startline}
-% tabbing$B4D6-$N9T$G!"Cf?H$,;O$a3g8LN`$J$I$G;O$^$k>l9g!"(B
-% $B:G=i$N9`L\$@$1(BJFM$B%0%k!<$,>C$($J$$8=>]$KBP=h$7$^$9!#(B
-% \changes{v1.2s}{2017/09/27}{tabbing$B4D6-$N9TKAF,$N(BJFM$B%0%k!=$r:o=|(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/10/28}{\@startline}
-%<platexrelease> {Inhibit JFM glue at the beginning}%
-%<*plcore|platexrelease>
-\gdef\@startline{%
- \ifnum \@nxttabmar >\@hightab
- \@badtab
- \global\@nxttabmar \@hightab
- \fi
- \global\@curtabmar \@nxttabmar
- \global\@curtab \@curtabmar
- \global\setbox\@curline \hbox {}%
- \@startfield
- \strut\inhibitglue}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@startline}
-%<platexrelease> {Inhibit JFM glue at the beginning}%
-%<platexrelease>\gdef\@startline{%
-%<platexrelease> \ifnum \@nxttabmar >\@hightab
-%<platexrelease> \@badtab
-%<platexrelease> \global\@nxttabmar \@hightab
-%<platexrelease> \fi
-%<platexrelease> \global\@curtabmar \@nxttabmar
-%<platexrelease> \global\@curtab \@curtabmar
-%<platexrelease> \global\setbox\@curline \hbox {}%
-%<platexrelease> \@startfield
-%<platexrelease> \strut}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@stopfield}
-% \changes{v1.1d}{1996/03/12}{\cs{=}$B$N8e$m$KOB2$J84V%9%Z!<%9$,F~$k$N$r=$@5(B}
-% $BAj8_;2>H$d5?;w%?%$%WF~NO$G$O!"OB2$J84V%9%Z!<%9$,F~$i$J$$$N$G!"(B|\null|$B$r(B
-% $B<h$j=|$-$^$7$?$,!"(B|tabbing|$B4D6-$G$O!"5U$K(B|\null|$B$,$J$$$?$a!"(B
-% $BOB2$J84V%9%Z!<%9$,F~$C$F$7$^$&$N$G!"$=$l$rDI2C$7$^$9!#(B
-% \file{lttab.dtx}$B$GDj5A$5$l$F$$$k$b$N$G$9!#(B
-% \begin{macrocode}
-\gdef\@stopfield{\null\color at endgroup\egroup}
-% \end{macrocode}
-% \end{macro}
-%
-% \subsection{$BMQ8l=8$N=PNO(B}
-% \LaTeX{}$B$K$O!"$J$<$+MQ8l=8$r=PNO$9$k$?$a$N%3%^%s%I$,$"$j$^$;$s$N$G!"(B
-% $BDI2C$r$7$^$9!#(B
-% \changes{v1.1e}{1996/02/17}{\cs{printglossary}$B$rDI2C(B}
-%
-% \begin{macro}{\printglossary}
-% \cs{printglossary}$B%3%^%s%I$O!"C1$K3HD%;R$,(B\texttt{gls}$B$N%U%!%$%k$r(B
-% $BFI$_9~$`$@$1$G$9!#$3$N%U%!%$%k$N at 8@.$K$O!"(Bmendex$B$J$I$rMQ$$$^$9!#(B
-% \begin{macrocode}
-\newcommand\printglossary{\@input@{\jobname.gls}}
-% \end{macrocode}
-% \end{macro}
-%
-% \subsection{$B;~J,$r<($9%+%&%s%?(B}
-% \TeX $B$K$O!"G/7nF|$r<($9?tCM$rJ];}$7$F$$$k%+%&%s%?$H$7$F!"$=$l$>$l(B
-% |\year|, |\month|, |\day|$B$,%W%j%_%F%#%V$H$7$FB8:_$7$^$9!#$7$+$7!"(B
-% $B;~J,$K$D$$$F$O!"?<Lk$NNm;~$+$i$N7P2a;~4V$r<($9(B|\time|$B%+%&%s%?$7$+B8:_(B
-% $B$7$F$$$^$;$s!#$=$3$G!"(Bp\LaTeXe{}$B$G$O!";~J,$r<($9$?$a$N%+%&%s%?(B|\hour|$B$H(B
-% |\minute|$B$r:n at .$7$F$$$^$9!#(B
-%
-% \begin{macro}{\hour}
-% \begin{macro}{\minute}
-% $B2?;~$+!J(B|\hour|$B!K$rF@$k$K$O!"(B|\time|$B$r(B60$B$G3d$C$?>&$r$=$N$^$^MQ$$$^$9!#(B
-% $B2?J,$+!J(B|\minute|$B!K$O!"(B|\hour|$B$K(B60$B$r3]$1$?CM$r(B|\time|$B$+$i0z$$$F;;=P$7$^$9!#(B
-% $B$3$3$G$O%+%&%s%?$r at k8@$9$k$@$1$G$9!#<B:]$N7W;;$O!"%/%i%9$d%Q%C%1!<%8$NCf(B
-% $B$G9T$J$C$F$$$^$9!#(B
-% \begin{macrocode}
-\newcount\hour
-\newcount\minute
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \subsection{tabular$B4D6-(B}
-% \LaTeX{}$B%+!<%M%k(B(lttab.dtx)$B$NL?Na72$r=$@5$7$^$9!#(B
-%
-% \begin{macro}{\@tabclassz}
-% \LaTeX{}$B%+!<%M%k$O!"%"%i%$%s%a%s%HJ8;z(B|&|$B$N<~0O$KH>3Q6uGr$r=q$$$?$+$I$&$+$K(B
-% $B$+$+$o$i$:M>J,$J%9%Z!<%9$r=PNO$7$J$$$h$&$K!"(B|\ignorespaces|$B$H(B|\unskip|$B$r(B
-% $BH/9T$7$F$$$^$9(B(lttab.dtx)$B!#$7$+$7!"$3$l$@$1$G$O(BJFM$B%0%k!<$,>C$($:$K;D$C$F(B
-% $B$7$^$&$N$G!"(Bp\LaTeX{}$B$G$ODI2C$NBP=h$rF~$l$^$9!#(B
-%
-% $B$^$:!"(B|l|, |c|, |r|$B$N>l9g$G$9!#(B
-% $B%;%k$NMWAG$r(B|\mbox|$B$KF~$l!"$=$N:G=i$G(B|\inhibitglue|$B$rH/9T$7$^$9!#(B
-% \changes{v1.2p}{2017/07/21}{tabular$B4D6-$N%;%kFb$N(BJFM$B%0%k!=$r:o=|(B}
-% \changes{v1.2r}{2017/09/26}{tabular$B4D6-$N1&B7$((B(r)$B$G7S@~$,$:$l$k$h$&$K(B
-% $B$J$C$F$$$?%P%0$r=$@5(B}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/09/26}{\@tabclassz}
-%<platexrelease> {Inhibit JFM glue in tabular cells}%
-%<*plcore|platexrelease>
-\def\@tabclassz{%
- \ifcase\@lastchclass
- \@acolampacol
- \or
- \@ampacol
- \or
- \or
- \or
- \@addamp
- \or
- \@acolampacol
- \or
- \@firstampfalse\@acol
- \fi
- \edef\@preamble{%
- \@preamble{%
- \ifcase\@chnum
- \hfil\mbox{\inhibitglue\ignorespaces\@sharp\unskip}\hfil % c
- \or
- \hskip1sp\mbox{\inhibitglue\ignorespaces\@sharp\unskip}\hfil % l
- \or
- \hfil\hskip1sp\mbox{\inhibitglue\ignorespaces\@sharp\unskip}% % r
- \fi}}}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2017/07/29}{\@tabclassz}
-%<platexrelease> {Inhibit JFM glue in tabular cells}%
-%<platexrelease>\def\@tabclassz{%
-%<platexrelease> \ifcase\@lastchclass
-%<platexrelease> \@acolampacol
-%<platexrelease> \or
-%<platexrelease> \@ampacol
-%<platexrelease> \or
-%<platexrelease> \or
-%<platexrelease> \or
-%<platexrelease> \@addamp
-%<platexrelease> \or
-%<platexrelease> \@acolampacol
-%<platexrelease> \or
-%<platexrelease> \@firstampfalse\@acol
-%<platexrelease> \fi
-%<platexrelease> \edef\@preamble{%
-%<platexrelease> \@preamble{%
-%<platexrelease> \ifcase\@chnum
-%<platexrelease> \hfil\inhibitglue\ignorespaces\@sharp\unskip\unskip\hfil % c
-%<platexrelease> \or
-%<platexrelease> \hskip1sp\inhibitglue\ignorespaces\@sharp\unskip\unskip\hfil % l
-%<platexrelease> \or
-%<platexrelease> \hfil\hskip1sp\inhibitglue\ignorespaces\@sharp\unskip\unskip % r
-%<platexrelease> \fi}}}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@tabclassz}
-%<platexrelease> {Inhibit JFM glue in tabular cells}%
-%<platexrelease>\def\@tabclassz{%
-%<platexrelease> \ifcase\@lastchclass
-%<platexrelease> \@acolampacol
-%<platexrelease> \or
-%<platexrelease> \@ampacol
-%<platexrelease> \or
-%<platexrelease> \or
-%<platexrelease> \or
-%<platexrelease> \@addamp
-%<platexrelease> \or
-%<platexrelease> \@acolampacol
-%<platexrelease> \or
-%<platexrelease> \@firstampfalse\@acol
-%<platexrelease> \fi
-%<platexrelease> \edef\@preamble{%
-%<platexrelease> \@preamble{%
-%<platexrelease> \ifcase\@chnum
-%<platexrelease> \hfil\ignorespaces\@sharp\unskip\hfil
-%<platexrelease> \or
-%<platexrelease> \hskip1sp\ignorespaces\@sharp\unskip\hfil
-%<platexrelease> \or
-%<platexrelease> \hfil\hskip1sp\ignorespaces\@sharp\unskip
-%<platexrelease> \fi}}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@classv}
-% $B<!$K!"(B|p|$B$N>l9g$G$9!#(B|\mbox{}\inhibitglue|$B$H(B|\unskip|$B$rDI2C$7$F$$$^$9!#(B
-% \changes{v1.2p}{2017/07/21}{tabular$B4D6-$N%;%kFb$N(BJFM$B%0%k!=$r:o=|(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/07/29}{\@classv}
-%<platexrelease> {Inhibit JFM glue in tabular cells}%
-%<*plcore|platexrelease>
-\def\@classv{\@addtopreamble{\@startpbox{\@nextchar}\mbox{}\inhibitglue\ignorespaces
-\@sharp\unskip\@endpbox}}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@classv}
-%<platexrelease> {Inhibit JFM glue in tabular cells}%
-%<platexrelease>\def\@classv{\@addtopreamble{\@startpbox{\@nextchar}\ignorespaces
-%<platexrelease>\@sharp\@endpbox}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \section{2013$BG/0J9_$N?7$7$$(Bp\TeX{}$BBP1~(B}
-% \LaTeXe{}$B$N%+!<%M%k$N%3!<%I$r$=$N$^$^;H$&$H!"(B2013$BG/0J9_$N(Bp\TeX{}$B$G$O(B
-% |\xkanjiskip|$BM3Mh$N%"%-$,A08e$KF~$C$F$7$^$&$3$H$,$"$j$^$7$?!#(B
-% $B$=$&$7$?L?Na$K%Q%C%A$r$"$F$^$9!#$J$*!"4{$K=P$F$-$?(B|\footnote|$B$NFbItL?Na(B
-% $B!J(B|\@makefnmark|$B!K$K$OF1MM$N%Q%C%A$,$b$&$"$F$F$"$j$^$9!#(B
-%
-% \begin{macro}{\@tabular}
-% tabular$B4D6-$NFbItL?Na$G$9!#$b$H$O(B\file{lttab.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(Btabular$B4D6-$K$b9T$C$?(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@tabular}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<*plcore|platexrelease>
-\def\@tabular{\leavevmode \null\hbox \bgroup $\let\@acol\@tabacol
- \let\@classz\@tabclassz
- \let\@classiv\@tabclassiv \let\\\@tabularcr\@tabarray}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@tabular}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<platexrelease>\def\@tabular{\leavevmode \hbox \bgroup $\let\@acol\@tabacol
-%<platexrelease> \let\@classz\@tabclassz
-%<platexrelease> \let\@classiv\@tabclassiv \let\\\@tabularcr\@tabarray}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\endtabular}
-% \begin{macro}{\endtabular*}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\endtabular}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<*plcore|platexrelease>
-\def\endtabular{\crcr\egroup\egroup $\egroup\null}
-\expandafter \let \csname endtabular*\endcsname = \endtabular
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\endtabular}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<platexrelease>\def\endtabular{\crcr\egroup\egroup $\egroup}
-%<platexrelease>\expandafter \let \csname endtabular*\endcsname = \endtabular
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@iiiparbox}
-% |\parbox|$B$NFbItL?Na$G$9!#$b$H$O(B\file{ltboxes.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(B\cs{parbox}$BL?Na$K$b9T$C$?(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@iiiparbox}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<*plcore|platexrelease>
-\let\@parboxto\@empty
-\long\def\@iiiparbox#1#2[#3]#4#5{%
- \leavevmode
- \@pboxswfalse
- \setlength\@tempdima{#4}%
- \@begin at tempboxa\vbox{\hsize\@tempdima\@parboxrestore#5\@@par}%
- \ifx\relax#2\else
- \setlength\@tempdimb{#2}%
- \edef\@parboxto{to\the\@tempdimb}%
- \fi
- \if#1b\vbox
- \else\if #1t\vtop
- \else\ifmmode\vcenter
- \else\@pboxswtrue\null$\vcenter% !!!
- \fi\fi\fi
- \@parboxto{\let\hss\vss\let\unhbox\unvbox
- \csname bm@#3\endcsname}%
- \if at pboxsw \m at th$\null\fi% !!!
- \@end at tempboxa}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@iiiparbox}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<platexrelease>\let\@parboxto\@empty
-%<platexrelease>\long\def\@iiiparbox#1#2[#3]#4#5{%
-%<platexrelease> \leavevmode
-%<platexrelease> \@pboxswfalse
-%<platexrelease> \setlength\@tempdima{#4}%
-%<platexrelease> \@begin at tempboxa\vbox{\hsize\@tempdima\@parboxrestore#5\@@par}%
-%<platexrelease> \ifx\relax#2\else
-%<platexrelease> \setlength\@tempdimb{#2}%
-%<platexrelease> \edef\@parboxto{to\the\@tempdimb}%
-%<platexrelease> \fi
-%<platexrelease> \if#1b\vbox
-%<platexrelease> \else\if #1t\vtop
-%<platexrelease> \else\ifmmode\vcenter
-%<platexrelease> \else\@pboxswtrue $\vcenter
-%<platexrelease> \fi\fi\fi
-%<platexrelease> \@parboxto{\let\hss\vss\let\unhbox\unvbox
-%<platexrelease> \csname bm@#3\endcsname}%
-%<platexrelease> \if at pboxsw \m at th$\fi
-%<platexrelease> \@end at tempboxa}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\underline}
-% $B2<@~$r0z$/L?Na$G$9!#$b$H$O(B\file{ltboxes.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
-% \changes{v1.2c}{2016/02/28}{1.2b$B$HF1MM$N=$@5$r(B\cs{underline}$BL?Na$K$b9T$C$?(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\underline}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<*plcore|platexrelease>
-\def\underline#1{%
- \relax
- \ifmmode\@@underline{#1}%
- \else \leavevmode\null$\@@underline{\hbox{#1}}\m at th$\null\relax\fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\underline}
-%<platexrelease> {Remove extra \xkanjiskip}%
-%<platexrelease>\def\underline#1{%
-%<platexrelease> \relax
-%<platexrelease> \ifmmode\@@underline{#1}%
-%<platexrelease> \else $\@@underline{\hbox{#1}}\m at th$\relax\fi}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \section{e-p\TeX{}$B$G$N(BFAM256$B%Q%C%A$NMxMQ(B}
-%
-% \begin{macro}{\e at alloc@chardef}
-% \begin{macro}{\e at alloc@top}
-% \LaTeXe\ 2015/01/01$B0J9_!"3HD%%l%8%9%?$,$"$l$PMxMQ$9$k$h$&$K$J$C$F$$$^$9(B
-% $B$N$G!"(Be-p\TeX{}$B$N3HD%%l%8%9%?$rMxMQ$G$-$k$h$&$K at _Dj$7$^$9!#(B
-% \changes{v1.2j}{2016/11/09}{FAM256$B%Q%C%AE,MQ(Be-p\TeX{}$B$KBP1~(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/11/29}%
-%<platexrelease> {\e at alloc@chardef}{Extended Allocation (FAM256)}%
-%<*plcore|platexrelease>
-% \end{macrocode}
-% \begin{macrocode}
-\ifx\omathchar\@undefined
- \ifx\widowpenalties\@undefined
-% \end{macrocode}
-% $B%*%j%8%J%k$N(B\TeX{}$B$N>l9g!J3HD%$J$7$N%"%9%-!<(Bp\TeX{}$B$N>l9g!K!#(B
-% \begin{macrocode}
- \mathchardef\e at alloc@top=255
- \let\e at alloc@chardef\chardef
- \else
-% \end{macrocode}
-% e-\TeX{}$B3HD%$G(B$2^{15}$$B8D$N%l%8%9%?$,MxMQ$G$-$^$9!#(B
-% ^^A $B!V(BFAM256$B$J$7$N(Be-(u)p\TeX{}$B!W$O;v<B>eB8:_$7$J$$$O$:!#(B
-% ^^A $B$?$@$7!"$?$H$($P(Be-(u)p\TeX{}$B$r%Y!<%9$K$7$?(B
-% ^^A p\TeX{}-ng (Asiatic pTeX)$B$O(Be-\TeX{}$B3HD%$r;}$C$F$$$F!"(B
-% ^^A FAM256$B%Q%C%A$OE,MQ$5$l$F$$$J$$$?$a!"$3$3$K3:Ev$9$k!#(B
-% ^^A cf: https://github.com/clerkma/ptex-ng
-% ^^A $B$J$*!"(Bp\TeX{}-ng$B$O(Be-p\TeX{}$B$HF1MM$K(Bpdf\TeX{}$B3HD%$N(B
-% ^^A $B0lIt!J(Be-p\TeX{}$B$HHO0O$,0lCW$7$J$$!K$r;}$C$F$$$k$3$H!"(B
-% ^^A $B$^$?(B|\lastnodechar|$B$J$I$N(Be-p\TeX{}$BFH<+$N%W%j%_%F%#%V$r(B
-% ^^A $B;}$C$F$$$J$$$3$H$K$bCm0U!D$@$C$?$,!"(B2017/09/06$BIU$G(B
-% ^^A p\TeX{}-ng$B$K$b(B|\lastnodechar|$B$,DI2C$5$l$?!#(B
-% \begin{macrocode}
- \mathchardef\e at alloc@top=32767
- \let\e at alloc@chardef\mathchardef
- \fi
-\else
-% \end{macrocode}
-% FAM256$B%Q%C%A$,E,MQ$5$l$?(Be-p\TeX{}$B$N>l9g$O!"(B$2^{16}$$B8D$N%l%8%9%?$,MxMQ$G$-$^$9!#(B
-% \begin{macrocode}
- \ifx\enablecjktoken\@undefined % pTeX
- \omathchardef\e at alloc@top=65535
- \let\e at alloc@chardef\omathchardef
- \else % upTeX
- \chardef\e at alloc@top=65535
- \let\e at alloc@chardef\chardef
- \fi
-\fi
-% \end{macrocode}
-% \begin{macrocode}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2015/01/01}%
-%<platexrelease> {\e at alloc@chardef}{Extended Allocation (FAM256)}%
-%<platexrelease>\ifx\widowpenalties\@undefined
-%<platexrelease> \mathchardef\e at alloc@top=255
-%<platexrelease> \let\e at alloc@chardef\chardef
-%<platexrelease>\else
-%<platexrelease> \mathchardef\e at alloc@top=32767
-%<platexrelease> \let\e at alloc@chardef\mathchardef
-%<platexrelease>\fi
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}%
-%<platexrelease> {\e at alloc@chardef}{Extended Allocation (FAM256)}%
-%<platexrelease>\let\e at alloc@top\@undefined
-%<platexrelease>\let\e at alloc@chardef\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\e at mathgroup@top}
-% 2015/01/01$B0J9_$N(B\LaTeXe{}$B%+!<%M%k$O!"(BXe\TeX{}$B$H(BLua\TeX{}$B$KBP$7$F?t<0(Bfam$B$N(B
-% $B>e8B$r(B16$B$+$i(B256$B$KA}$d$7$F$$$^$9!J(B|\Umathcode| $B$GH=Dj!K!#(B
-% FAM256$B%Q%C%A$,E,MQ$5$l$?(Be-p\TeX{}$B$G$bF1MM$K>e8B$r(B16$B$+$i(B256$B$KA}$d$7$^$9!#(B
-% $B$3$l$G(B
-%\begin{verbatim}
-% ! LaTeX Error: Too many math alphabets used in version normal.
-%\end{verbatim}
-% $B$,=P$K$/$/$J$k$O$:$G$9!#(B
-% \changes{v1.2j}{2016/11/09}{FAM256$B%Q%C%AE,MQ(Be-p\TeX{}$B$KBP1~(B}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/11/29}%
-%<platexrelease> {\e at mathgroup@top}{Extended Allocation (FAM256)}%
-%<*plcore|platexrelease>
-% \end{macrocode}
-% \begin{macrocode}
-\ifx\omathchar\@undefined
- \chardef\e at mathgroup@top=16 % LaTeX2e kernel standard
-\else
- \mathchardef\e at mathgroup@top=256 % for e-pTeX FAM256 patched
-\fi
-% \end{macrocode}
-% \begin{macrocode}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2015/01/01}%
-%<platexrelease> {\e at mathgroup@top}{Extended Allocation (FAM256)}%
-%<platexrelease>\chardef\e at mathgroup@top=16
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}%
-%<platexrelease> {\e at mathgroup@top}{Extended Allocation (FAM256)}%
-%<platexrelease>\let\e at mathgroup@top\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \Finale
-\endinput
Modified: trunk/Master/texmf-dist/source/uplatex/base/ujclasses.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/ujclasses.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/ujclasses.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2017 Japanese TeX Development Community
+% Copyright (c) 2016-2018 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -103,6 +103,8 @@
% \changes{v1.7f}{2017/08/31}{和文書体の基準を全角空白から「漢」に変更}
% \changes{v1.7g}{2017/09/19}{内部処理で使ったボックス0を空にした}
% \changes{v1.7g-u00}{2017/09/19}{p\LaTeX{}用に追随}
+% \changes{v1.7h}{2018/02/04}{和文スケール値\cs{Cjascale}を定義}
+% \changes{v1.7h-u00}{2018/02/04}{p\LaTeX{}用に追随}
% \fi
%
% \iffalse
@@ -132,7 +134,7 @@
%<11pt&bk>\ProvidesFile{utbk11.clo}
%<12pt&bk>\ProvidesFile{utbk12.clo}
%</tate>
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
%<article|report|book> Standard upLaTeX class]
%<10pt|11pt|12pt> Standard upLaTeX file (size option)]
%<*driver>
@@ -766,8 +768,24 @@
% \end{macro}
% \end{macro}
%
+% \begin{macro}{\Cjascale}
+% このクラスファイルが意図する和文スケール値
+% （$1\,\mathrm{zw} \div \textmc{要求サイズ}$）を
+% 表す実数値マクロ|\Cjascale|を定義します。
+% このup\LaTeXe{}の標準クラスでは、フォーマット作成時に読み込まれた
+% フォント定義ファイル（\file{jy2mc.fd} / \file{jy2gt.fd} /
+% \file{jt2mc.fd} / \file{jt2gt.fd}）での和文スケール値がそのまま
+% 有効ですので、これは0.962216です。
+% \changes{v1.7h}{2018/02/04}{和文スケール値\cs{Cjascale}を定義}
+% \begin{macrocode}
+%<*article|report|book>
+\def\Cjascale{0.962216}
+%</article|report|book>
+% \end{macrocode}
+% \end{macro}
%
%
+%
% \section{レイアウト}
%
% \subsection{用紙サイズの決定}
Modified: trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -530,8 +530,8 @@
%%
%%\inhibitxspcode`¡=2
%%\inhibitxspcode`¿=2
-%%\inhibitxspcode`º=1
-%%\inhibitxspcode`ª=1
+%%\inhibitxspcode"BA=1% º
+%%\inhibitxspcode"AA=1% ª
\inhibitxspcode`™=1
%%
%% inhibitxspcode 半角片仮名
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplatex.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplatex.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplatex.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2017 Japanese TeX Development Community
+% Copyright (c) 2016-2018 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -74,6 +74,13 @@
% \changes{v1.0q-u01}{2017/11/29}{英語版ドキュメントを追加
% (based on platex.dtx 2017/11/29 v1.0q)}
% \changes{v1.0r-u01}{2017/12/02}{\upLaTeX{}と\upTeX{}の参考文献も追加}
+% \changes{v1.0s-u01}{2017/12/05}{デフォルト設定ファイルの読み込みを
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on platex.dtx 2017/12/05 v1.0s)}
+% \changes{v1.0s-u02}{2017/12/10}{\file{uplcore.ltx}の前に
+% \file{plcore.ltx}を読み込むようにした（最近の\pLaTeX{}が前提）}
+% \changes{v1.0u-u02}{2018/02/18}{\pLaTeX{}の変更に追随。
+% (based on platex.dtx 2018/02/18 v1.0u)}
%\else
% \changes{v1.0c-u00}{2011/05/07}{Created \upLaTeX\ version based on \pLaTeX\ one
% (based on platex.dtx 1997/01/29 v1.0c)}
@@ -96,6 +103,13 @@
% \changes{v1.0q-u01}{2017/11/29}{New English documentation added!
% (based on platex.dtx 2017/11/29 v1.0q)}
% \changes{v1.0r-u01}{2017/12/02}{\upLaTeX\ and \upTeX\ references added}
+% \changes{v1.0s-u01}{2017/12/05}{Moved loading default settings
+% from \file{uplcore.ltx} to \file{uplatex.ltx}
+% (based on platex.dtx 2017/12/05 v1.0s)}
+% \changes{v1.0s-u02}{2017/12/10}{Load \file{plcore.ltx} before
+% \file{uplcore.ltx} (recent version of \pLaTeX\ is assumed)}
+% \changes{v1.0u-u02}{2018/02/18}{Sync with \pLaTeX.
+% (based on platex.dtx 2018/02/18 v1.0u)}
%\fi
% \fi
%
@@ -103,7 +117,7 @@
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{uplatex.dtx}[2017/12/02 v1.0r-u01 upLaTeX document file]
+\ProvidesFile{uplatex.dtx}[2018/02/18 v1.0u-u02 upLaTeX document file]
% \iffalse
\documentclass{jltxdoc}
\usepackage{plext}
@@ -360,6 +374,7 @@
%\ifJAPANESE
% 次のリストが、\file{uplatex.ltx}の内容です。
% ただし、このバージョンでは、\LaTeX{}から\upLaTeX{}への拡張を
+% \file{plcore.ltx}（\pLaTeX{}によって提供される）および
% \file{uplcore.ltx}をロードすることで行ない、
% \file{latex.ltx}には直接、手を加えないようにしています。
% したがって\file{uplatex.ltx}はとても短いものとなっています。
@@ -369,7 +384,8 @@
% The content of \file{uplatex.ltx} is shown below.
% In the current version of \upLaTeX,
% first we simply load \file{latex.ltx} and
-% modify/extend some definitions by loading \file{uplcore.ltx}.
+% modify/extend some definitions by loading
+% \file{plcore.ltx} (available from \pLaTeX) and \file{uplcore.ltx}.
%\fi
% \begin{macrocode}
%<*plcore>
@@ -399,9 +415,13 @@
% \end{macrocode}
%
%\ifJAPANESE
-% \file{uplcore.ltx}を読み込みます。
+% \file{plcore.ltx}と\file{uplcore.ltx}を読み込みます。
+% \changes{v1.0s-u02}{2017/12/10}{\file{uplcore.ltx}の前に
+% \file{plcore.ltx}を読み込むようにした（最近の\pLaTeX{}が前提）}
%\else
-% Load \file{uplcore.ltx}.
+% Load \file{plcore.ltx} and \file{uplcore.ltx}.
+% \changes{v1.0s-u02}{2017/12/10}{Load \file{plcore.ltx} before
+% \file{uplcore.ltx} (recent version of \pLaTeX\ is assumed)}
%\fi
% \begin{macrocode}
\typeout{**************************^^J%
@@ -410,10 +430,36 @@
*^^J%
**************************}
\makeatletter
+\input plcore.ltx
\input uplcore.ltx
% \end{macrocode}
%
%\ifJAPANESE
+% フォント関連のデフォルト設定ファイルである、
+% \file{upldefs.ltx}を読み込みます。
+% \TeX{}の入力ファイル検索パスに設定されている
+% ディレクトリに\file{upldefs.cfg}ファイルがある場合は、
+% そのファイルを使います。
+% \changes{v1.0s-u01}{2017/12/05}{デフォルト設定ファイルの読み込みを
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on platex.dtx 2017/12/05 v1.0s)}
+%\else
+% Load font-related default settings, \file{upldefs.ltx}.
+% If a file \file{upldefs.cfg} is found, then that file will be
+% used instead.
+% \changes{v1.0s-u01}{2017/12/05}{Moved loading default settings
+% from \file{uplcore.ltx} to \file{uplatex.ltx}
+% (based on platex.dtx 2017/12/05 v1.0s)}
+%\fi
+% \begin{macrocode}
+\InputIfFileExists{upldefs.cfg}
+ {\typeout{*************************************^^J%
+ * Local config file upldefs.cfg used^^J%
+ *************************************}}%
+ {\input{upldefs.ltx}}
+% \end{macrocode}
+%
+%\ifJAPANESE
% フォーマット作成時に\upLaTeX{}のバージョンがわかるように、
% 端末に表示します。
%\else
@@ -474,14 +520,13 @@
% \begin{itemize}
% \item \file{uplvers.dtx}は、\upLaTeXe{}のフォーマットバージョンを
% 定義しています。
-% \item \file{uplfonts.dtx}は、\NFSS2を拡張しています。
-% \item このほか、\pLaTeXe{}に含まれる\file{plcore.dtx}をそのまま利用
-% しています。これは、上記以外のコマンドでフォーマットファイルに
-% 格納されるコマンドを定義しています。
% \end{itemize}
%
% また、プリロードフォントや組版パラメータなどのデフォルト設定は、
-% \file{uplcore.ltx}の中で\file{upldefs.ltx}をロードすることにより行います。
+% \file{uplatex.ltx}の中で\file{upldefs.ltx}をロードすることにより行います
+% \footnote{旧版では\file{uplcore.ltx}の中でロードしていましたが、
+% 2018年以降の新しいコミュニティ版\upLaTeX{}では
+% \file{uplatex.ltx}から読み込むことにしました。}。
% このファイル\file{upldefs.ltx}も\file{uplfonts.dtx}から生成されます。
% \begin{chuui}
% このファイルに記述されている設定を変更すれば
@@ -504,7 +549,10 @@
% \end{itemize}
%
% Moreover, default settings of pre-loaded fonts and typesetting parameters
-% are done by loading \file{upldefs.ltx} inside \file{uplcore.ltx}.
+% are done by loading \file{upldefs.ltx} inside
+% \file{uplatex.ltx}.\footnote{Older \upLaTeX\ loaded \file{upldefs.ltx}
+% inside \file{uplcore.ltx}; however, \upLaTeX\ community edition newer than
+% 2018 loads \file{upldefs.ltx} inside \file{uplatex.ltx}.}
% This file \file{upldefs.ltx} is also stripped from \file{uplfonts.dtx}.
% \begin{chuui}
% You can customize \upLaTeXe\ by tuning these settings.
@@ -539,18 +587,18 @@
%
%\ifJAPANESE
% \subsubsection{\NFSS2コマンド}
-% \upLaTeXe{}は、\pLaTeXe{}と同じ方式で\NFSS2を拡張し、
-% 和文フォントを選択できるようにしています。
+% \upLaTeXe{}は\pLaTeXe{}と共通の\file{plcore.ltx}を使用していますので、
+% \NFSS2の和文フォント選択への拡張が有効になっています。
%\else
% \subsubsection{\NFSS2 Commands}
-% \upLaTeXe\ extends \NFSS2 in the same way as \pLaTeXe, to enable
-% selection of Japanese fonts.
+% \upLaTeXe\ shares \file{plcore.dtx} with \pLaTeXe, so
+% the extensions of \NFSS2 for selecting Japanese fonts are available.
%\fi
%
%
%\ifJAPANESE
% \subsubsection{出力ルーチンとフロート}
-% \upLaTeXe{}は\pLaTeXe{}と共通の\file{plcore.dtx}を使用していますので、
+% \upLaTeXe{}は\pLaTeXe{}と共通の\file{plcore.ltx}を使用していますので、
% 出力ルーチンや脚注マクロなどは\pLaTeXe{}と同じように動作します。
%\else
% \subsubsection{Output Routine and Floats}
@@ -899,46 +947,19 @@
\title{The \upLaTeXe\ Sources}
\author{Ken Nakano \& Japanese \TeX\ Development Community \& TTK}
-% This command will be used to input the patch file
-% if that file exists.
-\newcommand{\includeltpatch}{%
- \def\currentfile{uplpatch.ltx}
- \part{uplpatch}
- {\let\ttfamily\relax
- \xdef\filekey{\filekey, \thepart={\ttfamily\currentfile}}}%
- Things we did wrong\ldots
- \IndexInput{uplpatch.ltx}}
-
% Get the date and patch level from uplvers.dtx
\makeatletter
\let\patchdate=\@empty
\begingroup
- \def\ProvidesFile#1\pfmtversion#2#3\ppatch at level#4{%
- \date{#2}\xdef\patchdate{#4}\endinput}
+ \def\ProvidesFile#1[#2 #3]#4\def\uppatch at level#5{%
+ \date{#2}\xdef\patchdate{#5}\endinput}
\input{uplvers.dtx}
-\global\let\X at date=\@date
+\endgroup
% Add the patch version if available.
- \long\def\Xdef#1#2#3\def#4#5{%
- \xdef\X at date{#2}%
- \xdef\patchdate{#5}%
- \endinput}%
- \InputIfFileExists{uplpatch.ltx}
- {\let\def\Xdef}{\global\let\includeltpatch\relax}
-\endgroup
-
-\ifx\@date\X at date
- \def\Xpatch{0}
- \ifx\patchdate\Xpatch\else
- % number is assumed
- \ifnum\patchdate>0
- \edef\@date{\@date\space Patch level\space\patchdate}
- \else
- \edef\@date{\@date\space Pre-Release\patchdate}
- \fi\fi
-\else
- \@warning{uplpatch.ltx does not match uplvers.dtx!}
- \let\includeltpatch\relax
+\def\Xpatch{}
+\ifx\patchdate\Xpatch\else
+ \edef\@date{\@date\space version \patchdate}
\fi
\makeatother
@@ -953,14 +974,10 @@
\DocInclude{uplfonts} % NFSS2 commands
-%\DocInclude{plcore} % kernel commands (comment out for upLaTeX)
-
\DocInclude{ukinsoku} % kinsoku parameter
\DocInclude{ujclasses} % Standard class
-%\includeltpatch % patch file (comment out May 8, 2016)
-
\StopEventually{\end{document}}
\clearpage
@@ -1105,7 +1122,7 @@
% \bibitem{tb108tanaka}
% Takuji Tanaka,
% \newblock Up\TeX\ --- Unicode version of \pTeX\ with CJK extensions
-% \newblock TUGboat issue 34:3, 2013].\\
+% \newblock TUGboat issue 34:3, 2013.\\
% (\texttt{http://tug.org/TUGboat/tb34-3/tb108tanaka.pdf})
% \end{thebibliography}
%
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplcls.ins
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplcls.ins 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplcls.ins 2018-03-09 22:46:27 UTC (rev 46903)
@@ -9,7 +9,7 @@
Copyright (c) 2010 ASCII MEDIA WORKS
Copyright (c) 2016 Takuji Tanaka
-Copyright (c) 2016 Japanese TeX Development Community
+Copyright (c) 2016-2018 Japanese TeX Development Community
This file is part of the upLaTeX2e system (community edition).
--------------------------------------------------------------
Modified: trunk/Master/texmf-dist/source/uplatex/base/upldocs.ins
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/upldocs.ins 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/upldocs.ins 2018-03-09 22:46:27 UTC (rev 46903)
@@ -9,7 +9,7 @@
Copyright (c) 2010 ASCII MEDIA WORKS
Copyright (c) 2016 Takuji Tanaka
-Copyright (c) 2016 Japanese TeX Development Community
+Copyright (c) 2016-2018 Japanese TeX Development Community
This file is part of the upLaTeX2e system (community edition).
--------------------------------------------------------------
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplfmt.ins
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplfmt.ins 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplfmt.ins 2018-03-09 22:46:27 UTC (rev 46903)
@@ -1,7 +1,7 @@
\input docstrip
\keepsilent
+\ifToplevel{\askonceonly}
\usedir{tex/uplatex/base}
-\ifToplevel{\askonceonly}
\Msg{*** Generating the upLaTeX files for making the documents ***}
@@ -9,7 +9,7 @@
Copyright (c) 2010 ASCII MEDIA WORKS
Copyright (c) 2016 Takuji Tanaka
-Copyright (c) 2016 Japanese TeX Development Community
+Copyright (c) 2016-2018 Japanese TeX Development Community
This file is part of the upLaTeX2e system (community edition).
--------------------------------------------------------------
@@ -19,8 +19,6 @@
\generate{
\file{uplatex.ltx}{\from{uplatex.dtx}{plcore}}
\file{uplcore.ltx}{\from{uplvers.dtx}{plcore}
- \from{uplfonts.dtx}{plcore}
- \from{plcore.dtx}{plcore}
\from{uplvers.dtx}{plfinal}}
\file{ukinsoku.tex}{\from{ukinsoku.dtx}{plcore}}
\file{upldefs.ltx}{\from{uplfonts.dtx}{pldefs,xpt}}
@@ -28,7 +26,6 @@
\file{jy2gt.fd}{\from{uplfonts.dtx}{JY2gt}}
\file{jt2mc.fd}{\from{uplfonts.dtx}{JT2mc}}
\file{jt2gt.fd}{\from{uplfonts.dtx}{JT2gt}}
-% \file{plext.sty}{\from{plext.dtx}{package}}
\file{uptrace.sty}{\from{uplfonts.dtx}{trace}}
}
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2017 Japanese TeX Development Community
+% Copyright (c) 2016-2018 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -19,74 +19,38 @@
% \StopEventually{}
%
% \iffalse
-% \changes{v1.0}{1994/09/16}{first edition}
-% \changes{v1.1}{1995/02/21}{\cs{selectfont}アルゴリズム変更}
-% \changes{v1.1b}{1995/04/25}{\cs{selectfont}修正}
-% \changes{v1.1c}{1995/08/22}{縦横フォント同時切り替え}
-% \changes{v1.2}{1995/11/09}{\cs{DeclareFixedFont}の日本語化}
-% \changes{v1.3}{1996/03/25}{数式ファミリの定義変更}
-% \changes{v1.3a}{1997/01/25}{\LaTeX\ \texttt{!<1996/12/01!>に対応}}
-% \changes{v1.3b}{1997/01/28}{\cs{textmc}, \cs{textgt}の動作修正}
-% \changes{v1.3c}{1997/04/08}{和文エンコード関連の修正}
-% \changes{v1.3d}{1997/06/25}{\cs{em},\cs{emph}で和文を強調書体に}
-% \changes{v1.3e}{1997/07/10}{fdファイル名の小文字化が効いていなかったのを修正}
-% \changes{v1.3f}{1998/08/10}{\cs{DeclareFixedCommand}を\cs{@onlypreamble}に
-% してしまっていたのを修正}
-% \changes{v1.3g}{1999/04/05}{plpatch.ltxの内容を反映}
-% \changes{v1.3h}{1999/08/09}{\cs{strut}の改善}
-% \changes{v1.3i}{2000/07/13}{\cs{text..}コマンドの左側に\cs{xkanjiskip}が
-% 入らないのを修正}
-% \changes{v1.3j}{2000/10/24}{\cs{adjustbaseline}で余分なアキが入らない
-% ようにした}
-% \changes{v1.3k}{2001/05/10}{欧文書体の基準を再び`/`から`M'に変更}
-% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}でフォントの基準値が縦書き
-% 以外では設定されないのを修正}
-% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}コマンド内部フラグ変更}
-% \changes{v1.3n}{2004/08/10}{和文エンコーディングの切り替えを有効化}
-% \changes{v1.3o}{2005/01/04}{\cs{fontfamily}中のフラグ修正}
-% \changes{v1.3p}{2006/01/04}{\cs{DeclareFontEncoding@}中で
-% \cs{LastDeclaredEncodeng}の再定義が抜けていたので追加}
-% \changes{v1.4}{2006/06/27}{\cs{reDeclareMathAlphabet}を修正。
-% ありがとう、ymtさん。}
-% \changes{v1.5}{2006/11/10}{\cs{reDeclareMathAlphabet}を修正。
-% ありがとう、ymtさん。}
-% \changes{v1.5-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。}
-% \changes{v1.6}{2016/02/01}{\LaTeX\ \texttt{!<2015/01/01!>}での\cs{em}の
-% 定義変更に対応。\cs{eminnershape}を追加。}
-% \changes{v1.6a}{2016/04/01}{ベースライン補正量が0でないときに
-% \cs{AA}など一部の合成文字がおかしくなることへの対応。}
-% \changes{v1.6a-u00}{2016/04/06}{p\LaTeX{}の変更に追随。}
+% \changes{v1.5-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。
+% (based on plfonts.dtx 2006/11/10 v1.5)}
+% \changes{v1.6a-u00}{2016/04/06}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2016/04/01 v1.6a)}
% \changes{v1.6b-u00}{2016/04/30}{uptrace.styの冒頭でtracefnt.styを
-% \cs{RequirePackageWithOptions}するようにした}
-% \changes{v1.6c}{2016/06/06}{v1.6aでの修正で\'e など全てのアクセント付き文字で
-% 周囲に\cs{xkanjiskip}が入らなくなっていたのを修正。}
-% \changes{v1.6c-u00}{2016/06/06}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6d}{2016/06/19}{アクセント付き文字をさらに修正(forum:1951)}
-% \changes{v1.6d-u00}{2016/06/19}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6e}{2016/06/26}{v1.6a以降の修正で全てのアクセント付き文字で
-% トラブルが相次いだため、いったんパッチを除去。}
-% \changes{v1.6e-u00}{2016/06/29}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6f}{2017/02/20}{ptrace.styのplatexrelease対応}
-% \changes{v1.6f}{2017/02/20}{\cs{ystrutbox}を追加}
-% \changes{v1.6f}{2017/02/20}{\cs{strutbox}を縦横両対応に}
-% \changes{v1.6f}{2017/02/20}{\cs{strutbox}の代わりに\cs{ystrutbox}を使用}
-% \changes{v1.6f}{2017/02/20}{\cs{ystrut}を追加}
-% \changes{v1.6f}{2017/02/20}{\cs{ystrutbox}を組み立てるように}
-% \changes{v1.6f-u00}{2017/03/05}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6g}{2017/03/07}{ベースライン補正量を修正}
-% \changes{v1.6g-u00}{2017/03/08}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6h}{2017/08/05}{和文書体の基準を全角空白から「漢」に変更}
-% \changes{v1.6h}{2017/08/05}{traceのコードの\texttt{\%}忘れを修正}
-% \changes{v1.6h-u00}{2017/08/05}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6i}{2017/09/24}{2010年のp\TeX{}本体の修正により、v1.3iで入れた
-% 対処が不要になっていたので削除}
-% \changes{v1.6i}{2017/09/24}{\cs{<}が段落頭でも効くようにした}
-% \changes{v1.6i-u00}{2017/09/24}{p\LaTeX{}の変更に追随。}
-% \changes{v1.6j}{2017/11/06}{\cs{cy at encoding}と\cs{ct at encoding}を
-% 具体的な値ではなく「空」で初期化}
-% \changes{v1.6j}{2017/11/06}{縦横のエンコーディングのセット化を
-% plcoreからpldefsへ移動}
-% \changes{v1.6j-u00}{2017/11/06}{p\LaTeX{}の変更に追随。}
+% \cs{RequirePackageWithOptions}するようにした
+% (based on plfonts.dtx 2016/04/30 v1.6b)}
+% \changes{v1.6c-u00}{2016/06/06}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2016/06/06 v1.6c)}
+% \changes{v1.6d-u00}{2016/06/19}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2016/06/19 v1.6d)}
+% \changes{v1.6e-u00}{2016/06/29}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2016/06/26 v1.6e)}
+% \changes{v1.6f-u00}{2017/03/05}{uptrace.styのplatexrelease対応
+% (based on plfonts.dtx 2017/02/20 v1.6f)}
+% \changes{v1.6g-u00}{2017/03/08}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2017/03/07 v1.6g)}
+% \changes{v1.6h-u00}{2017/08/05}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2017/08/05 v1.6h)}
+% \changes{v1.6i-u00}{2017/09/24}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2017/09/24 v1.6i)}
+% \changes{v1.6j-u00}{2017/11/06}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2017/11/06 v1.6j)}
+% \changes{v1.6k-u00}{2017/12/05}{デフォルト設定ファイルの読み込みを
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on plfonts.dtx 2017/12/05 v1.6k)}
+% \changes{v1.6k-u01}{2017/12/10}{uptraceパッケージは
+% ptraceパッケージを読み込むだけとした}
+% \changes{v1.6k-u02}{2017/12/10}{p\LaTeX{}との統合のため、
+% up\LaTeX{}用の最小限の変更だけを定義するようにした}
+% \changes{v1.6l-u02}{2018/02/04}{p\LaTeX{}の変更に追随。
+% (based on plfonts.dtx 2018/02/04 v1.6l)}
% \fi
%
% \iffalse
@@ -93,7 +57,7 @@
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{uplfonts.dtx}[2017/11/06 v1.6j-u00 upLaTeX New Font Selection Scheme]
+\ProvidesFile{uplfonts.dtx}[2018/02/04 v1.6l-u02 upLaTeX New Font Selection Scheme]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{uplfonts.dtx}
@@ -114,6 +78,10 @@
% また、フォント定義ファイルや初期設定ファイルなどの説明もしています。
% 新しいフォント選択コマンドの使い方については、\file{fntguide.tex}や
% \file{usrguide.tex}を参照してください。
+% \changes{v1.5-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。
+% (based on plfonts.dtx 2006/11/10 v1.5)}
+% \changes{v1.6k-u02}{2017/12/10}{p\LaTeX{}との統合のため、
+% up\LaTeX{}用の最小限の変更だけを定義するようにした}
%
% \begin{description}
% \item[第\ref{plfonts:intro}節] この節です。このファイルの概要と
@@ -133,7 +101,7 @@
% \begin{center}
% \begin{tabular}{l|p{0.7\linewidth}}
% \emph{オプション} & \emph{意味}\\\hline
-% plcore & \file{uplfonts.ltx}を生成します。\\
+% plcore & \file{uplcore.ltx}の断片を生成するオプションでしたが、削除。\\
% trace & \file{uptrace.sty}を生成します。\\
% JY2mc & 横組用、明朝体のフォント定義ファイルを生成します。\\
% JY2gt & 横組用、ゴシック体のフォント定義ファイルを生成します。\\
@@ -153,1991 +121,56 @@
%
%
% \section{コード}\label{plfonts:codes}
-% この節で、具体的に\NFSS2を拡張するコマンドやマクロの定義を行なっています。
+% \NFSS2の拡張は、p\LaTeX{}において\file{plfonts.dtx}から生成される
+% \file{plcore.ltx}をそのまま利用するので、up\LaTeX{}では定義しません。
+% 後方互換性のため、\file{uptrace.sty}を提供しますが、
+% これも単に\file{ptrace.sty}を読み込むだけとします。
%
-% \subsection{準備}
-% \NFSS2を拡張するための準備です。
-% 和文フォントの属性を格納するオブジェクトや長さ変数、
-% 属性を切替える際の判断材料として使うリストなどを定義しています。
-%
-% \file{uptrace}パッケージは\LaTeX{}の\file{tracefnt}パッケージに依存します。
% \changes{v1.6b-u00}{2016/04/30}{uptrace.styの冒頭でtracefnt.styを
% \cs{RequirePackageWithOptions}するようにした}
+% \changes{v1.6k-u01}{2017/12/10}{uptraceパッケージは
+% ptraceパッケージを読み込むだけとした}
% \begin{macrocode}
%<*trace>
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{uptrace}
- [2017/08/05 v1.6h-u00 Standard upLaTeX package (font tracing)]
-\RequirePackageWithOptions{tracefnt}
+ [2017/12/10 v1.6k-u02 Standard upLaTeX package (font tracing)]
+\RequirePackageWithOptions{ptrace}
%</trace>
% \end{macrocode}
%
-% \subsubsection{和文フォント属性}
-% ここでは、和文フォントの属性を格納するためのオブジェクトについて
-% 説明をしています。
-%
-% \begin{macro}{\k at encoding}
-% \begin{macro}{\ck at encoding}
-% \begin{macro}{\cy at encoding}
-% \begin{macro}{\ct at encoding}
-% 和文エンコードを示すオブジェクトです。
-% |\ck at encoding|は、最後に選択された和文エンコード名を示しています。
-% |\cy at encoding|と|\ct at encoding|はそれぞれ、最後に選択された、
-% 横組用と縦組用の和文エンコード名を示しています。
+% デフォルト設定ファイル\file{upldefs.ltx}は、もともと\file{uplcore.ltx}の途中で
+% 読み込んでいましたが、2018年以降の新しいコミュニティ版\upLaTeX{}では
+% \file{uplatex.ltx}から読み込むことにしました。
+% 実際の中身については、第\ref{plfonts:pldefs}節を参照してください。
+% \changes{v1.6k-u00}{2017/12/05}{デフォルト設定ファイルの読み込みを
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on plfonts.dtx 2017/12/05 v1.6k)}
%
-% ここでは単に「空」に初期化するだけにしています。
-% \iffalse
-% アスキー版はJY1やJT1という具体的な値で初期化していたが、これらの値は
-% \file{pldefs.ltx}で定義するものであるから、\file{plcore.ltx}で
-% それを使うのはおかしい。
-% \fi
-% \changes{v1.6j}{2017/11/06}{\cs{cy at encoding}と\cs{ct at encoding}を
-% 具体的な値ではなく「空」で初期化}
-% \begin{macrocode}
-%<*plcore>
-\let\k at encoding\@empty
-\let\ck at encoding\@empty
-\let\cy at encoding\@empty
-\let\ct at encoding\@empty
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
%
-% \begin{macro}{\k at family}
-% 和文書体のファミリを示すオブジェクトです。
-% \begin{macrocode}
-\let\k at family\@empty
-% \end{macrocode}
-% \end{macro}
%
-% \begin{macro}{\k at series}
-% 和文書体のシリーズを示すオブジェクトです。
-% \begin{macrocode}
-\let\k at series\@empty
-% \end{macrocode}
-% \end{macro}
%
-% \begin{macro}{\k at shape}
-% 和文書体のシェイプを示すオブジェクトです。
-% \begin{macrocode}
-\let\k at shape\@empty
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\curr at kfontshape}
-% 現在の和文フォント名を示すオブジェクトです。
-% \begin{macrocode}
-\def\curr at kfontshape{\k at encoding/\k at family/\k at series/\k at shape}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\rel at fontshape}
-% 関連付けされたフォント名を示すオブジェクトです。
-% \begin{macrocode}
-\def\rel at fontshape{\f at encoding/\f at family/\f at series/\f at shape}
-% \end{macrocode}
-% \end{macro}
-%
-% \subsubsection{長さ変数}
-% ここでは、和文フォントの幅や高さなどを格納する変数について説明をしています。
-%
-% 頭文字が大文字の変数は、ノーマルサイズの書体の大きさで、基準値となります。
-% これらは、\file{jart10.clo}などの補助クラスファイルで設定されます。
-%
-% 小文字だけからなる変数は、
-% フォントが変更されたときに（|\selectfont|内で）更新されます。
-%
-% \begin{macro}{\Cht}
-% \begin{macro}{\cht}
-% |\Cht|は基準となる和文フォントの文字の高さを示します。
-% |\cht|は現在の和文フォントの文字の高さを示します。
-% なお、この``高さ''はベースラインより上の長さです。
-% \begin{macrocode}
-\newdimen\Cht
-\newdimen\cht
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\Cdp}
-% \begin{macro}{\cdp}
-% |\Cdp|は基準となる和文フォントの文字の深さを示します。
-% |\cdp|は現在の和文フォントの文字の深さを示します。
-% なお、この``深さ''はベースラインより下の長さです。
-% \begin{macrocode}
-\newdimen\Cdp
-\newdimen\cdp
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\Cwd}
-% \begin{macro}{\cwd}
-% |\Cwd|は基準となる和文フォントの文字の幅を示します。
-% |\cwd|は現在の和文フォントの文字の幅を示します。
-% \begin{macrocode}
-\newdimen\Cwd
-\newdimen\cwd
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\Cvs}
-% \begin{macro}{\cvs}
-% |\Cvs|は基準となる行送りを示します。
-% ノーマルサイズの|\baselineskip|と同値です。
-% |\cvs|は現在の行送りを示します。
-% \begin{macrocode}
-\newdimen\Cvs
-\newdimen\cvs
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\Chs}
-% \begin{macro}{\chs}
-% |\Chs|は基準となる字送りを示します。|\Cwd|と同値です。
-% |\chs|は現在の字送りを示します。
-% \begin{macrocode}
-\newdimen\Chs
-\newdimen\chs
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\cHT}
-% |\cHT|は、現在のフォントの高さに深さを加えた長さを示します。
-% |\set at fontsize|コマンド（実際は|\size at update|）で更新されます。
-% \begin{macrocode}
-\newdimen\cHT
-% \end{macrocode}
-% \end{macro}
-%
-% \subsubsection{一時コマンド}
-%
-% \begin{macro}{\afont}
-% \LaTeX{}内部の|\do at subst@correction|マクロでは、
-% |\fontname\font|で返される外部フォント名を用いて、
-% \LaTeX{}フォント名を定義しています。したがって、|\font|をそのまま使うと、
-% 和文フォント名に欧文の外部フォントが登録されたり、
-% 縦組フォント名に横組用の外部フォントが割り付けられたりしますので、
-% |\jfont|か|\tfont|を用いるようにします。
-% |\afont|は、|\font|コマンドの保存用です。
-% \begin{macrocode}
-\let\afont\font
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsubsection{フォントリスト}
-% ここでは、フォントのエンコードやファミリの名前を登録するリストについて
-% 説明をしています。
-%
-% p\LaTeXe{}の\NFSS2では、一つのコマンドで和文か欧文のいずれか、あるいは両方を
-% 変更するため、コマンドに指定された引数が何を示すのかを判断しなくては
-% なりません。この判断材料として、リストを用います。
-%
-% このときの具体的な判断手順については、エンコード選択コマンドや
-% ファミリ選択コマンドなどの定義を参照してください。
-%
-% \begin{macro}{\inlist@}
-% 次のコマンドは、エンコードやファミリのリスト内に第二引数で指定された文字列
-% があるかどうかを調べるマクロです。
-% \begin{macrocode}
-\def\inlist@#1#2{%
- \def\in@@##1<#1>##2##3\in@@{%
- \ifx\in@##2\in at false\else\in at true\fi}%
- \in@@#2<#1>\in@\in@@}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\enc at elt}
-% \begin{macro}{\fam at elt}
-% |\enc at elt|と|\fam at elt|は、登録されているエンコードに対して、
-% なんらかの処理を逐次的に行ないたいときに使用することができます。
-% \begin{macrocode}
-\def\fam at elt{\noexpand\fam at elt}
-\def\enc at elt{\noexpand\enc at elt}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\fenc at list}
-% \begin{macro}{\kenc at list}
-% \begin{macro}{\kyenc at list}
-% \begin{macro}{\ktenc at list}
-% |\fenc at list|には、|\DeclareFontEncoding|コマンドで宣言されたエンコード名が
-% 格納されていきます。
-%
-% |\kyenc at list|には、|\DeclareYokoKanjiEncoding|コマンドで宣言された
-% エンコード名が格納されていきます。
-% |\ktenc at list|には、|\DeclareTateKanjiEncoding|コマンドで宣言された
-% エンコード名が格納されていきます。
-%
-% \changes{v1.1b}{1995/03/28}{リストの初期値を変更}
-% \changes{v1.1b}{1995/05/10}{リスト内の空白を削除}
-%
-% ここで、これらのリストに具体的な値を入れて初期化をするのは、
-% リストにエンコードの登録をするように|\DeclareFontEncoding|を再定義
-% する前に、欧文エンコードが宣言されるため、リストに登録されないからです。
-% \changes{v1.1}{1997/01/25}{Add TS1 encoding to the starting member of
-% \cs{fenc at list}.}
-% \begin{macrocode}
-\def\fenc at list{\enc at elt<OML>\enc at elt<T1>\enc at elt<OT1>\enc at elt<OMS>%
- \enc at elt<OMX>\enc at elt<TS1>\enc at elt<U>}
-\let\kenc at list\@empty
-\let\kyenc at list\@empty
-\let\ktenc at list\@empty
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\kfam at list}
-% \begin{macro}{\ffam at list}
-% \begin{macro}{\notkfam at list}
-% \begin{macro}{\notffam at list}
-% |\kfam at list|には、|\DeclareKanjiFamily|コマンドで宣言されたファミリ名が
-% 格納されていきます。
-%
-% |\ffam at list|には、|\DeclareFontFamily|コマンドで宣言されたファミリ名が
-% 格納されていきます。
-%
-% |\notkfam at list|には、和文ファミリではないと推測されたファミリ名が
-% 格納されていきます。このリストは|\fontfamily|コマンドで作成されます。
-%
-% |\notffam at list|には欧文ファミリではないと推測されたファミリ名が
-% 格納されていきます。このリストは|\fontfamily|コマンドで作成されます。
-%
-% \changes{v1.1b}{1995/03/28}{リストの初期値を変更}
-% \changes{v1.1b}{1995/05/10}{リスト内の空白を削除}
-%
-% ここで、これらのリストに具体的な値を入れて初期化をするのは、
-% リストにファミリの登録をするように、|\DeclareFontFamily|が
-% 再定義される前に、このコマンドが使用されるため、
-% リストに登録されないからです。
-% \begin{macrocode}
-\def\kfam at list{\fam at elt<mc>\fam at elt<gt>}
-\def\ffam at list{\fam at elt<cmr>\fam at elt<cmss>\fam at elt<cmtt>%
- \fam at elt<cmm>\fam at elt<cmsy>\fam at elt<cmex>}
-% \end{macrocode}
-% \changes{v1.1c}{1996/03/06}{\cs{notkfam at list}と\cs{notffam at list}の
-% 初期値を変更}
-% つぎの二つのリストの初期値として、上記の値を用います。
-% これらのファミリ名は、和文でないこと、欧文でないことがはっきりしています。
-% \begin{macrocode}
-\let\notkfam at list\ffam at list
-\let\notffam at list\kfam at list
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-%
-% \subsubsection{支柱}
-% 行間の調整などに用いる支柱です。
-% 支柱のもととなるボックスの大きさは、フォントサイズが変更されるたびに、
-% |\set at fontsize|コマンドによって変化します。
-%
-% フォントサイズが変更されたときに、|\set at fontsize|コマンドで更新されます。
-%
-% 従来、横組ボックス用の支柱は|\strutbox|で、高さと深さが7対3となっていました。
-% これはp\LaTeX{}単体では問題になりませんでしたが、海外製の\LaTeX{}パッケージを
-% 縦組で使用した場合に、意図しない幅や高さが取得されることがありました。
-% この不都合を回避するため、コミュニティ版p\LaTeX{}では次の方法をとります。
-% \begin{itemize}
-% \item |\ystrutbox|（新設）：高さと深さが7対3の横組ボックス用の支柱
-% \item |\tstrutbox|：高さと深さが5対5の縦組ボックス用の支柱
-% \item |\zstrutbox|：高さと深さが7対3の縦組ボックス用の支柱
-% \item |\strutbox|（仕様変更）：縦横のディレクションに応じて
-% |\tstrutbox|または|\ystrutbox|に展開されるマクロ
-% \end{itemize}
-% すなわち、従来のp\LaTeX{}における|\strutbox|と同じ挙動を示すのが、
-% 新設された|\ystrutbox|ということになります。
-%
-% \begin{macro}{\tstrutbox}
-% \begin{macro}{\zstrutbox}
-% |\tstrutbox|は高さと深さが5対5、
-% |\zstrutbox|は高さと深さが7対3の支柱ボックスとなります。
-% これらは縦組ボックスの行間の調整などに使います。
-% \begin{macrocode}
-\newbox\tstrutbox
-\newbox\zstrutbox
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\ystrutbox}
-% |\ystrutbox|は高さと深さが7対3の横組ボックス用の支柱です。
-% \changes{v1.6f}{2017/02/20}{\cs{ystrutbox}を追加}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\ystrutbox}
-%<platexrelease> {Add \ystrutbox}%
-%<*plcore|platexrelease>
-\newbox\ystrutbox
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\ystrutbox}
-%<platexrelease> {Add \ystrutbox}%
-%<platexrelease>\let\ystrutbox\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\strutbox}
-% |\strutbox|は縦横両対応です。
-% \changes{v1.6f}{2017/02/20}{\cs{strutbox}を縦横両対応に}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\strutbox}
-%<platexrelease> {Add \strutbox}%
-%<*plcore|platexrelease>
-\def\strutbox{\iftdir\tstrutbox\else\ystrutbox\fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\strutbox}
-%<platexrelease> {Add \strutbox}%
-%<platexrelease>\newbox\strutbox % emulation purpose only
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\strut}
-% ディレクションに応じて|\ystrutbox|と|\tstrutbox|を使い分けます。
-% ^^A |\strutbox|は|\yoko|ディレクションで組まれていますので、
-% ^^A 縦組ボックス内で|\unhcopy|をするとエラーとなります。
-% 元々このマクロは\file{ltplain.dtx}で定義されています。
-%
-% \changes{v1.1c}{1995/08/24}{``\cs{centerling}~\cs{strut}''の幅がゼロに
-% なってしまうのを修正}
-% \changes{v1.3h}{1999/08/09}{縦組のとき、幅のあるボックスになってしまう
-% のを修正}
-% \changes{v1.6f}{2017/02/20}{\cs{strutbox}の代わりに\cs{ystrutbox}を使用}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\strut}
-%<platexrelease> {Use \ystrutbox}%
-%<*plcore|platexrelease>
-\def\strut{\relax
- \ifydir
- \ifmmode\copy\ystrutbox\else\unhcopy\ystrutbox\fi
- \else
- \ifmmode\copy\tstrutbox\else\unhcopy\tstrutbox\fi
- \fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\strut}
-%<platexrelease> {Use \ystrutbox}%
-%<platexrelease>\def\strut{\relax
-%<platexrelease> \ifydir
-%<platexrelease> \ifmmode\copy\strutbox\else\unhcopy\strutbox\fi
-%<platexrelease> \else
-%<platexrelease> \ifmmode\copy\tstrutbox\else\unhcopy\tstrutbox\fi
-%<platexrelease> \fi}
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\tstrut}
-% \begin{macro}{\zstrut}
-% \begin{macrocode}
-\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}
-%
-% \begin{macro}{\ystrut}
-% \changes{v1.6f}{2017/02/20}{\cs{ystrut}を追加}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\ystrut}
-%<platexrelease> {Add \ystrut}%
-%<*plcore|platexrelease>
-\def\ystrut{\relax\hbox{\yoko
- \ifmmode\copy\ystrutbox\else\unhcopy\ystrutbox\fi}}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\ystrut}
-%<platexrelease> {Add \ystrut}%
-%<platexrelease>\let\ystrut\@undefined
-%<platexrelease>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-%
-% \subsection{コマンド}
-% 次のコマンドの定義をしています。
-%
-% \DeleteShortVerb{\|}
-% \MakeShortVerb{\+}
-% \begin{center}
-% \begin{tabular}{l|l}
-% \emph{コマンド} & \emph{意味}\\\hline
-% +\Declare{Font|YokoKanji|TateKanji}Encoding+ & エンコードの宣言\\
-% +\Declare{Yoko|Tate}KanjiEncodingDefaults+ &
-% デフォルトの和文エンコードの宣言\\
-% +\Declare{Font|Kanji}Family+ & ファミリの宣言\\
-% +\DeclareKanjiSubstitution+ & 和文の代用フォントの宣言\\
-% +\DeclareErrorKanjiFont+ & 和文のエラーフォントの宣言 \\
-% +\DeclareFixedFont+ & フォントの名前の宣言 \\
-% +\reDeclareMathAlphabet+ & 和欧文を同時に切り替えるコマンド宣言\\
-% +\{Declare|Set}RelationFont+ & 従属書体の宣言\\
-% +\userelfont+ & 欧文書体を従属書体にする\\
-% +\selectfont+ & フォントを切り替える\\
-% +\set at fontsize+ & フォントサイズの変更\\
-% +\adjustbaseline+ & ベースラインシフト量の設定\\
-% +\{font|roman|kanji}encoding+ & エンコードの指定\\
-% +\{font|roman|kanji}family+ & ファミリの指定\\
-% +\{font|roman|kanji}series+ & シリーズの指定\\
-% +\{font|roman|kanji}shape+ & シェイプの指定\\
-% +\use{font|roman|kanji}+ & 書体の切り替え\\
-% +\normalfont+ & デフォルト値の設定に切り替える\\
-% +\mcfamily+,+\gtfamily+ & 和文書体を明朝体、ゴシック体にする\\
-% +\textunderscore+ & テキストモードでの下線マクロ\\
-% \end{tabular}
-% \end{center}
-% \DeleteShortVerb{\+}
-% \MakeShortVerb{\|}
-%
-%
-% \begin{macro}{\DeclareFontEncoding}
-% \begin{macro}{\DeclareFontEncoding@}
-% 欧文エンコードを宣言するためのコマンドです。
-% \file{ltfssbas.dtx}で定義されているものを、
-% |\fenc at list|を作るように再定義をしています。
-% \changes{v1.3p}{2006/01/04}{\break\cs{DeclareFontEncoding@}中で
-% \cs{LastDeclaredEncodeng}の再定義が抜けていたので追加}
-% \begin{macrocode}
-\def\DeclareFontEncoding{%
- \begingroup
- \nfss at catcodes
- \expandafter\endgroup
- \DeclareFontEncoding@}
-%
-\def\DeclareFontEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at family}{\default at series}%
- {\default at shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at cmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\fenc at list{\fenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at 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@}
-% 和文エンコードの宣言をするコマンドです。
-% \changes{v1.3c}{1997/04/08}{和文エンコード宣言コマンドを縦組用と横組用で
-% 分けるようにした。}
-% \begin{macrocode}
-\def\DeclareKanjiEncoding#1{%
- \@latex at 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 at catcodes
- \expandafter\endgroup
- \DeclareYokoKanjiEncoding@}
-%
-\def\DeclareYokoKanjiEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at k@family}{\default at k@series}%
- {\default at k@shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at kcmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\kyenc at list{\kyenc at list\enc at elt<#1>}%
- \xdef\kenc at list{\kenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring KANJI (yoko) font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at KM#3}%
- }
-%
-\def\DeclareTateKanjiEncoding{%
- \begingroup
- \nfss at catcodes
- \expandafter\endgroup
- \DeclareTateKanjiEncoding@}
-%
-\def\DeclareTateKanjiEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at k@family}{\default at k@series}%
- {\default at k@shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at kcmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\ktenc at list{\ktenc at list\enc at elt<#1>}%
- \xdef\kenc at list{\kenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring KANJI (tate) font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at 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}
-% 和文エンコードのデフォルト値を宣言するコマンドです。
-% \begin{macrocode}
-\def\DeclareKanjiEncodingDefaults#1#2{%
- \ifx\relax#1\else
- \ifx\default at KT\@empty\else
- \@font at info{Overwriting KANJI encoding scheme text defaults}%
- \fi
- \gdef\default at KT{#1}%
- \fi
- \ifx\relax#2\else
- \ifx\default at KM\@empty\else
- \@font at info{Overwriting KANJI encoding scheme math defaults}%
- \fi
- \gdef\default at KM{#2}%
- \fi}
-\let\default at KT\@empty
-\let\default at KM\@empty
-\@onlypreamble\DeclareKanjiEncodingDefaults
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\KanjiEncodingPair}
-% 和文の縦横のエンコーディングはそれぞれ対にして扱うため、セット化するための
-% コマンドを定義します。
-% \changes{v1.3n}{2004/08/10}{和文エンコーディングの切り替えを有効化}
-% \begin{macrocode}
-\def\KanjiEncodingPair#1#2{\@namedef{t at enc@#1}{#2}\@namedef{y at enc@#2}{#1}}
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\DeclareFontFamily}
-% 欧文ファミリを宣言するためのコマンドです。
-% |\ffam at list|を作るように再定義をします。
-% \begin{macrocode}
-\def\DeclareFontFamily#1#2#3{%
- \@ifundefined{T@#1}%
- {\@latex at error{Encoding scheme `#1' unknown}\@eha}%
- {\edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ffam at list}%
- \ifin@ \else
- \def\fam at elt{\noexpand\fam at elt}%
- \xdef\ffam at list{\ffam at list\fam at elt<#2>}%
- \fi
- \def\reserved at a{#3}%
- \global
- \expandafter\let\csname #1+#2\expandafter\endcsname
- \ifx \reserved at a\@empty
- \@empty
- \else \reserved at a
- \fi
- }%
-}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\DeclareKanjiFamily}
-% 和文ファミリを宣言するためのコマンドです。
-% \begin{macrocode}
-\def\DeclareKanjiFamily#1#2#3{%
- \@ifundefined{T@#1}%
- {\@latex at error{KANJI Encoding scheme `#1' unknown}\@eha}%
- {\edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kfam at list}%
- \ifin@ \else
- \def\fam at elt{\noexpand\fam at elt}%
- \xdef\kfam at list{\kfam at list\fam at elt<#2>}%
- \fi
- \def\reserved at a{#3}%
- \global
- \expandafter\let\csname #1+#2\expandafter\endcsname
- \ifx \reserved at a\@empty
- \@empty
- \else \reserved at a
- \fi
- }%
-}
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\DeclareKanjiSubstitution}
-% \begin{macro}{\DeclareErrorKanjiFont}
-% 目的の和文フォントが見つからなかったときに使うフォントの宣言をする
-% コマンドです。
-% それぞれ、|\DeclareFontSubstitution|と|\DeclareErrorFont|に対応します。
-% \begin{macrocode}
-\def\DeclareKanjiSubstitution#1#2#3#4{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{KANJI Encoding scheme `#1' unknown}\@eha
- \else
- \begingroup
- \def\reserved at a{#1}%
- \toks@{}%
- \def\cdp at elt##1##2##3##4{%
- \def\reserved at b{##1}%
- \ifx\reserved at a\reserved at b
- \addto at hook\toks@{\cdp at elt{#1}{#2}{#3}{#4}}%
- \else
- \addto at hook\toks@{\cdp at elt{##1}{##2}{##3}{##4}}%
- \fi}%
- \cdp at list
- \xdef\cdp at list{\the\toks@}%
- \endgroup
- \global\@namedef{D@#1}{\def\default at family{#2}%
- \def\default at series{#3}%
- \def\default at shape{#4}}%
- \fi}
-%
-\def\DeclareErrorKanjiFont#1#2#3#4#5{%
- \xdef\error at kfontshape{%
- \noexpand\expandafter\noexpand\split at name\noexpand\string
- \expandafter\noexpand\csname#1/#2/#3/#4/#5\endcsname
- \noexpand\@nil}%
- \gdef\default at k@family{#2}%
- \gdef\default at k@series{#3}%
- \gdef\default at k@shape{#4}%
- \global\let\k at family\default at k@family
- \global\let\k at series\default at k@series
- \global\let\k at shape\default at k@shape
- \gdef\f at size{#5}%
- \gdef\f at baselineskip{#5pt}}
-%
-\@onlypreamble\DeclareKanjiSubstitution
-\@onlypreamble\DeclareErrorKanjiFont
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-%
-% \begin{macro}{\DeclareFixedFont}
-% フォント名を宣言するコマンドです。
-%
-% \changes{v1.2}{1995/11/09}{\break\cs{DeclareFixedFont}の日本語化}
-% \changes{v1.3c}{1997/04/09}{縦横エンコード・リストの分離による拡張}
-% \changes{v1.3f}{1998/08/10}{プリアンブル・コマンドにしてしまっていたのを解除}
-% \begin{macrocode}
-\def\DeclareFixedFont#1#2#3#4#5#6{%
- \begingroup
- \let\afont\font
- \math at fontsfalse
- \every at math@size{}%
- \fontsize{#6}\z@
- \edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@
- \usekanji{#2}{#3}{#4}{#5}%
- \let\font\jfont
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at 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}{\break\cs{reDeclareMathAlphabet}を追加。
-% ありがとう、ymtさん。}
-% \changes{v1.4}{2006/06/27}{\break\cs{reDeclareMathAlphabet}を修正。
-% ありがとう、ymtさん。}
-% \changes{v1.5}{2006/11/10}{\break\cs{reDeclareMathAlphabet}を修正。
-% ありがとう、ymtさん。}
-% 数式モード内で、数式文字用の和欧文フォントを同時に切り替えるコマンドです。
-%
-% p\LaTeXe{}には、本来の動作モードと2.09互換モードの二つがあり、
-% 両モードで数式文字を変更するコマンドや動作が異なります。
-% 本来の動作モードでは、|\mathrm{...}|のように|\math??|に引数を指定して
-% 使います。このときは引数にだけ影響します。2.09互換モードでは、|\rm|の
-% ような二文字コマンドを使います。このコマンドには引数を取らず、書体は
-% グルーピングの範囲で反映されます。二文字コマンドは、ネイティブモード
-% でも使えるようになっていて、動作も2.09互換モードのコマンドと同じです。
-%
-% しかし、内部的には|\math??|という一つのコマンドがすべての動作を受け持ち、
-% |\math??|コマンドや|\??|コマンドから呼び出された状態に応じて、動作を変え
-% ています。したがって、欧文フォントと和文フォントの両方を一度に変更する、
-% 数式文字変更コマンドを作るとき、それぞれの状態に合った動作で動くように
-% フォント切り替えコマンドを実行させる必要があります。
-%
-% \textbf{使い方}
-%\begin{verbatim}
-% usage: \reDeclareMathAlphabet{\mathAA}{\mathBB}{\mathCC}
-%\end{verbatim}
-% 欧文・和文両用の数式文字変更コマンド |\mathAA| を(再)定義します。
-% 欧文用のコマンド |\mathBB| と、和文用の |\mathCC| を (p)\LaTeX{} 標準の
-% 方法で定義しておいた後、上のように記述します。なお、|{\mathBB}{\mathCC}|
-% の部分については |{\@mathBB}{\@mathCC}| のように @ をつけた記述
-% をしてもかまいません(互換性のため)。上のような命令を発行すると、
-% |\mathAA| が、欧文に対しては |\mathBB|、 和文に対しては |\mathCC| の意味を
-% 持つようになります。
-% 通常は、|\reDeclareMathAlphabet{\mathrm}{\mathrm}{\mathmc}| のように
-% |AA=BB| として用います。また、|\mathrm| は \LaTeX{} kernel において
-% 標準のコマンドとして既に定義されているので、この場合は |\mathrm| の
-% 再定義となります。native mode での |\rm| のような two letter command
-% (old font command) に対しても同様なことが引きおこります。つまり、
-% 数式モードにおいて、新たな |\rm| は、\LaTeX{} original の |\rm| と |\mc|
-% (正確に言えば |\mathrm| と |\mathmc| であるが)の意味を合わせ持つように
-% なります。
-%
-% \textbf{補足}
-% \begin{itemize}
-% \item
-% |\mathAA| を再定義する他の命令(|\DeclareSymbolFontAlphabet| を用いる
-% パッケージの使用等)との衝突を避けるためには、|\AtBeginDocument| を併用
-% するなどして展開位置の制御を行ってください。
-% \item
-% テキストモード時のエラー表示用に |\mathBB| のみを用いることを除いて、
-% |\mathBB| と |\mathCC| の順は実際には意味を持ちません。和文、欧文の順に
-% 定義しても問題はありません。
-% \item
-% 第2,3引き数には |{\@mathBB}{\@mathCC}| のように |@| をつけた記述も
-% 行えます。ただし、形式は統一してください。判断は第2引き数で行って
-% いるため、 |{\@mathBB}{\mathCC}| のような記述ではうまく動作しません。
-% また、|\makeatletter| な状態で |{\@mathBB }{\@mathCC }| のような |@| と
-% 余分なスペースをつけた場合には無限ループを引き起こすことがあります。
-% このような記述は避けるようにして下さい。
-% \item
-% |\reDeclareMathAlphabet| を実行する際には、|\mathBB|, |\mathCC| が定義
-% されている必要はありません。実際に |\mathAA| を用いる際にはこれらの
-% |\mathBB|, |\mathCC| が (p)\LaTeX{}標準の方法で定義されている必要があります。
-% \item
-% 他の部分で |\mathAA| を全く定義しない場合を除き、|\mathAA| は
-% |\reDeclareMathAlphabet| を実行する以前で (p)\LaTeX{}標準の方法で定義され
-% ている必要があります(|\mathrm| や |\mathbf| の標準的なコマンドは、
-% \LaTeX{} kernel で既に定義されています)。
-% |\DeclareMathAlphabet| の場合には、|\reDeclareMathAlphabet| よりも前で1度
-% |\mathAA| を定義してあれば、|\reDeclareMathAlphabet| の後ろで再度
-% |\DeclareMathAlphabet| を用いて |\mathAA| の内部の定義内容を変更すること
-% には問題ありません。
-% |\DeclareSymbolFontAlphabet| の場合、再定義においても |\mathAA| が直接
-% 定義されるので、|\mathAA| に対する最後の |\DeclareSymbolFontAlphabet| の
-% さらに後で |\reDeclareMathAlphabet| を実行しなければ有効とはなりません。
-% \item
-% |\documentstyle| の互換モードの場合、|\rm| 等の two letter command
-% (old font command) は、|\reDeclareMathAlphabet| とは関連することのない
-% 別個のコマンドとして定義されます。従って、この場合には
-% |\reDeclareMathAlphabet| を用いても |\rm| 等は数式モードにおいて
-% 欧文・和文両用のものとはなりません。
-% \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 at mathalph@bet%
- {\expandafter\noexpand\csname\@tempa\space\endcsname}%
- {\expandafter\noexpand\csname\@tempb\space\endcsname}%
- }%
-}
-\@onlypreamble\reDeclareMathAlphabet
-\def\DualLang at mathalph@bet#1#2{%
- \relax\ifmmode
- \ifx\math at bgroup\bgroup% 2e normal style (\mathrm{...})
- \bgroup\let\DualLang at Mfontsw\DLMfontsw at standard
- \else
- \ifx\math at bgroup\relax% 2e two letter style (\rm->\mathrm)
- \let\DualLang at Mfontsw\DLMfontsw at oldstyle
- \else
- \ifx\math at bgroup\@empty% 2.09 oldlfont style ({\mathrm ...})
- \let\DualLang at Mfontsw\DLMfontsw at oldlfont
- \else% panic! assume 2e normal style
- \bgroup\let\DualLang at Mfontsw\DLMfontsw at standard
- \fi
- \fi
- \fi
- \else
- \let\DualLang at Mfontsw\@firstoftwo
- \fi
- \DualLang at Mfontsw{#1}{#2}%
-}
-\def\DLMfontsw at standard#1#2#3{#1{#2{#3}}\egroup}
-\def\DLMfontsw at oldstyle#1#2{#1\relax\@fontswitch\relax{#2}}
-\def\DLMfontsw at oldlfont#1#2{#1\relax#2\relax}
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\DeclareRelationFont}
-% \begin{macro}{\SetRelationFont}
-% 和文書体に対する従属書体を宣言するコマンドです。\emph{従属書体}とは、
-% ある和文書体とペアになる欧文書体のことです。
-% 主に多書体パッケージ|skfonts|を用いるための仕組みです。
-%
-% |\DeclareRelationFont|コマンドの最初の4つの引数の組が和文書体の属性、
-% その後の4つの引数の組が従属書体の属性です。
-%\begin{verbatim}
-% \DeclareRelationFont{JY2}{mc}{m}{n}{T1}{cmr}{m}{n}
-% \DeclareRelationFont{JY2}{gt}{m}{n}{T1}{cmr}{bx}{n}
-%\end{verbatim}
-% 上記の例は、明朝体の従属書体としてコンピュータモダンローマン、
-% ゴシック体の従属書体としてコンピュータモダンボールドを宣言しています。
-% カレント和文書体が|\JY2/mc/m/n|となると、
-% 自動的に欧文書体が|\T1/cmr/m/n|になります。
-% また、和文書体が|\JY2/gt/m/n|になったときは、
-% 欧文書体が|\T1/cmr/bx/n|になります。
-%
-% 和文書体のシェイプ指定を省略するとエンコード／ファミリ／シリーズの組合せで
-% 従属書体が使われます。このときは、|\selectfont|が呼び出された時点での
-% シェイプ（|\f at shape|）の値が使われます。
-%
-% |\DeclareRelationFont|の設定値はグローバルに有効です。
-% |\SetRelationFont|の設定値はローカルに有効です。
-% フォント定義ファイルで宣言をする場合は、
-% |\DeclareRelationFont|を使ってください。
-% \begin{macrocode}
-\def\all at shape{all}%
-\def\DeclareRelationFont#1#2#3#4#5#6#7#8{%
- \def\rel at shape{#4}%
- \ifx\rel at 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 at shape{#4}%
- \ifx\rel at 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 at knjcmd}
-% \begin{macro}{\userelfont}
-% |\if at knjcmd|は欧文書体を従属書体にするかどうかのフラグです。
-% このフラグが真になると、欧文書体に従属書体が使われます。
-% このフラグは|\userelfont|コマンドによって、\emph{真}となります。
-% そして|\selectfont|実行後には\emph{偽}に初期化されます。
-% \begin{macrocode}
-\newif\if at knjcmd
-\def\userelfont{\@knjcmdtrue}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\selectfont}
-% |\selectfont|のオリジナルからの変更部分は、次の３点です。
-% \begin{itemize}
-% \item 和文書体を変更する部分
-% \item 従属書体に変更する部分
-% \item 和欧文のベースラインを調整する部分
-% \end{itemize}
-%
-% \changes{v1.0c}{1995/08/22}{縦横両方のフォントを切り替えるようにした}
-% \changes{v1.2}{1995/11/22}{エラーフォントに対応した}
-% \changes{v1.3n}{2004/08/10}{和文エンコーディングの切り替えを有効化}
-% |\selectfont|コマンドは、まず、和文フォントを切り替えます。
-% \begin{macrocode}
-%</plcore>
-%<*plcore|trace>
-\DeclareRobustCommand\selectfont{%
- \let\tmp at error@fontshape\error at fontshape
- \let\error at fontshape\error at kfontshape
- \edef\tmp at item{{\k at encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@
- \let\cy at encoding\k at encoding
- \edef\ct at encoding{\csname t at enc@\k at encoding\endcsname}%
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at list}%
- \ifin@
- \let\ct at encoding\k at encoding
- \edef\cy at encoding{\csname y at enc@\k at encoding\endcsname}%
- \else
- \@latex at error{KANJI Encoding scheme `\k at encoding' unknown}\@eha
- \fi
- \fi
- \let\font\tfont
- \let\k at encoding\ct at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \let\font\jfont
- \let\k at encoding\cy at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \expandafter\def\expandafter\k at encoding\tmp at item
- \kenc at update
- \let\error at fontshape\tmp at error@fontshape
-% \end{macrocode}
-% 次に、|\if at knjcmd|が真の場合、
-% 欧文書体を現在の和文書体に関連付けされたフォントに変えます。
-% このフラグは|\userelfont|コマンドによって\emph{真}となります。
-% このフラグはここで再び、\emph{偽}に設定されます。
-% \begin{macrocode}
- \if at knjcmd \@knjcmdfalse
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname\relax
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname\relax
- \else
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname
- \fi
- \else
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname
- \fi
- \fi
-% \end{macrocode}
-% そして、欧文フォントを切り替えます。
-% \begin{macrocode}
- \let\font\afont
- \xdef\font at name{\csname\curr at fontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
-%<trace> \ifnum \tracingfonts>\tw@
-%<trace> \@font at info{Roman:Switching to \font at name}\fi
- \enc at update
-% \end{macrocode}
-% 最後に、サイズが変更されていれば、ベースラインの調整などを行ないます。
-% 英語版の|\selectfont|では最初に行なっていますが、
-% p\LaTeXe{}ではベースラインシフトの調整をするために、
-% 書体を確定しなければならないため、一番最後に行ないます
-%
-% \changes{v1.1b}{1995/04/26}{ベースラインの調整をサイズ変更時に
-% 行なうようにした}
-% \begin{macrocode}
- \ifx\f at linespread\baselinestretch \else
- \set at fontsize\baselinestretch\f at size\f at baselineskip
- \fi
- \size at update}
-%</plcore|trace>
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\set at fontsize}
-% |\fontsize|コマンドの内部形式です。
-% ベースラインの設定と、支柱の設定を行ないます。
-% \begin{macrocode}
-%</plcore>
-%<platexrelease|trace>\plIncludeInRelease{2017/04/08}{\set at fontsize}
-%<platexrelease|trace> {Construct \ystrutbox}%
-%<*plcore|platexrelease|trace>
-\def\set at fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f at size{\strip at pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f at baselineskip{\the\@tempskipa}%
- \edef\f at linespread{#1}%
- \let\baselinestretch\f at linespread
- \def\size at update{%
- \baselineskip\f at baselineskip\relax
- \baselineskip\f at linespread\baselineskip
- \normalbaselineskip\baselineskip
-% \end{macrocode}
-% ここで、ベースラインシフトの調整と支柱を組み立てます。
-% \changes{v1.6f}{2017/02/20}{\cs{ystrutbox}を組み立てるように}
-% \begin{macrocode}
- \adjustbaseline
- \setbox\ystrutbox\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}
-% フォントサイズとベースラインに関する診断情報を出力します。
-% \begin{macrocode}
-%<*trace>
- \ifnum \tracingfonts>\tw@
- \ifx\f at linespread\@empty
- \let\reserved at a\@empty
- \else
- \def\reserved at a{\f at linespread x}%
- \fi
- \@font at info{Changing size to\space
- \f at size/\reserved at a \f at baselineskip}%
- \aftergroup\type at restoreinfo
- \fi
-%</trace>
- \let\size at update\relax}}
-%</plcore|platexrelease|trace>
-%<platexrelease|trace>\plEndIncludeInRelease
-%<platexrelease|trace>\plIncludeInRelease{0000/00/00}{\set at fontsize}
-%<platexrelease|trace> {Construct \ystrutbox}%
-%<platexrelease|trace>\def\set at fontsize#1#2#3{%
-%<platexrelease|trace> \@defaultunits\@tempdimb#2pt\relax\@nnil
-%<platexrelease|trace> \edef\f at size{\strip at pt\@tempdimb}%
-%<platexrelease|trace> \@defaultunits\@tempskipa#3pt\relax\@nnil
-%<platexrelease|trace> \edef\f at baselineskip{\the\@tempskipa}%
-%<platexrelease|trace> \edef\f at linespread{#1}%
-%<platexrelease|trace> \let\baselinestretch\f at linespread
-%<platexrelease|trace> \def\size at update{%
-%<platexrelease|trace> \baselineskip\f at baselineskip\relax
-%<platexrelease|trace> \baselineskip\f at linespread\baselineskip
-%<platexrelease|trace> \normalbaselineskip\baselineskip
-%<platexrelease|trace> \adjustbaseline
-%<platexrelease|trace> \setbox\strutbox\hbox{\yoko
-%<platexrelease|trace> \vrule\@width\z@
-%<platexrelease|trace> \@height.7\baselineskip \@depth.3\baselineskip}%
-%<platexrelease|trace> \setbox\tstrutbox\hbox{\tate
-%<platexrelease|trace> \vrule\@width\z@
-%<platexrelease|trace> \@height.5\baselineskip \@depth.5\baselineskip}%
-%<platexrelease|trace> \setbox\zstrutbox\hbox{\tate
-%<platexrelease|trace> \vrule\@width\z@
-%<platexrelease|trace> \@height.7\baselineskip \@depth.3\baselineskip}%
-%<*trace>
-%<platexrelease|trace> \ifnum \tracingfonts>\tw@
-%<platexrelease|trace> \ifx\f at linespread\@empty
-%<platexrelease|trace> \let\reserved at a\@empty
-%<platexrelease|trace> \else
-%<platexrelease|trace> \def\reserved at a{\f at linespread x}%
-%<platexrelease|trace> \fi
-%<platexrelease|trace> \@font at info{Changing size to\space
-%<platexrelease|trace> \f at size/\reserved at a \f at baselineskip}%
-%<platexrelease|trace> \aftergroup\type at restoreinfo
-%<platexrelease|trace> \fi
-%</trace>
-%<platexrelease|trace> \let\size at update\relax}}
-%<platexrelease|trace>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\adjustbaseline}
-% 現在の和文フォントの空白（EUCコード\texttt{0xA1A1}）の中央に
-% 現在の欧文フォントの``/''の中央がくるようにベースラインシフトを設定します。
-% \changes{v1.0c}{1995/08/31}{欧文書体の基準を`M'から`/'に変更}
-% \changes{v1.2}{1995/11/21}{縦組時のみ調整するようにした}
-%
-% 当初はまずベースラインシフト量をゼロにしていましたが、
-% \cs{tbaselineshift}を連続して変更した後に鈎括弧類を使うと余計なアキが
-% でる問題が起こるため、\cs{tbaselineshift}をゼロクリアする処理を削除し
-% ました。
-% \changes{v1.3j}{2000/10/24}{文頭に鈎括弧などがあるときに余計なアキがで
-% る問題に対処}
-%
-% しかし、それではベースラインシフトを調整済みの欧文ボックスと比較して
-% しまうため、計算した値が大きくなってしまいます。そこで、このボックス
-% の中でゼロにするようにしました。また、``/''と比較していたのを``M''に
-% しました。
-% \changes{v1.3k}{2001/05/10}{欧文書体の基準を再び`/`から`M'に変更}
-% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}でフォントの基準値が縦書き
-% 以外では設定されないのを修正}
-%
-% 全角空白（EUCコード\texttt{0xA1A1}）はJFMで特殊なタイプに分類される可能性
-% があるため、和文書体の基準を「漢」（JISコード\texttt{0x3441}）へ変更しました。
-% \changes{v1.6h}{2017/08/05}{和文書体の基準を全角空白から「漢」に変更}
-%
-% \begin{macrocode}
-\newbox\adjust at box
-\newdimen\adjust at dimen
-% \end{macrocode}
-%
-% \begin{macrocode}
-%</plcore>
-%<platexrelease|trace>\plIncludeInRelease{2017/07/29}{\adjustbaseline}
-%<platexrelease|trace> {Change zenkaku reference}%
-%<*plcore|platexrelease|trace>
-\def\adjustbaseline{%
-% \end{macrocode}
-% 和文フォントの基準値を設定します。
-% \begin{macrocode}
- \setbox\adjust at box\hbox{\char\jis"3441}%"
- \cht\ht\adjust at box
- \cdp\dp\adjust at box
- \cwd\wd\adjust at box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
-% \end{macrocode}
-% 基準となる欧文フォントの文字を含んだボックスを作成し、
-% ベースラインシフト量の計算を行ないます。
-% 計算式は次のとおりです。
-%
-% \begin{eqnarray*}
-% \textmc{ベースラインシフト量} &=&
-% \{ (\textmc{漢の深さ}) - (\textmc{Mの深さ}) \} \\
-% &&- \frac{(\textmc{漢の高さ$+$深さ})
-% - (\textmc{Mの高さ$+$深さ})}{2}
-% \end{eqnarray*}
-% \changes{v1.6h}{2017/08/05}{traceのコードの\texttt{\%}忘れを修正}
-%
-% \begin{macrocode}
- \iftdir
- \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
- \adjust at dimen\ht\adjust at box
- \advance\adjust at dimen\dp\adjust at box
- \advance\adjust at dimen-\cHT
- \divide\adjust at dimen\tw@
- \advance\adjust at dimen\cdp
- \advance\adjust at dimen-\dp\adjust at box
- \tbaselineshift\adjust at dimen
-%<trace> \ifnum \tracingfonts>\tw@
-%<trace> \typeout{baselineshift:\the\tbaselineshift}%
-%<trace> \fi
- \fi}
-%</plcore|platexrelease|trace>
-%<platexrelease|trace>\plEndIncludeInRelease
-%<platexrelease|trace>\plIncludeInRelease{0000/00/00}{\adjustbaseline}
-%<platexrelease|trace> {Change zenkaku reference}%
-%<platexrelease|trace>\def\adjustbaseline{%
-%<platexrelease|trace> \setbox\adjust at box\hbox{\char\euc"A1A1}%"
-%<platexrelease|trace> \cht\ht\adjust at box
-%<platexrelease|trace> \cdp\dp\adjust at box
-%<platexrelease|trace> \cwd\wd\adjust at box
-%<platexrelease|trace> \cvs\normalbaselineskip
-%<platexrelease|trace> \chs\cwd
-%<platexrelease|trace> \cHT\cht \advance\cHT\cdp
-%<platexrelease|trace> \iftdir
-%<platexrelease|trace> \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
-%<platexrelease|trace> \adjust at dimen\ht\adjust at box
-%<platexrelease|trace> \advance\adjust at dimen\dp\adjust at box
-%<platexrelease|trace> \advance\adjust at dimen-\cHT
-%<platexrelease|trace> \divide\adjust at dimen\tw@
-%<platexrelease|trace> \advance\adjust at dimen\cdp
-%<platexrelease|trace> \advance\adjust at dimen-\dp\adjust at box
-%<platexrelease|trace> \tbaselineshift\adjust at dimen
-%<*trace>
-%<platexrelease|trace> \ifnum \tracingfonts>\tw@
-%<platexrelease|trace> \typeout{baselineshift:\the\tbaselineshift}
-%<platexrelease|trace> \fi
-%</trace>
-%<platexrelease|trace> \fi}
-%<platexrelease|trace>\plEndIncludeInRelease
-%<*plcore>
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\romanencoding}
-% \begin{macro}{\kanjiencoding}
-% \begin{macro}{\fontencoding}
-% 書体のエンコードを指定するコマンドです。
-% |\fontencoding|コマンドは和欧文のどちらかに影響します。
-% |\DeclareKanjiEncoding|で指定されたエンコードは和文エンコードとして、
-% |\DeclareFontEncoding|で指定されたエンコードは欧文エンコードとして
-% 認識されます。
-%
-% |\kanjiencoding|と|\romanencoding|は与えられた引数が、
-% エンコードとして登録されているかどうかだけを確認し、
-% それが和文か欧文かのチェックは行なっていません。
-% そのため、高速に動作をしますが、|\kanjiencoding|に欧文エンコードを指定したり、
-% 逆に|\romanencoding|に和文エンコードを指定した場合はエラーとなります。
-% \begin{macrocode}
-\DeclareRobustCommand\romanencoding[1]{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{Encoding scheme `#1' unknown}\@eha
- \else
- \edef\f at encoding{#1}%
- \ifx\cf at encoding\f at encoding
- \let\enc at update\relax
- \else
- \let\enc at update\@@enc at update
- \fi
- \fi
-}
-\DeclareRobustCommand\kanjiencoding[1]{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{KANJI Encoding scheme `#1' unknown}\@eha
- \else
- \edef\k at encoding{#1}%
- \ifx\ck at encoding\k at encoding
- \let\kenc at update\relax
- \else
- \let\kenc at update\@@kenc at update
- \fi
- \fi
-}
-\DeclareRobustCommand\fontencoding[1]{%
- \edef\tmp at item{{#1}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kenc at list}%
- \ifin@ \kanjiencoding{#1}\else\romanencoding{#1}\fi}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-% \begin{macro}{\@@kenc at update}
-% |\kanjiencoding|コマンドのコードからもわかるように、
-% |\ck at encoding|と|\k at encoding|が異なる場合、
-% |\kenc at update|コマンドは|\@@kenc at update|コマンドと等しくなります。
-%
-% |\@@kenc at update|コマンドは、そのエンコードでのデフォルト値を設定するための
-% コマンドです。欧文用の|\@@enc at update|コマンドでは、
-% \mlineplus{2}行目と\mlineplus{3}行目のような代入もしていますが、
-% 和文用にはコメントにしてあります。
-% これらは|\DeclareTextCommand|や|\ProvideTextCommand|などで
-% エンコードごとに設定されるコマンドを使うための仕組みです。
-% しかし、和文エンコードに依存するようなコマンドやマクロを作成することは、
-% 現時点では、ないと思います。
-%
-% \changes{v1.0c}{1995/08/22}{縦横用エンコードの保存}
-% \begin{macrocode}
-\def\@@kenc at update{%
-% \expandafter\let\csname\ck at encoding -cmd\endcsname\@changed at kcmd
-% \expandafter\let\csname\k at encoding-cmd\endcsname\@current at cmd
- \default at KT
- \csname T@\k at encoding\endcsname
- \csname D@\k at encoding\endcsname
- \let\kenc at update\relax
- \let\ck at encoding\k at encoding
- \edef\tmp at item{{\k at encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@ \let\cy at encoding\k at encoding
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at list}%
- \ifin@ \let\ct at encoding\k at encoding
- \else
- \@latex at error{KANJI Encoding scheme `\k at encoding' unknown}\@eha
- \fi
- \fi
-}
-\let\kenc at update\relax
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@changed at kcmd}
-% |\@changed at cmd|の和文エンコーディングバージョン。
-% \changes{v1.3n}{2004/08/10}{和文エンコーディングの切り替えを有効化}
-% \begin{macrocode}
-\def\@changed at kcmd#1#2{%
- \ifx\protect\@typeset at protect
- \@inmathwarn#1%
- \expandafter\ifx\csname\ck at 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 at encoding \string#1\expandafter\endcsname
- \csname ?\string#1\endcsname
- \fi
- \csname\ck at encoding\string#1%
- \expandafter\endcsname
- \else
- \noexpand#1%
- \fi}
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@notkfam}
-% \begin{macro}{\@notffam}
-% |\fontfamily|コマンド内で使用するフラグです。
-% |@notkfam|フラグは和文ファミリでなかったことを、
-% |@notffam|フラグは欧文ファミリでなかったことを示します。
-%
-% \changes{v1.2}{1995/11/21}{\cs{fontfamily}コマンド用のフラグ追加}
-% \begin{macrocode}
-\newif\if at notkfam
-\newif\if at notffam
-% \end{macrocode}
-% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}コマンド内部フラグ変更}
-% \begin{macrocode}
-\newif\if at tempswz
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-%
-% \begin{macro}{\romanfamily}
-% \begin{macro}{\kanjifamily}
-% \begin{macro}{\fontfamily}
-% 書体のファミリを指定するコマンドです。
-%
-% |\kanjifamily|と|\romanfamily|は与えられた引数が、
-% 和文あるいは欧文のファミリとして正しいかのチェックは行なっていません。
-% そのため、高速に動作をしますが、|\kanjifamily|に欧文ファミリを指定したり、
-% 逆に|\romanfamily|に和文ファミリを指定した場合は、エラーとなり、
-% 代用フォントかエラーフォントが使われます。
-% \begin{macrocode}
-\DeclareRobustCommand\romanfamily[1]{\edef\f at family{#1}}
-\DeclareRobustCommand\kanjifamily[1]{\edef\k at family{#1}}
-% \end{macrocode}
-%
-% |\fontfamily|は、指定された値によって、和文ファミリか欧文ファミリ、
-% \emph{あるいは両方}のファミリを切り替えます。
-% 和欧文ともに無効なファミリ名が指定された場合は、和欧文ともに代替書体が
-% 使用されます。
-%
-% 引数が|\rmfamily|のような名前で与えられる可能性があるため、
-% まず、これを展開したものを作ります。
-%
-% また、和文ファミリと欧文ファミリのそれぞれになかったことを示すフラグを
-% 偽にセットします。
-%
-% \changes{v1.2}{1995/11/21}{代用フォントが使われないバグを修正}
-% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}コマンド内部フラグ変更}
-% \changes{v1.3o}{2005/01/04}{\cs{fontfamily}中のフラグ修正}
-% \begin{macrocode}
-\DeclareRobustCommand\fontfamily[1]{%
- \edef\tmp at item{{#1}}%
- \@notkfamfalse
- \@notffamfalse
-% \end{macrocode}
-% 次に、この引数が|\kfam at list|に登録されているかどうかを調べます。
-% 登録されていれば、|\k at family|にその値を入れます。
-% \begin{macrocode}
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kfam at list}%
- \ifin@ \edef\k at family{#1}%
-% \end{macrocode}
-% そうでないときは、|\notkfam at list|に登録されているかどうかを調べます。
-% 登録されていれば、この引数は和文ファミリではありませんので、
-% |\@notkfam|フラグを真にして、欧文ファミリのルーチンに移ります。
-%
-% このとき、|\efam at list|を調べるのではないことに注意をしてください。
-% |\efam at list|を調べ、これにないファミリを和文ファミリであるとすると、
-% たとえば、欧文ナールファミリが定義されているけれども、和文ナールファミリ
-% が未定義の場合、|\fontfamily{nar}|という指定は、|nar|が|\efam at list|にだけ、
-% 登録されているため、和文書体をナールにすることができません。
-%
-% 逆に、|\kfam at list|に登録されていないからといって、|\k at family|に|nar|を設定
-% すると、|cmr|のようなファミリも|\k at family|に設定される可能性があります。
-% したがって、「欧文でない」を明示的に示す|\notkfam at list|を見る必要があります。
-% \begin{macrocode}
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\notkfam at list}%
- \ifin@ \@notkfamtrue
-% \end{macrocode}
-% |\notkfam at list|に登録されていない場合は、
-% フォント定義ファイルが存在するかどうかを調べます。
-% ファイルが存在する場合は、|\k at family|を変更します。
-% ファイルが存在しない場合は、|\notkfam at list|に登録します。
-%
-% |\kenc at list|に登録されているエンコードと、指定された和文ファミリの
-% 組合せのフォント定義ファイルが存在する場合は、|\k at family|に指定された
-% 値を入れます。
-% \changes{v1.3c}{1997/04/24}%
-% {フォント定義ファイル名を小文字に変換してから探すようにした。}
-% \changes{v1.3e}{1997/07/10}{fdファイル名の小文字化が効いていなかったのを
-% 修正。ありがとう、大岩さん}
-% \begin{macrocode}
- \else
- \@tempswzfalse
- \def\fam at elt{\noexpand\fam at elt}%
- \message{(I search kanjifont definition file:}%
- \def\enc at elt<##1>{\message{.}%
- \edef\reserved at a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}%
- \reserved at a{\@tempswztrue}{}\relax}%
- \kenc at list
- \message{)}%
- \if at tempswz
- \edef\k at family{#1}%
-% \end{macrocode}
-% つぎの部分が実行されるのは、和文ファミリとして認識できなかった場合です。
-% この場合は、|\@notkfam|フラグを真にして、|\notkfam at list|に登録します。
-% \changes{v1.1b}{1995/05/10}{\cs{notkfam at list}に、
-% エンコードごとに登録されてしまうのを修正した。欧文についても同様。}
-% \begin{macrocode}
- \else
- \@notkfamtrue
- \xdef\notkfam at list{\notkfam at list\fam at elt<#1>}%
- \fi
-% \end{macrocode}
-% |\kfam at list|と|\notkfam at list|に登録されているかどうかを
-% 調べた|\ifin@|を閉じます。
-% \begin{macrocode}
- \fi\fi
-% \end{macrocode}
-% 欧文ファミリの場合も、和文ファミリと同様の方法で確認をします。
-% \changes{v1.3e}{1997/07/10}{fdファイル名の小文字化が効いていなかったのを修正}
-% \begin{macrocode}
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ffam at list}%
- \ifin@ \edef\f at family{#1}\else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\notffam at list}%
- \ifin@ \@notffamtrue \else
- \@tempswzfalse
- \def\fam at elt{\noexpand\fam at elt}%
- \message{(I search font definition file:}%
- \def\enc at elt<##1>{\message{.}%
- \edef\reserved at a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}%
- \reserved at a{\@tempswztrue}{}\relax}%
- \fenc at list
- \message{)}%
- \if at tempswz
- \edef\f at family{#1}%
- \else
- \@notffamtrue
- \xdef\notffam at list{\notffam at list\fam at elt<#1>}%
- \fi
- \fi\fi
-% \end{macrocode}
-% 最後に、指定された文字列が、和文ファミリと欧文ファミリのいずれか、
-% あるいは両方として認識されたかどうかを確認します。
-%
-% どちらとも認識されていない場合は、ファミリの指定ミスですので、
-% 代用フォントを使うために、故意に指定された文字列をファミリに
-% 入れます。
-% \begin{macrocode}
- \if at notkfam\if at notffam
- \edef\k at family{#1}\edef\f at family{#1}%
- \fi\fi}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-%
-% \begin{macro}{\romanseries}
-% \begin{macro}{\kanjiseries}
-% \begin{macro}{\fontseries}
-% 書体のシリーズを指定するコマンドです。
-% |\fontseries|コマンドは和欧文の両方に影響します。
-% \begin{macrocode}
-\DeclareRobustCommand\romanseries[1]{\edef\f at series{#1}}
-\DeclareRobustCommand\kanjiseries[1]{\edef\k at 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}
-% 書体のシェイプを指定するコマンドです。
-% |\fontshape|コマンドは和欧文の両方に影響します。
-% \begin{macrocode}
-\DeclareRobustCommand\romanshape[1]{\edef\f at shape{#1}}
-\DeclareRobustCommand\kanjishape[1]{\edef\k at 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}
-% 書体属性を一度に指定するコマンドです。
-% 和文書体には|\usekanji|を、欧文書体には|\useroman|を指定してください。
-%
-% |\usefont|コマンドは、第一引数で指定されるエンコードによって、
-% 和文または欧文フォントを切り替えます。
-% \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 at item{{#1}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kenc at 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}
-% 書体をデフォルト値にするコマンドです。
-% 和文書体もデフォルト値になるように再定義しています。
-% ただし高速化のため、|\usekanji|と|\useroman|を展開し、
-% |\selectfont|を一度しか呼び出さないようにしています。
-% \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 at font\normalfont
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \begin{macro}{\mcfamily}
-% \begin{macro}{\gtfamily}
-% 和文書体を明朝体にする|\mcfamily|とゴシック体にする|\gtfamily|を定義します。
-% これらは、|\rmfamily|などに対応します。
-% |\mathmc|と|\mathgt|は数式内で用いるときのコマンド名です。
-% \begin{macrocode}
-\DeclareRobustCommand\mcfamily
- {\not at math@alphabet\mcfamily\mathmc
- \kanjifamily\mcdefault\selectfont}
-\DeclareRobustCommand\gtfamily
- {\not at math@alphabet\gtfamily\mathgt
- \kanjifamily\gtdefault\selectfont}
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-%
-%
-% \begin{macro}{\romanprocess at table}
-% \begin{macro}{\kanjiprocess at table}
-% \begin{macro}{\process at table}
-% 文書の先頭で、和文デフォルトフォントの変更が反映されないのを修正します。
-% \changes{v1.3g}{1999/04/05}{plpatch.ltxの内容を反映。
-% ありがとう、山本さん。}
-% \begin{macrocode}
-\let\romanprocess at table\process at table
-\def\kanjiprocess at table{%
- \kanjiencoding{\kanjiencodingdefault}%
- \kanjifamily{\kanjifamilydefault}%
- \kanjiseries{\kanjiseriesdefault}%
- \kanjishape{\kanjishapedefault}%
-}
-\def\process at table{%
- \romanprocess at table
- \kanjiprocess at table
-}
-\@onlypreamble\romanprocess at table
-\@onlypreamble\kanjiprocess at table
-% \end{macrocode}
-% \end{macro}
-% \end{macro}
-% \end{macro}
-%
-%
-%
-% \begin{macro}{\textunderscore}
-% \changes{v1.1b}{1995/04/12}{下線マクロを追加}
-% このコマンドはテキストモードで指定された|\_|の内部コマンドです。
-% 縦組での位置を調整するように再定義をします。
-% もとは\file{ltoutenc.dtx}で定義されています。
-%
-% なお、|\_|を数式モードで使うと|\mathunderscore|が実行されます。
-%
-% コミュニティ版では縦数式ディレクションでベースライン補正量が
-% 変だったのを直しました。あわせて横ディレクションでもベースライン
-% 補正に追随するようにしています。
-% \changes{v1.6g}{2017/03/07}{ベースライン補正量を修正}
-% \begin{macrocode}
-%</plcore>
-%<platexrelease>\plIncludeInRelease{2017/04/08}{\textunderscore}
-%<platexrelease> {Baseline shift for \textunderscore}%
-%<*plcore|platexrelease>
-\DeclareTextCommandDefault{\textunderscore}{%
- \leavevmode\kern.06em
- \raise-\iftdir\ifmdir\ybaselineshift
- \else\tbaselineshift\fi
- \else\ybaselineshift\fi
- \vbox{\hrule\@width.3em}}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\textunderscore}
-%<platexrelease> {Baseline shift for \textunderscore}%
-%<platexrelease>\DeclareTextCommandDefault{\textunderscore}{%
-%<platexrelease> \leavevmode\kern.06em
-%<platexrelease> \iftdir\raise-\tbaselineshift\fi
-%<platexrelease> \vbox{\hrule\@width.3em}}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{合成文字}
-% \LaTeXe{}のカーネルのコードをそのまま使うと、p\TeX{}のベースライン
-% 補正量がゼロでないときに合成文字がおかしくなっていたため、対策します。
-%
-% \begin{macro}{\g at tlastchart@}
-% \TeX\ Live 2015で追加された\cs{lastnodechar}を利用して、
-% 「直前の文字」の符号位置を得るコードです。\cs{lastnodechar}が未定義の場合は
-% $-1$が返ります。
-% \changes{v1.6c}{2016/06/06}{マクロ追加}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/06/10}{\g at tlastchart@}
-%<platexrelease> {Added \g at tlastchart@}%
-%<*plcore|platexrelease>
-\def\g at tlastchart@#1{#1\ifx\lastnodechar\@undefined\m at ne\else\lastnodechar\fi}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\g at tlastchart@}
-%<platexrelease> {Added \g at tlastchart@}%
-%<platexrelease>\let\g at tlastchart@\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\pltx at isletter}
-% 第一引数のマクロ(|#1|)の置換テキストが、カテゴリコード11か12の文字トークン1文字であった
-% 場合に第二引数の内容に展開され、そうでない場合は第三引数の内容に展開されます。
-% \changes{v1.6c}{2016/06/06}{マクロ追加}
-% \changes{v1.6d}{2016/06/19}{アクセント付き文字をさらに修正(forum:1951)}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/06/10}{\pltx at isletter}
-%<platexrelease> {Added \pltx at isletter}%
-%<*plcore|platexrelease>
-\def\pltx at mark{\pltx at mark@}
-\let\pltx at scanstop\relax
-\long\def\pltx at cond#1\fi{%
- #1\expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi}
-\long\def\pltx at isletter#1{%
- \expandafter\pltx at isletter@i#1\pltx at scanstop}
-\long\def\pltx at isletter@i#1\pltx at scanstop{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi{\@firstoftwo}%
- {\pltx at isletter@ii\pltx at scanstop#1\pltx at scanstop{}#1\pltx at mark}}
-\long\def\pltx at isletter@ii#1\pltx at scanstop#{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi%
- {\pltx at isletter@iii}{\pltx at isletter@iv}}
-\long\def\pltx at isletter@iii#1\pltx at mark{\@secondoftwo}
-\long\def\pltx at isletter@iv#1#2#3\pltx at mark{%
- \pltx at cond\ifx\pltx at mark#3\pltx at mark\fi{%
- \pltx at cond{\ifnum0\ifcat A\noexpand#21\fi\ifcat=\noexpand#21\fi>\z@}\fi
- {\@firstoftwo}{\@secondoftwo}%
- }{\@secondoftwo}}
-%</plcore|platexrelease>
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\pltx at isletter}
-%<platexrelease> {Added \pltx at isletter}%
-%<platexrelease>\let\pltx at isletter\@undefined
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@text at composite}
-% 合成文字の内部命令です。v1.6aで誤って\LaTeX{}の定義を上書きしてしまいました
-% が、v1.6cで外しました。
-% \changes{v1.6a}{2016/04/01}{ベースライン補正量が0でないときに
-% \cs{AA}など一部の合成文字がおかしくなることに対応するため再定義}
-% \changes{v1.6c}{2016/06/06}{v1.6aでの誤った再定義を削除(forum:1941)}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/06/10}{\@text at composite}
-%<platexrelease> {Wrong fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite#1#2#3\@text at composite{%
-%<platexrelease> \expandafter\@text at composite@x
-%<platexrelease> \csname\string#1-\string#2\endcsname}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@text at composite}
-%<platexrelease> {Wrong fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite#1#2#3#{%
-%<platexrelease> \begingroup
-%<platexrelease> \setbox\z@=\hbox\bgroup%
-%<platexrelease> \ybaselineshift\z@\tbaselineshift\z@
-%<platexrelease> \expandafter\@text at composite@x
-%<platexrelease> \csname\string#1-\string#2\endcsname}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@text at composite}
-%<platexrelease> {Wrong fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite#1#2#3\@text at composite{%
-%<platexrelease> \expandafter\@text at composite@x
-%<platexrelease> \csname\string#1-\string#2\endcsname}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-% \begin{macro}{\@text at composite@x}
-% 合成文字の内部命令です。|\g at tlastchart@|と|\pltx at isletter|を使います。
-% \changes{v1.6a}{2016/04/01}{ベースライン補正量が0でないときに
-% \cs{AA}など一部の合成文字がおかしくなることへの対応。}
-% \changes{v1.6c}{2016/06/06}{v1.6aでの修正で\'e など全てのアクセント付き文字で
-% 周囲に\cs{xkanjiskip}が入らなくなっていたのを修正。}
-% \changes{v1.6e}{2016/06/26}{v1.6a以降の修正で全てのアクセント付き文字で
-% トラブルが相次いだため、いったんパッチを除去。}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2016/07/01}{\@text at composite@x}
-%<platexrelease> {Fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite@x#1{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> \expandafter\@secondoftwo
-%<platexrelease> \else
-%<platexrelease> \expandafter\@firstoftwo
-%<platexrelease> \fi
-%<platexrelease> #1}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/06/10}{\@text at composite@x}
-%<platexrelease> {Fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite@x#1#2{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> #2%
-%<platexrelease> \else\pltx at isletter{#1}{#1}{%
-%<platexrelease> \begingroup
-%<platexrelease> \setbox\z@\hbox\bgroup%
-%<platexrelease> \ybaselineshift\z@\tbaselineshift\z@
-%<platexrelease> #1%
-%<platexrelease> \g at tlastchart@\@tempcntb
-%<platexrelease> \xdef\pltx at composite@temp{\noexpand\@tempcntb=\the\@tempcntb\relax}%
-%<platexrelease> \aftergroup\pltx at composite@temp
-%<platexrelease> \egroup
-%<platexrelease> \ifnum\@tempcntb<\z@
-%<platexrelease> \@tempdima=\iftdir
-%<platexrelease> \ifmdir
-%<platexrelease> \ifmmode\tbaselineshift\else\ybaselineshift\fi
-%<platexrelease> \else
-%<platexrelease> \tbaselineshift
-%<platexrelease> \fi
-%<platexrelease> \else
-%<platexrelease> \ybaselineshift
-%<platexrelease> \fi
-%<platexrelease> \@tempcntb=\@cclvi
-%<platexrelease> \else\@tempdima=\z@
-%<platexrelease> \fi
-%<platexrelease> \ifnum\@tempcntb<\@cclvi
-%<platexrelease> \ifnum\@tempcntb>\m at ne\ifnum\@tempcntb<\@cclvi
-%<platexrelease> \ifodd\xspcode\@tempcntb\else\leavevmode\hbox{}\fi
-%<platexrelease> \fi\fi
-%<platexrelease> \begingroup\mathsurround\z@$%
-%<platexrelease> \ifx\textbaselineshiftfactor\@undefined\else
-%<platexrelease> \textbaselineshiftfactor\z@\fi
-%<platexrelease> \box\z@
-%<platexrelease> $\endgroup%
-%<platexrelease> \ifnum\@tempcntb>\m at ne\ifnum\@tempcntb<\@cclvi
-%<platexrelease> \ifnum\xspcode\@tempcntb<2\hbox{}\fi
-%<platexrelease> \fi\fi
-%<platexrelease> \else
-%<platexrelease> \ifdim\@tempdima=\z@{\ybaselineshift\z@\tbaselineshift\z@#1}%
-%<platexrelease> \else\lower\@tempdima\box\z@\fi
-%<platexrelease> \fi
-%<platexrelease> \endgroup}%
-%<platexrelease> \fi
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{2016/04/17}{\@text at composite@x}
-%<platexrelease> {Fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite@x#1#2{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> \expandafter\@secondoftwo
-%<platexrelease> \else
-%<platexrelease> \expandafter\@firstoftwo
-%<platexrelease> \fi
-%<platexrelease> #1{#2}\egroup
-%<platexrelease> \leavevmode
-%<platexrelease> \expandafter\lower
-%<platexrelease> \iftdir
-%<platexrelease> \ifmdir
-%<platexrelease> \ifmmode\tbaselineshift\else\ybaselineshift\fi
-%<platexrelease> \else
-%<platexrelease> \tbaselineshift
-%<platexrelease> \fi
-%<platexrelease> \else
-%<platexrelease> \ybaselineshift
-%<platexrelease> \fi
-%<platexrelease> \box\z@
-%<platexrelease> \endgroup}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\@text at composite@x}
-%<platexrelease> {Fix for non-zero baselineshift}%
-%<platexrelease>\def\@text at composite@x#1{%
-%<platexrelease> \ifx#1\relax
-%<platexrelease> \expandafter\@secondoftwo
-%<platexrelease> \else
-%<platexrelease> \expandafter\@firstoftwo
-%<platexrelease> \fi
-%<platexrelease> #1}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{イタリック補正と\cs{xkanjiskip}}
-%
-% \begin{macro}{\check at nocorr@}
-% 「\verb|あ\texttt{abc}い|」としたとき、書体の変更を指定された欧文の左側に
-% 和欧文間スペースが入らないのを修正します。
-% \changes{v1.3i}{2000/07/13}{\cs{text..}コマンドの左側に\cs{xkanjiskip}が
-% 入らないのを修正（ありがとう、乙部＠東大さん）}
-%
-% コミュニティ版の修正：p\TeX{}のバージョンp3.1.11以前は、イタリック補正
-% （以下|\/|と記す）と|\xkanjiskip|の挿入が衝突\footnote{和文のイタリック
-% 補正用kernが、通常のexplicitな（\cs{kern}による）kernと同じ扱いを受けて
-% いたため。}し
-% \begin{enumerate}
-% \item 「欧文文字 → |\/|」の場合には|\/|を無視する
-% （つまり後に|\xkanjiskip|挿入可能）
-% \item 「和文文字 → |\/|」の場合にはこの後に|\xkanjiskip|は挿入できない
-% \end{enumerate}
-% という挙動になっていました。p3.2（2010年）の修正で
-% \begin{itemize}
-% \item |\xkanjiskip|挿入時にはいかなる場合も|\/|を無視する
-% \end{itemize}
-% という挙動に変更されました。p\LaTeX{}カーネルの|\check at nocorr@|の修正は、
-% p3.1.11以前の2.への対処でしたが、これは「|\text...{}|の左への|\/|挿入」を
-% 無効化しているので、|\textit{f\textup{a}}|で本来入るべきイタリック補正が
-% 入りませんでした。p3.2以降ではp\TeX{}の|\xkanjiskip|対策が不要になって
-% いますので、コミュニティ版では削除しました。
-% \changes{v1.6i}{2017/09/24}{2010年のp\TeX{}本体の修正により、v1.3iで入れた
-% 対処が不要になっていたので削除}
-% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/10/28}{\check at nocorr@}
-%<platexrelease> {Italic correction before \textt...}%
-%<platexrelease>\def \check at nocorr@ #1#2\nocorr#3\@nil {%
-%<platexrelease> \let \check at icl \maybe at ic
-%<platexrelease> \def \check at icr {\ifvmode \else \aftergroup \maybe at ic \fi}%
-%<platexrelease> \def \reserved at a {\nocorr}%
-%<platexrelease> \def \reserved at b {#1}%
-%<platexrelease> \def \reserved at c {#3}%
-%<platexrelease> \ifx \reserved at a \reserved at b
-%<platexrelease> \ifx \reserved at c \@empty
-%<platexrelease> \let \check at icl \@empty
-%<platexrelease> \else
-%<platexrelease> \let \check at icl \@empty
-%<platexrelease> \let \check at icr \@empty
-%<platexrelease> \fi
-%<platexrelease> \else
-%<platexrelease> \ifx \reserved at c \@empty
-%<platexrelease> \else
-%<platexrelease> \let \check at icr \@empty
-%<platexrelease> \fi
-%<platexrelease> \fi
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-%<platexrelease>\plIncludeInRelease{0000/00/00}{\check at nocorr@}
-%<platexrelease> {Italic correction before \textt...}%
-%<platexrelease>\def \check at nocorr@ #1#2\nocorr#3\@nil {%
-%<platexrelease> \let \check at icl \relax % changed from \maybe at ic
-%<platexrelease> \def \check at icr {\ifvmode \else \aftergroup \maybe at ic \fi}%
-%<platexrelease> \def \reserved at a {\nocorr}%
-%<platexrelease> \def \reserved at b {#1}%
-%<platexrelease> \def \reserved at c {#3}%
-%<platexrelease> \ifx \reserved at a \reserved at b
-%<platexrelease> \ifx \reserved at c \@empty
-%<platexrelease> \let \check at icl \@empty
-%<platexrelease> \else
-%<platexrelease> \let \check at icl \@empty
-%<platexrelease> \let \check at icr \@empty
-%<platexrelease> \fi
-%<platexrelease> \else
-%<platexrelease> \ifx \reserved at c \@empty
-%<platexrelease> \else
-%<platexrelease> \let \check at icr \@empty
-%<platexrelease> \fi
-%<platexrelease> \fi
-%<platexrelease>}
-%<platexrelease>\plEndIncludeInRelease
-% \end{macrocode}
-% \end{macro}
-%
-%
-% \subsection{デフォルト設定ファイルの読み込み}
-% 最後に、デフォルト設定ファイルである、\file{upldefs.ltx}を読み込みます。
-% このファイルについての詳細は、第\ref{plfonts:pldefs}節を参照してください。
-% \TeX{}の入力ファイル検索パスに設定されているディレクトリに\file{upldefs.cfg}%
-% ファイルがある場合は、そのファイルを使います。
-% \begin{macrocode}
-%<*plcore>
-\InputIfFileExists{upldefs.cfg}
- {\typeout{*************************************^^J%
- * Local config file upldefs.cfg used^^J%
- *************************************}}%
- {\input{upldefs.ltx}}
-%</plcore>
-% \end{macrocode}
-%
-%
-%
-%
% \section{デフォルト設定ファイル}\label{plfonts:pldefs}
% ここでは、フォーマットファイルに読み込まれるデフォルト値を設定しています。
-% この節での内容は\file{pldefs.ltx}に出力されます。
-% このファイルの内容を\file{plcore.ltx}に含めてもよいのですが、
+% この節での内容は\file{upldefs.ltx}に出力されます。
+% このファイルの内容を\file{uplcore.ltx}に含めてもよいのですが、
% デフォルトの設定を参照しやすいように、別ファイルにしてあります。
-% \file{pldefs.ltx}は\file{plcore.ltx}から読み込まれます。
%
% プリロードサイズは、\dst{}プログラムのオプションで変更することができます。
-% これ以外の設定を変更したい場合は、\file{pldefs.ltx}を
-% 直接、修正するのではなく、このファイルを\file{pldefs.cfg}という名前で
+% これ以外の設定を変更したい場合は、\file{upldefs.ltx}を
+% 直接、修正するのではなく、このファイルを\file{upldefs.cfg}という名前で
% コピーをして、そのファイルに対して修正を加えるようにしてください。
% \begin{macrocode}
%<*pldefs>
\ProvidesFile{upldefs.ltx}
- [2017/11/06 v1.6j-u00 upLaTeX Kernel (Default settings)]
+ [2018/02/04 v1.6l-u02 upLaTeX Kernel (Default settings)]
%</pldefs>
% \end{macrocode}
%
% \subsection{テキストフォント}
% テキストフォントのための属性やエラー書体などの宣言です。
-%
+% p\LaTeX{}のデフォルトの横組エンコードはJY1、縦組エンコードはJT1ですが、
+% up\LaTeX{}では横組エンコードはJY2、縦組エンコードはJT2とします。
% \noindent
% 縦横エンコード共通：
% \begin{macrocode}
@@ -2183,7 +216,7 @@
\input{jt2mc.fd}
\input{jt2gt.fd}
% \end{macrocode}
-% フォントを有効にする
+% フォントを有効にします。
% \begin{macrocode}
\fontencoding{JT2}\selectfont
\fontencoding{JY2}\selectfont
@@ -2246,7 +279,7 @@
% \subsection{プリロードフォント}
% あらかじめフォーマットファイルにロードされるフォントの宣言です。
% \dst{}プログラムのオプションでロードされるフォントのサイズを
-% 変更することができます。\file{uplatex.ins}では|xpt|を指定しています。
+% 変更することができます。\file{uplfmt.ins}では|xpt|を指定しています。
% \begin{macrocode}
%<*xpt>
\DeclarePreloadSizes{JY2}{mc}{m}{n}{5,7,10,12}
@@ -2282,8 +315,8 @@
% \subsection{組版パラメータ}
% 禁則パラメータや文字間へ挿入するスペースの設定などです。
% 実際の各文字への禁則パラメータおよびスペースの挿入の許可設定などは、
-% \file{kinsoku.tex}で行なっています。
-% 具体的な設定については、\file{kinsoku.dtx}を参照してください。
+% \file{ukinsoku.tex}で行なっています。
+% 具体的な設定については、\file{ukinsoku.dtx}を参照してください。
% \begin{macrocode}
\InputIfFileExists{ukinsoku.tex}%
{\message{Loading kinsoku patterns for japanese.}}
@@ -2372,7 +405,7 @@
%<JY2gt>\ProvidesFile{jy2gt.fd}
%<JT2mc>\ProvidesFile{jt2mc.fd}
%<JT2gt>\ProvidesFile{jt2gt.fd}
-%<JY2mc,JY2gt,JT2mc,JT2gt> [2011/05/07 v1.5-u00 KANJI font defines]
+%<JY2mc,JY2gt,JT2mc,JT2gt> [2018/02/04 v1.6l-u02 KANJI font defines]
% \end{macrocode}
% 横組用、縦組用ともに、
% 明朝体のシリーズ|bx|がゴシック体となるように宣言しています。
@@ -2380,8 +413,15 @@
% \changes{v1.3b}{1997/01/29}{フォント定義ファイルのサイズ指定の調整}
% \changes{v1.3b}{1997/03/11}{すべてのサイズをロード可能にした}
%
-% p\LaTeX{}では従属書体にOT1エンコーディングを用いていましたが、
+% p\LaTeX{}では従属書体にOT1エンコーディングを指定していましたが、
% up\LaTeX{}ではT1エンコーディングを用いるように変更しました。
+% また、要求サイズ（指定されたフォントサイズ）が10ptのとき、
+% 全角幅の実寸が9.62216ptとなるようにしますので、
+% 和文スケール値（$1\,\mathrm{zw} \div \textmc{要求サイズ}$）は
+% $9.62216\,\mathrm{pt}/10\,\mathrm{pt}=0.962216$です。
+% upjis系のメトリックは全角幅が10ptでデザインされているので、
+% これを0.962216倍で読込みます。
+% \changes{v1.6l}{2018/02/04}{和文スケール値を明文化}
% \begin{macrocode}
%<*JY2mc>
\DeclareKanjiFamily{JY2}{mc}{}
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2017 Japanese TeX Development Community
+% Copyright (c) 2016-2018 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -19,71 +19,40 @@
% \StopEventually{}
%
% \iffalse
-% \changes{v1.0}{1995/05/16}{p\LaTeXe\ 用に\file{ltvers.dtx}を修正}
-% \changes{v1.0a}{1995/08/30}{\LaTeX\ \texttt{!<1995/06/01!>}版用に修正}
-% \changes{v1.0b}{1996/01/31}{\LaTeX\ \texttt{!<1995/12/01!>}版用に修正}
-% \changes{v1.0c}{1997/01/11}{\LaTeX\ \texttt{!<1996/06/01!>}版用に修正}
-% \changes{v1.0d}{1997/01/23}{\LaTeX\ \texttt{!<1996/12/01!>}版用に修正}
-% \changes{v1.0e}{1997/07/02}{\LaTeX\ \texttt{!<1997/06/01!>}版用に修正}
-% \changes{v1.0f}{1998/02/17}{\LaTeX\ \texttt{!<1997/12/01!>}版用に修正}
-% \changes{v1.0g}{1998/09/01}{\LaTeX\ \texttt{!<1998/06/01!>}版用に修正}
-% \changes{v1.0h}{1999/04/05}{\LaTeX\ \texttt{!<1998/12/01!>}版用に修正}
-% \changes{v1.0i}{1999/08/09}{\LaTeX\ \texttt{!<1999/06/01!>}版用に修正}
-% \changes{v1.0j}{2000/02/29}{\LaTeX\ \texttt{!<1999/12/01!>}版用に修正}
-% \changes{v1.0k}{2000/11/03}{\LaTeX\ \texttt{!<2000/06/01!>}版用に修正}
-% \changes{v1.0l}{2001/09/04}{\LaTeX\ \texttt{!<2001/06/01!>}版用に修正}
-% \changes{v1.0m}{2004/08/10}{\LaTeX\ \texttt{!<2003/12/01!>}版対応確認}
-% \changes{v1.0n}{2005/01/04}{plfonts.dtxバグ修正}
-% \changes{v1.0o}{2006/01/04}{plfonts.dtxバグ修正}
-% \changes{v1.0p}{2006/06/27}{plfonts.dtx \LaTeX\ \texttt{!<2005/12/01!>}対応}
-% \changes{v1.0q}{2006/11/10}{plfonts.dtxバグ修正}
-% \changes{v1.0q-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。}
-% \changes{v1.0r}{2016/01/26}{plcore.dtx p\TeX\ (r28720)対応}
-% \changes{v1.0s}{2016/02/01}{\LaTeX\ \texttt{!<2015/01/01!>}のlatexreleaseに
-% 対応するためのコードを導入}
-% \changes{v1.0t}{2016/02/03}{\cs{plIncludeInRelease}と
-% \cs{plEndIncludeInRelease}を新設。}
-% \changes{v1.0u}{2016/04/17}{\LaTeX\ \texttt{!<2016/03/31!>}版対応確認}
-% \changes{v1.0u-u00}{2016/04/17}{p\LaTeX{}の変更に追随。}
-% \changes{v1.0v}{2016/05/07}{パッチファイルをロードするのをやめた。}
-% \changes{v1.0v}{2016/05/07}{起動時の文字列を最新の\LaTeX{}に合わせた。}
-% \changes{v1.0w}{2016/05/12}{起動時の文字列に入れる\LaTeX{}のバージョンを
-% 元の\LaTeX{}のバナーから引き継ぐように改良}
+% \changes{v1.0q-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。
+% (based on plvers.dtx 2006/11/10 v1.0q)}
+% \changes{v1.0u-u00}{2016/04/17}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2016/04/17 v1.0u)}
% \changes{v1.0w-u00}{2016/05/12}{起動時の文字列に入れるBabelのバージョンを
-% 元の\LaTeX{}のバナーから取得するコードを\file{uplatex.ini}から取り入れた}
+% 元の\LaTeX{}のバナーから取得するコードを\file{uplatex.ini}から取り入れた
+% (based on plvers.dtx 2016/05/12 v1.0w)}
% \changes{v1.0w-u01}{2016/05/21}{サポート外の\LaTeX~2.09互換モードが
% 使われた場合に明確なエラーを出すようにした。}
-% \changes{v1.0x}{2016/06/19}{パッチレベルを\file{plvers.dtx}で設定}
-% \changes{v1.0x-u01}{2016/06/19}{p\LaTeX{}の変更に追随。}
-% \changes{v1.0y-u01}{2016/06/29}{\file{uplatex.cfg}の読み込みを追加}
+% \changes{v1.0x-u01}{2016/06/19}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2016/06/19 v1.0x)}
+% \changes{v1.0y-u01}{2016/06/29}{\file{uplatex.cfg}の読み込みを追加
+% (based on plvers.dtx 2016/06/27 v1.0y)}
% \changes{v1.0z-u01}{2016/08/26}{\file{uplatex.cfg}の読み込みを
-% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動}
-% \changes{v1.1}{2016/09/14}{起動時のバナーを取得するコードを改良}
-% \changes{v1.1-u01}{2016/09/14}{p\LaTeX{}の変更に追随。}
-% \changes{v1.1a}{2017/02/20}{\LaTeX\ \texttt{!<2017/01/01!>}版対応確認}
-% \changes{v1.1a-u01}{2017/03/05}{p\LaTeX{}の変更に追随。}
-% \changes{v1.1b}{2017/03/19}{\cs{l at nohyphenation}の定義を保証
-% (sync with ltfinal 2017/03/09 v2.0t)}
-% \changes{v1.1b}{2017/03/19}{\cs{document at default@language}の定義を保証
-% (sync with ltfinal 2017/03/09 v2.0t)}
-% \changes{v1.1b-u01}{2017/03/19}{p\LaTeX{}の変更に追随。}
-% \changes{v1.1c}{2017/04/23}{\LaTeX\ \texttt{!<2017/04/15!>}版対応確認}
-% \changes{v1.1c-u01}{2017/05/04}{p\LaTeX{}の変更に追随。}
-% \changes{v1.1d}{2017/09/24}{パッチレベルが負の数の場合をpre-release扱いへ}
-% \changes{v1.1d-u01}{2017/09/24}{p\LaTeX{}の変更に追随。}
-% \changes{v1.1e}{2017/11/09}{\file{latexrelease}と
-% \cs{platexrelease}のエミュレート内部処理を分離}
-% \changes{v1.1f}{2017/11/11}{\LaTeX{}のバナーを保存するコードを
-% \file{platex.ltx}から\file{plcore.ltx}へ移動}
-% \changes{v1.1g}{2017/12/04}{\pLaTeX{}のバナーの定義時に
-% \cs{pfmtname}, \cs{pfmtversion}, \cs{ppatch at level}を展開しないように}
-% \changes{v1.1g-u01}{2017/12/04}{p\LaTeX{}の変更に追随。}
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on plvers.dtx 2016/08/26 v1.0z)}
+% \changes{v1.1-u01}{2016/09/14}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2016/09/14 v1.1)}
+% \changes{v1.1c-u01}{2017/05/04}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2017/04/23 v1.1c)}
+% \changes{v1.1d-u01}{2017/09/24}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2017/09/24 v1.1d)}
+% \changes{v1.1g-u01}{2017/12/04}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2017/12/04 v1.1g)}
+% \changes{v1.1g-u02}{2017/12/10}{p\LaTeX{}との統合のため、
+% up\LaTeX{}のバージョンと最小限の変更だけを定義するようにした}
+% \changes{v1.1h-u02}{2018/02/18}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2018/01/10 v1.1h)}
% \fi
%
% \iffalse
%<*driver>
% \fi
-\ProvidesFile{uplvers.dtx}[2017/12/04 v1.1g-u01 upLaTeX Kernel (Version Info)]
+\ProvidesFile{uplvers.dtx}[2018/02/18 v1.1h-u02 upLaTeX Kernel (Version Info)]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{uplvers.dtx}
@@ -100,40 +69,39 @@
% \section{up\LaTeXe{}のバージョンの設定}
% まず、このディストリビューションでのup\LaTeXe{}の日付とバージョン番号
% を定義します。
+% このバージョンのup\LaTeXe{}のフォーマット作成では、
+% p\LaTeXe{}が提供する\file{plcore.ltx}の後から
+% \file{uplcore.ltx}が読まれなければなりません。
%
-% \changes{v1.0}{1995/05/16}{p\LaTeXe\ 用に\file{ltvers.dtx}を修正}
-% \changes{v1.0a}{1995/08/30}{\LaTeX\ \texttt{!<1995/06/01!>}版用に修正}
-% \changes{v1.0b}{1996/01/31}{\LaTeX\ \texttt{!<1995/12/01!>}版用に修正}
-% \changes{v1.0c}{1997/01/11}{\LaTeX\ \texttt{!<1996/06/01!>}版用に修正}
-% \changes{v1.0d}{1997/01/23}{\LaTeX\ \texttt{!<1996/12/01!>}版用に修正}
-% \changes{v1.0e}{1997/07/02}{\LaTeX\ \texttt{!<1997/06/01!>}版用に修正}
-% \changes{v1.0f}{1998/02/17}{\LaTeX\ \texttt{!<1997/12/01!>}版用に修正}
-% \changes{v1.0g}{1998/09/01}{\LaTeX\ \texttt{!<1998/06/01!>}版用に修正}
-% \changes{v1.0h}{1999/04/05}{\LaTeX\ \texttt{!<1998/12/01!>}版用に修正}
-% \changes{v1.0i}{1999/08/09}{\LaTeX\ \texttt{!<1999/06/01!>}版用に修正}
-% \changes{v1.0j}{2000/02/29}{\LaTeX\ \texttt{!<1999/12/01!>}版用に修正}
-% \changes{v1.0k}{2000/11/03}{\LaTeX\ \texttt{!<2000/06/01!>}版用に修正}
-% \changes{v1.0l}{2001/09/04}{\LaTeX\ \texttt{!<2001/06/01!>}版用に修正}
-% \changes{v1.0m}{2004/08/10}{\LaTeX\ \texttt{!<2003/12/01!>}版対応確認}
-% \changes{v1.0s}{2016/02/01}{\LaTeX\ \texttt{!<2015/01/01!>}版用に修正}
-% \changes{v1.0u}{2016/04/17}{\LaTeX\ \texttt{!<2016/03/31!>}版対応確認}
-% \changes{v1.1a}{2017/02/20}{\LaTeX\ \texttt{!<2017/01/01!>}版対応確認}
-% \changes{v1.1c}{2017/04/23}{\LaTeX\ \texttt{!<2017/04/15!>}版対応確認}
+% \changes{v1.0q-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。
+% (based on plvers.dtx 2006/11/10 v1.0q)}
+% \changes{v1.1g-u02}{2017/12/10}{p\LaTeX{}との統合のため、
+% up\LaTeX{}のバージョンと最小限の変更だけを定義するようにした}
%
-% このバージョンのup\LaTeXe{}は、次のバージョンの\LaTeX{}\footnote{%
-% \LaTeX\ authors: Johannes Braams, David Carlisle, Alan Jeffrey,
-% Leslie Lamport, Frank Mittelbach, Chris Rowley, Rainer Sch\"opf}を
-% もとにしています。
+% まず、次のバージョンのp\LaTeX{}が利用可能なことを確認します。
% \begin{macrocode}
-%<*2ekernel>
-%\def\fmtname{LaTeX2e}
-%\edef\fmtversion
-%</2ekernel>
-%<latexrelease>\edef\latexreleaseversion
-%<platexrelease>\edef\p at known@latexreleaseversion
-%<*2ekernel|latexrelease|platexrelease>
- {2017/04/15}
-%</2ekernel|latexrelease|platexrelease>
+%<*plcore>
+\ifx\pfmtversion\@undefined
+ \errhelp{Please update your TeX installation; if not available,
+ obtain it^^Jmanually from CTAN
+ (https://www.ctan.org/pkg/uplatex) or from^^JGitHub
+ (https://github.com/texjporg/uplatex).}%
+ \errmessage{This should not happen!^^JThere should be some
+ inconsistency in your installation;^^Jtry
+ removing old `uplatex.ltx' and install the
+ latest one}\@@end
+\else
+ \ifnum\expandafter\@parse at version\pfmtversion\@nil<20180309
+ \errhelp{Please update your TeX installation; if not available,
+ obtain it^^Jmanually from CTAN
+ (https://www.ctan.org/pkg/platex) or from^^JGitHub
+ (https://github.com/texjporg/platex).}%
+ \errmessage{This version of upLaTeX2e requires pLaTeX2e 2018/03/09
+ or newer!^^JObtain a newer version of `platex',
+ otherwise upLaTeX2e setup will^^Jnever succeed}\@@end
+ \fi
+\fi
+%</plcore>
% \end{macrocode}
%
% \begin{macro}{\pfmtname}
@@ -140,71 +108,19 @@
% \begin{macro}{\pfmtversion}
% \begin{macro}{\ppatch at level}
% up\LaTeXe{}のフォーマットファイル名とバージョンです。
-% \changes{v1.0x}{2016/06/19}{パッチレベルを\file{plvers.dtx}で設定}
+% フォーマット名はp\LaTeXe{}のもの (\pfmtname) をそのまま引き継ぎ、
+% バージョンはp\LaTeXe{}のものの末尾に``u02''のようにサフィックスを付けます。
% \begin{macrocode}
%<*plcore>
-\def\pfmtname{pLaTeX2e}
-\def\pfmtversion
+%\def\pfmtname{pLaTeX2e}
+\def\uppatch at level{u02}
+\edef\pfmtversion{\pfmtversion\uppatch at level}
%</plcore>
-%<platexrelease>\edef\platexreleaseversion
-%<*plcore|platexrelease>
- {2017/10/28u01}
-%</plcore|platexrelease>
-%<*plcore>
-\def\ppatch at level{4}
-%</plcore>
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
-% \subsection{\LaTeXe{}のバージョンの取得}
-% このファイルの直前で\LaTeXe{}の\file{latex.ltx}が読み込まれているはず
-% なので、その起動時のバナーを保存します。
-%
-% 2016/05/07の実装では、\file{platex.ltx}のなかで
-%\begin{verbatim}
-% \edef\platexBANNER{\the\everyjob}
-%\end{verbatim}
-% としてバナーを保存し、この内容が
-%\begin{verbatim}
-% \typeout{LaTeX2e version}\typeout{Babel version}
-%\end{verbatim}
-% という4つのトークンから成ると仮定して、\file{plcore.ltx}のなかで
-%\begin{verbatim}
-% \def\parse@@BANNER#1#2#3#4{#2}
-%\end{verbatim}
-% のようにパースしていました。ところが、この「4つのトークンから成る」と
-% いう仮定はBabel由来の\file{hyphen.cfg}を使用した場合のみ成り立ち、
-% それ以外の特別な\file{hyphen.cfg}や\file{hyphen.ltx}を使用した場合に
-% エラーになってしまいます。
-% そこで、新たに2016/09/14の実装では、\file{platex.ltx}のなかで
-%\begin{verbatim}
-% \edef\platexBANNER{\the\everyjob\noexpand\typeout{}\relax}
-%\end{verbatim}
-% としてダミーを追加します（|\relax|はただの区切りトークンの役割）。
-% こうすると、|\platexBANNER|の内容は、Babelの\file{hyphen.cfg}のとき
-%\begin{verbatim}
-% \typeout{LaTeX2e version}\typeout{Babel version}\typeout{}\relax
-%\end{verbatim}
-% となり、それ以外のとき
-%\begin{verbatim}
-% \typeout{LaTeX2e version}\typeout{}\relax
-%\end{verbatim}
-% となるはずです。このように、少なくとも|\typeout|が2回含まれています
-% ので、\file{plcore.ltx}のなかで
-%\begin{verbatim}
-% \def\parse@@BANNER\typeout#1\typeout#2#3\relax{#1}
-%\end{verbatim}
-% とパースすることができるようになります。
-% \changes{v1.1f}{2017/11/11}{\LaTeX{}のバナーを保存するコードを
-% \file{platex.ltx}から\file{plcore.ltx}へ移動}
-% \begin{macrocode}
-%<*plcore>
-\edef\platexBANNER{\the\everyjob\noexpand\typeout{}\relax}% save LaTeX banner
-%</plcore>
-% \end{macrocode}
-%
% \subsection{\LaTeX~2.09互換モードの抑制}
%
% \begin{macro}{\documentstyle}
@@ -230,210 +146,34 @@
% \end{macrocode}
% \end{macro}
%
-% \subsection{パッチファイルのロード}
-%
-% 次の部分は、up\LaTeXe{}のパッチファイルをロードするためのコードです。
-% バグを修正するためのパッチを配布するかもしれません。
-%
-% パッチファイルをロードするコードはコメントアウトしました。
-% \changes{v1.0v}{2016/05/07}{パッチファイルをロードするのをやめた。}
-% \begin{macrocode}
-%<*plfinal>
-%\IfFileExists{uplpatch.ltx}
-% {\typeout{************************************^^J%
-% * Appliying patch file uplpatch.ltx *^^J%
-% ************************************}
-% \def\pfmtversion at topatch{unknown}
-% \input{uplpatch.ltx}
-% \ifx\pfmtversion\pfmtversion at topatch
-% \ifx\ppatch at level\@undefined
-% \typeout{^^J^^J^^J%
-% !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J%
-% !! Patch file `uplpatch.ltx' (for version <\pfmtversion at topatch>)^^J%
-% !! is not suitable for version <\pfmtversion> of upLaTeX.^^J^^J%
-% !! Please check if iniptex found an old patch file:^^J%
-% !! --- if so, rename it or delete it, and redo the^^J%
-% !! iniptex run.^^J%
-% !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J}%
-% \batchmode \@@end
-% \fi
-% \else
-% \typeout{^^J^^J^^J%
-% !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J%
-% !! Patch file `uplpatch.ltx' (for version <\pfmtversion at topatch>)^^J%
-% !! is not suitable for version <\pfmtversion> of upLaTeX.^^J%
-% !!^^J%
-% !! Please check if iniptex found an old patch file:^^J%
-% !! --- if so, rename it or delete it, and redo the^^J%
-% !! iniptex run.^^J%
-% !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J}%
-% \batchmode \@@end
-% \fi
-% \let\pfmtversion at topatch\relax
-% }{}
-% \end{macrocode}
-%
% \subsection{起動時に表示するバナー}
%
% \begin{macro}{\everyjob}
-% up\LaTeXe{}が起動されたときに表示される文字列です。
-% \LaTeXe{}のバージョンも併せて表示します。
-%
-% \changes{v1.0v}{2016/05/07}{起動時の文字列を最新の\LaTeX{}に合わせた。}
-% \changes{v1.0w}{2016/05/12}{起動時の文字列に入れる\LaTeX{}のバージョンを
-% 元の\LaTeX{}のバナーから引き継ぐように改良}
-% \changes{v1.1}{2016/09/14}{起動時のバナーを取得するコードを改良}
-% \changes{v1.1d}{2017/09/24}{パッチレベルが負の数の場合をpre-release扱いへ}
-% \changes{v1.1g}{2017/12/04}{\pLaTeX{}のバナーの定義時に
-% \cs{pfmtname}, \cs{pfmtversion}, \cs{ppatch at level}を展開しないように}
-% \begin{macrocode}
-\ifx\patch at level\@undefined % fallback if undefined in LaTeX
- \def\patch at level{0}\fi
-\ifx\ppatch at level\@undefined % fallback if undefined in upLaTeX
- \def\ppatch at level{0}\fi
-\begingroup
- \def\parse@@BANNER\typeout#1\typeout#2#3\relax{#1}
- \toks0=\expandafter\expandafter\expandafter{%
- \expandafter\parse@@BANNER\platexBANNER}
- \ifnum\ppatch at level=0
- \toks2={\pfmtname\space<\pfmtversion>\space}%
- \else\ifnum\ppatch at level>0
- \toks2={\pfmtname\space<\pfmtversion>+\ppatch at level\space}%
- \else
- \toks2={\pfmtname\space<\pfmtversion>-pre\ppatch at level\space}%
- \fi\fi
- \edef\platexBANNER{\the\toks2 (based on \the\toks0)}
- \global\everyjob\expandafter{%
- \expandafter\typeout\expandafter{\platexBANNER}}%
-\endgroup
-% \end{macrocode}
-%
-% p\LaTeX{}やup\LaTeX{}は、独自のハイフネーション・パターンを定義していません。
+% up\LaTeXe{}が起動されたときに表示される文字列は、
+% p\LaTeXe{}の中ですでに設定されています。
+% またup\LaTeX{}も独自のハイフネーション・パターンを定義していないので、
% \TeX\ Liveの標準的インストールでは、代わりに\LaTeX{}が読み込んでいる
-% Babelパッケージのものが適用されるはずですから、起動時の文字列にも
-% \file{hyphen.cfg}のバージョンを反映します（Babelパッケージの
-% \file{hyphen.cfg}でない場合は、何も表示されず空行になるはずです）。
+% Babelパッケージのものが適用されるはずです。
%
% \changes{v1.0w-u00}{2016/05/12}{起動時の文字列に入れるBabelのバージョンを
-% 元の\LaTeX{}のバナーから取得するコードを\file{uplatex.ini}から取り入れた}
-% \begin{macrocode}
-\begingroup
- \def\parse@@BANNER\typeout#1\typeout#2#3\relax{#2}
- \toks0=\expandafter\expandafter\expandafter{%
- \expandafter\parse@@BANNER\platexBANNER}
- \edef\platexBANNER{\the\everyjob \noexpand\typeout{\the\toks0}}
- \global\everyjob\expandafter{\platexBANNER}%
-\endgroup
-\let\platexBANNER=\@undefined
-%</plfinal>
-% \end{macrocode}
-% \end{macro}
+% 元の\LaTeX{}のバナーから取得するコードを\file{uplatex.ini}から取り入れた
+% (based on plvers.dtx 2016/05/12 v1.0w)}
+% \changes{v1.1-u01}{2016/09/14}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2016/09/14 v1.1)}
+% \changes{v1.1d-u01}{2017/09/24}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2017/09/24 v1.1d)}
+% \changes{v1.1g-u01}{2017/12/04}{p\LaTeX{}の変更に追随。
+% (based on plvers.dtx 2017/12/04 v1.1g)}
%
% ^^A 起動時に\file{uplatex.cfg}がある場合、それを読み込むようにする
% ^^A コードは、\file{uplcore.ltx}から\file{uplatex.ltx}へ移動しました。
-% \changes{v1.0y-u01}{2016/06/29}{\file{uplatex.cfg}の読み込みを追加}
+% \changes{v1.0y-u01}{2016/06/29}{\file{uplatex.cfg}の読み込みを追加
+% (based on plvers.dtx 2016/06/27 v1.0y)}
% \changes{v1.0z-u01}{2016/08/26}{\file{uplatex.cfg}の読み込みを
-% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動}
-%
-% \subsection{ハイフネーション関連}
-%
-% \begin{macro}{\l at nohyphenation}
-% \LaTeXe\ 2017-04-15で、|\verb|の途中でハイフネーションが起きないように
-% する修正が入りました。この修正には|\l at nohyphenation|が定義済みでなければ
-% なりませんが、通常はBabelの定義ファイルによって提供されています。
-% \LaTeXe{}は特殊な状況も想定してltfinalで対策しているようですので、
-% p\LaTeXe{}も念のためplfinalで対策します（参考：latex2e svn r1405）。
-% \changes{v1.1b}{2017/03/19}{\cs{l at nohyphenation}の定義を保証
-% (sync with ltfinal 2017/03/09 v2.0t)}
-% \begin{macrocode}
-%<*plfinal>
-\ifx\l at nohyphenation \@undefined
- \newlanguage\l at nohyphenation
-\fi
-% \end{macrocode}
+% \file{uplcore.ltx}から\file{uplatex.ltx}へ移動
+% (based on plvers.dtx 2016/08/26 v1.0z)}
% \end{macro}
%
-% \begin{macro}{\document at default@language}
-% \LaTeXe\ 2017-04-15で導入されたパラメータです。更新タイミングのずれの
-% 可能性を考慮し、p\LaTeXe{}でも準備しておきます。verbatim環境の途中で
-% 改ページが起きた場合にヘッダでハイフネーションが抑制されないように、
-% |\@outputpage|で|\language|をリセットするときに使われます
-% （参考：latex2e svn r1407）。
-% \changes{v1.1b}{2017/03/19}{\cs{document at default@language}の定義を保証
-% (sync with ltfinal 2017/03/09 v2.0t)}
-% \begin{macrocode}
-\ifx\document at default@language \@undefined
- \let\document at default@language\m at ne
-\fi
-%</plfinal>
-% \end{macrocode}
-% \end{macro}
-%
-% \subsection{latexreleaseパッケージへの対応}
-%
-% 最後に、latexreleaseパッケージへの対応です。
-% \begin{macro}{\plIncludeInRelease}
-% \changes{v1.0t}{2016/02/03}{\cs{plIncludeInRelease}と
-% \cs{plEndIncludeInRelease}を新設。}
-% \changes{v1.1e}{2017/11/09}{\file{latexrelease}と
-% \cs{platexrelease}のエミュレート内部処理を分離}
-% \begin{macrocode}
-%<*plcore|platexrelease>
-\def\plIncludeInRelease#1{\kernel at ifnextchar[%
- {\@plIncludeInRelease{#1}}
- {\@plIncludeInRelease{#1}[#1]}}
-% \end{macrocode}
-%
-% \begin{macrocode}
-\def\@plIncludeInRelease#1[#2]{\@plIncludeInRele at se{#2}}
-% \end{macrocode}
-%
-% \begin{macrocode}
-\def\@plIncludeInRele at se#1#2#3{%
- \toks@{[#1] #3}%
- \expandafter\ifx\csname\string#2+\@currname+plIIR\endcsname\relax
- \ifnum\expandafter\@parse at version#1//00\@nil
- >\expandafter\@parse at version\pfmtversion//00\@nil
- \GenericInfo{}{Skipping: \the\toks@}%
- \expandafter\expandafter\expandafter\@gobble at plIncludeInRelease
- \else
- \GenericInfo{}{Applying: \the\toks@}%
- \expandafter\let\csname\string#2+\@currname+plIIR\endcsname\@empty
- \fi
- \else
- \GenericInfo{}{Already applied: \the\toks@}%
- \expandafter\@gobble at plIncludeInRelease
- \fi
-}
-% \end{macrocode}
-%
-% \begin{macrocode}
-\long\def\@gobble at plIncludeInRelease#1\plEndIncludeInRelease{}
-\let\plEndIncludeInRelease\relax
-%</plcore|platexrelease>
-% \end{macrocode}
-% \end{macro}
-%
-% \LaTeXe{}が提供するlatexreleaseパッケージが読み込まれていて、
-% かつp\LaTeXe{}が提供するplatexreleaseパッケージが読み込まれていない
-% 場合は、警告を出します。
-% \changes{v1.0s}{2016/02/01}{latexrelease利用時に警告を出すようにした}
-% \begin{macrocode}
-%<*plfinal>
-\AtBeginDocument{%
- \@ifpackageloaded{latexrelease}{%
- \@ifpackageloaded{platexrelease}{}{%
- \@latex at warning@no at line{%
- Package latexrelease is loaded.\MessageBreak
- Some patches in pLaTeX2e core may be overwritten.\MessageBreak
- Consider using platexrelease.\MessageBreak
- See platex.pdf for detail}%
- }%
- }{}%
-}
-%</plfinal>
-% \end{macrocode}
-%
% \Finale
%
\endinput
Modified: trunk/Master/texmf-dist/tex/uplatex/base/jt2gt.fd
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/jt2gt.fd 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/jt2gt.fd 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -15,7 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{jt2gt.fd}
- [2011/05/07 v1.5-u00 KANJI font defines]
+ [2018/02/04 v1.6l-u02 KANJI font defines]
\DeclareKanjiFamily{JT2}{gt}{}
\DeclareRelationFont{JT2}{gt}{m}{}{T1}{cmr}{bx}{}
\DeclareFontShape{JT2}{gt}{m}{n}{<->s*[0.962216]upjisg-v}{}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/jt2mc.fd
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/jt2mc.fd 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/jt2mc.fd 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -15,7 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{jt2mc.fd}
- [2011/05/07 v1.5-u00 KANJI font defines]
+ [2018/02/04 v1.6l-u02 KANJI font defines]
\DeclareKanjiFamily{JT2}{mc}{}
\DeclareRelationFont{JT2}{mc}{m}{}{T1}{cmr}{m}{}
\DeclareRelationFont{JT2}{mc}{bx}{}{T1}{cmr}{bx}{}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/jy2gt.fd
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/jy2gt.fd 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/jy2gt.fd 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -15,7 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{jy2gt.fd}
- [2011/05/07 v1.5-u00 KANJI font defines]
+ [2018/02/04 v1.6l-u02 KANJI font defines]
\DeclareKanjiFamily{JY2}{gt}{}
\DeclareRelationFont{JY2}{gt}{m}{}{T1}{cmr}{bx}{}
\DeclareFontShape{JY2}{gt}{m}{n}{<->s*[0.962216]upjisg-h}{}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/jy2mc.fd
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/jy2mc.fd 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/jy2mc.fd 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -15,7 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{jy2mc.fd}
- [2011/05/07 v1.5-u00 KANJI font defines]
+ [2018/02/04 v1.6l-u02 KANJI font defines]
\DeclareKanjiFamily{JY2}{mc}{}
\DeclareRelationFont{JY2}{mc}{m}{}{T1}{cmr}{m}{}
\DeclareRelationFont{JY2}{mc}{bx}{}{T1}{cmr}{bx}{}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujarticle.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujarticle.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujarticle.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{ujarticle}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -124,6 +124,7 @@
\ExecuteOptions{a4paper,10pt,oneside,onecolumn,final}
\ProcessOptions\relax
\input{ujsize1\@ptsize.clo}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{2\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujbk10.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujbk10.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujbk10.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujbk10.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xpt{15}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujbk11.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujbk11.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujbk11.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujbk11.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xipt{15.5}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujbk12.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujbk12.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujbk12.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujbk12.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xiipt{16.5}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujbook.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujbook.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujbook.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{ujbook}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -134,6 +134,7 @@
\ExecuteOptions{a4paper,10pt,twoside,onecolumn,final,openright}
\ProcessOptions\relax
\input{ujbk1\@ptsize.clo}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{2\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujreport.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujreport.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujreport.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{ujreport}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -132,6 +132,7 @@
\ExecuteOptions{a4paper,10pt,oneside,onecolumn,final,openany}
\ProcessOptions\relax
\input{ujsize1\@ptsize.clo}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{2\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujsize10.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujsize10.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujsize10.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujsize10.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xpt{15}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujsize11.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujsize11.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujsize11.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujsize11.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xipt{15.5}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ujsize12.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ujsize12.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ujsize12.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{ujsize12.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xiipt{16.5}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -397,8 +397,8 @@
%%
%%\inhibitxspcode`¡=2
%%\inhibitxspcode`¿=2
-%%\inhibitxspcode`º=1
-%%\inhibitxspcode`ª=1
+%%\inhibitxspcode"BA=1% º
+%%\inhibitxspcode"AA=1% ª
\inhibitxspcode`™=1
%%
%% inhibitxspcode 半角片仮名
Modified: trunk/Master/texmf-dist/tex/uplatex/base/uplatex.ltx
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/uplatex.ltx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/uplatex.ltx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -23,7 +23,13 @@
*^^J%
**************************}
\makeatletter
+\input plcore.ltx
\input uplcore.ltx
+\InputIfFileExists{upldefs.cfg}
+ {\typeout{*************************************^^J%
+ * Local config file upldefs.cfg used^^J%
+ *************************************}}%
+ {\input{upldefs.ltx}}
\the\everyjob
\everyjob\expandafter{%
\the\everyjob
Modified: trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -5,1100 +5,38 @@
%% The original source files were:
%%
%% uplvers.dtx (with options: `plcore')
-%% uplfonts.dtx (with options: `plcore')
-%% plcore.dtx (with options: `plcore')
%% uplvers.dtx (with options: `plfinal')
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
%%
%% File: uplvers.dtx
-\def\pfmtname{pLaTeX2e}
-\def\pfmtversion
- {2017/10/28u01}
-\def\ppatch at level{4}
-\edef\platexBANNER{\the\everyjob\noexpand\typeout{}\relax}% save LaTeX banner
-\def\plIncludeInRelease#1{\kernel at ifnextchar[%
- {\@plIncludeInRelease{#1}}
- {\@plIncludeInRelease{#1}[#1]}}
-\def\@plIncludeInRelease#1[#2]{\@plIncludeInRele at se{#2}}
-\def\@plIncludeInRele at se#1#2#3{%
- \toks@{[#1] #3}%
- \expandafter\ifx\csname\string#2+\@currname+plIIR\endcsname\relax
- \ifnum\expandafter\@parse at version#1//00\@nil
- >\expandafter\@parse at version\pfmtversion//00\@nil
- \GenericInfo{}{Skipping: \the\toks@}%
- \expandafter\expandafter\expandafter\@gobble at plIncludeInRelease
- \else
- \GenericInfo{}{Applying: \the\toks@}%
- \expandafter\let\csname\string#2+\@currname+plIIR\endcsname\@empty
- \fi
- \else
- \GenericInfo{}{Already applied: \the\toks@}%
- \expandafter\@gobble at plIncludeInRelease
- \fi
-}
-\long\def\@gobble at plIncludeInRelease#1\plEndIncludeInRelease{}
-\let\plEndIncludeInRelease\relax
-%% File: uplfonts.dtx
-\let\k at encoding\@empty
-\let\ck at encoding\@empty
-\let\cy at encoding\@empty
-\let\ct at encoding\@empty
-\let\k at family\@empty
-\let\k at series\@empty
-\let\k at shape\@empty
-\def\curr at kfontshape{\k at encoding/\k at family/\k at series/\k at shape}
-\def\rel at fontshape{\f at encoding/\f at family/\f at series/\f at shape}
-\newdimen\Cht
-\newdimen\cht
-\newdimen\Cdp
-\newdimen\cdp
-\newdimen\Cwd
-\newdimen\cwd
-\newdimen\Cvs
-\newdimen\cvs
-\newdimen\Chs
-\newdimen\chs
-\newdimen\cHT
-\let\afont\font
-\def\inlist@#1#2{%
- \def\in@@##1<#1>##2##3\in@@{%
- \ifx\in@##2\in at false\else\in at true\fi}%
- \in@@#2<#1>\in@\in@@}
-\def\fam at elt{\noexpand\fam at elt}
-\def\enc at elt{\noexpand\enc at elt}
-\def\fenc at list{\enc at elt<OML>\enc at elt<T1>\enc at elt<OT1>\enc at elt<OMS>%
- \enc at elt<OMX>\enc at elt<TS1>\enc at elt<U>}
-\let\kenc at list\@empty
-\let\kyenc at list\@empty
-\let\ktenc at list\@empty
-\def\kfam at list{\fam at elt<mc>\fam at elt<gt>}
-\def\ffam at list{\fam at elt<cmr>\fam at elt<cmss>\fam at elt<cmtt>%
- \fam at elt<cmm>\fam at elt<cmsy>\fam at elt<cmex>}
-\let\notkfam at list\ffam at list
-\let\notffam at list\kfam at list
-\newbox\tstrutbox
-\newbox\zstrutbox
-\newbox\ystrutbox
-\def\strutbox{\iftdir\tstrutbox\else\ystrutbox\fi}
-\def\strut{\relax
- \ifydir
- \ifmmode\copy\ystrutbox\else\unhcopy\ystrutbox\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}}
-\def\ystrut{\relax\hbox{\yoko
- \ifmmode\copy\ystrutbox\else\unhcopy\ystrutbox\fi}}
-\def\DeclareFontEncoding{%
- \begingroup
- \nfss at catcodes
- \expandafter\endgroup
- \DeclareFontEncoding@}
-\def\DeclareFontEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at family}{\default at series}%
- {\default at shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at cmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\fenc at list{\fenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at M#3}%
- \xdef\LastDeclaredEncoding{#1}%
- }
-\def\DeclareKanjiEncoding#1{%
- \@latex at 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 at catcodes
- \expandafter\endgroup
- \DeclareYokoKanjiEncoding@}
-\def\DeclareYokoKanjiEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at k@family}{\default at k@series}%
- {\default at k@shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at kcmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\kyenc at list{\kyenc at list\enc at elt<#1>}%
- \xdef\kenc at list{\kenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring KANJI (yoko) font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at KM#3}%
- }
-\def\DeclareTateKanjiEncoding{%
- \begingroup
- \nfss at catcodes
- \expandafter\endgroup
- \DeclareTateKanjiEncoding@}
-\def\DeclareTateKanjiEncoding@#1#2#3{%
- \expandafter
- \ifx\csname T@#1\endcsname\relax
- \def\cdp at elt{\noexpand\cdp at elt}%
- \xdef\cdp at list{\cdp at list\cdp at elt{#1}%
- {\default at k@family}{\default at k@series}%
- {\default at k@shape}}%
- \expandafter\let\csname#1-cmd\endcsname\@changed at kcmd
- \def\enc at elt{\noexpand\enc at elt}%
- \xdef\ktenc at list{\ktenc at list\enc at elt<#1>}%
- \xdef\kenc at list{\kenc at list\enc at elt<#1>}%
- \else
- \@font at info{Redeclaring KANJI (tate) font encoding #1}%
- \fi
- \global\@namedef{T@#1}{#2}%
- \global\@namedef{M@#1}{\default at KM#3}%
- }
-\@onlypreamble\DeclareKanjiEncoding
-\@onlypreamble\DeclareYokoKanjiEncoding
-\@onlypreamble\DeclareYokoKanjiEncoding@
-\@onlypreamble\DeclareTateKanjiEncoding
-\@onlypreamble\DeclareTateKanjiEncoding@
-\def\DeclareKanjiEncodingDefaults#1#2{%
- \ifx\relax#1\else
- \ifx\default at KT\@empty\else
- \@font at info{Overwriting KANJI encoding scheme text defaults}%
- \fi
- \gdef\default at KT{#1}%
- \fi
- \ifx\relax#2\else
- \ifx\default at KM\@empty\else
- \@font at info{Overwriting KANJI encoding scheme math defaults}%
- \fi
- \gdef\default at KM{#2}%
- \fi}
-\let\default at KT\@empty
-\let\default at KM\@empty
-\@onlypreamble\DeclareKanjiEncodingDefaults
-\def\KanjiEncodingPair#1#2{\@namedef{t at enc@#1}{#2}\@namedef{y at enc@#2}{#1}}
-\def\DeclareFontFamily#1#2#3{%
- \@ifundefined{T@#1}%
- {\@latex at error{Encoding scheme `#1' unknown}\@eha}%
- {\edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ffam at list}%
- \ifin@ \else
- \def\fam at elt{\noexpand\fam at elt}%
- \xdef\ffam at list{\ffam at list\fam at elt<#2>}%
- \fi
- \def\reserved at a{#3}%
- \global
- \expandafter\let\csname #1+#2\expandafter\endcsname
- \ifx \reserved at a\@empty
- \@empty
- \else \reserved at a
- \fi
- }%
-}
-\def\DeclareKanjiFamily#1#2#3{%
- \@ifundefined{T@#1}%
- {\@latex at error{KANJI Encoding scheme `#1' unknown}\@eha}%
- {\edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kfam at list}%
- \ifin@ \else
- \def\fam at elt{\noexpand\fam at elt}%
- \xdef\kfam at list{\kfam at list\fam at elt<#2>}%
- \fi
- \def\reserved at a{#3}%
- \global
- \expandafter\let\csname #1+#2\expandafter\endcsname
- \ifx \reserved at a\@empty
- \@empty
- \else \reserved at a
- \fi
- }%
-}
-\def\DeclareKanjiSubstitution#1#2#3#4{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{KANJI Encoding scheme `#1' unknown}\@eha
- \else
- \begingroup
- \def\reserved at a{#1}%
- \toks@{}%
- \def\cdp at elt##1##2##3##4{%
- \def\reserved at b{##1}%
- \ifx\reserved at a\reserved at b
- \addto at hook\toks@{\cdp at elt{#1}{#2}{#3}{#4}}%
- \else
- \addto at hook\toks@{\cdp at elt{##1}{##2}{##3}{##4}}%
- \fi}%
- \cdp at list
- \xdef\cdp at list{\the\toks@}%
- \endgroup
- \global\@namedef{D@#1}{\def\default at family{#2}%
- \def\default at series{#3}%
- \def\default at shape{#4}}%
- \fi}
-\def\DeclareErrorKanjiFont#1#2#3#4#5{%
- \xdef\error at kfontshape{%
- \noexpand\expandafter\noexpand\split at name\noexpand\string
- \expandafter\noexpand\csname#1/#2/#3/#4/#5\endcsname
- \noexpand\@nil}%
- \gdef\default at k@family{#2}%
- \gdef\default at k@series{#3}%
- \gdef\default at k@shape{#4}%
- \global\let\k at family\default at k@family
- \global\let\k at series\default at k@series
- \global\let\k at shape\default at k@shape
- \gdef\f at size{#5}%
- \gdef\f at baselineskip{#5pt}}
-\@onlypreamble\DeclareKanjiSubstitution
-\@onlypreamble\DeclareErrorKanjiFont
-\def\DeclareFixedFont#1#2#3#4#5#6{%
- \begingroup
- \let\afont\font
- \math at fontsfalse
- \every at math@size{}%
- \fontsize{#6}\z@
- \edef\tmp at item{{#2}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@
- \usekanji{#2}{#3}{#4}{#5}%
- \let\font\jfont
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at 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
- }
-\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 at mathalph@bet%
- {\expandafter\noexpand\csname\@tempa\space\endcsname}%
- {\expandafter\noexpand\csname\@tempb\space\endcsname}%
- }%
-}
-\@onlypreamble\reDeclareMathAlphabet
-\def\DualLang at mathalph@bet#1#2{%
- \relax\ifmmode
- \ifx\math at bgroup\bgroup% 2e normal style (\mathrm{...})
- \bgroup\let\DualLang at Mfontsw\DLMfontsw at standard
- \else
- \ifx\math at bgroup\relax% 2e two letter style (\rm->\mathrm)
- \let\DualLang at Mfontsw\DLMfontsw at oldstyle
- \else
- \ifx\math at bgroup\@empty% 2.09 oldlfont style ({\mathrm ...})
- \let\DualLang at Mfontsw\DLMfontsw at oldlfont
- \else% panic! assume 2e normal style
- \bgroup\let\DualLang at Mfontsw\DLMfontsw at standard
- \fi
- \fi
- \fi
- \else
- \let\DualLang at Mfontsw\@firstoftwo
- \fi
- \DualLang at Mfontsw{#1}{#2}%
-}
-\def\DLMfontsw at standard#1#2#3{#1{#2{#3}}\egroup}
-\def\DLMfontsw at oldstyle#1#2{#1\relax\@fontswitch\relax{#2}}
-\def\DLMfontsw at oldlfont#1#2{#1\relax#2\relax}
-\def\all at shape{all}%
-\def\DeclareRelationFont#1#2#3#4#5#6#7#8{%
- \def\rel at shape{#4}%
- \ifx\rel at 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 at shape{#4}%
- \ifx\rel at 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
-}
-\newif\if at knjcmd
-\def\userelfont{\@knjcmdtrue}
-\DeclareRobustCommand\selectfont{%
- \let\tmp at error@fontshape\error at fontshape
- \let\error at fontshape\error at kfontshape
- \edef\tmp at item{{\k at encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@
- \let\cy at encoding\k at encoding
- \edef\ct at encoding{\csname t at enc@\k at encoding\endcsname}%
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at list}%
- \ifin@
- \let\ct at encoding\k at encoding
- \edef\cy at encoding{\csname y at enc@\k at encoding\endcsname}%
- \else
- \@latex at error{KANJI Encoding scheme `\k at encoding' unknown}\@eha
- \fi
- \fi
- \let\font\tfont
- \let\k at encoding\ct at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \let\font\jfont
- \let\k at encoding\cy at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \expandafter\def\expandafter\k at encoding\tmp at item
- \kenc at update
- \let\error at fontshape\tmp at error@fontshape
- \if at knjcmd \@knjcmdfalse
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname\relax
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname\relax
- \else
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname
- \fi
- \else
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname
- \fi
- \fi
- \let\font\afont
- \xdef\font at name{\csname\curr at fontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \enc at update
- \ifx\f at linespread\baselinestretch \else
- \set at fontsize\baselinestretch\f at size\f at baselineskip
- \fi
- \size at update}
-\def\set at fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f at size{\strip at pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f at baselineskip{\the\@tempskipa}%
- \edef\f at linespread{#1}%
- \let\baselinestretch\f at linespread
- \def\size at update{%
- \baselineskip\f at baselineskip\relax
- \baselineskip\f at linespread\baselineskip
- \normalbaselineskip\baselineskip
- \adjustbaseline
- \setbox\ystrutbox\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}%
- \let\size at update\relax}}
-\newbox\adjust at box
-\newdimen\adjust at dimen
-\def\adjustbaseline{%
- \setbox\adjust at box\hbox{\char\jis"3441}%"
- \cht\ht\adjust at box
- \cdp\dp\adjust at box
- \cwd\wd\adjust at box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
- \iftdir
- \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
- \adjust at dimen\ht\adjust at box
- \advance\adjust at dimen\dp\adjust at box
- \advance\adjust at dimen-\cHT
- \divide\adjust at dimen\tw@
- \advance\adjust at dimen\cdp
- \advance\adjust at dimen-\dp\adjust at box
- \tbaselineshift\adjust at dimen
- \fi}
-\DeclareRobustCommand\romanencoding[1]{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{Encoding scheme `#1' unknown}\@eha
- \else
- \edef\f at encoding{#1}%
- \ifx\cf at encoding\f at encoding
- \let\enc at update\relax
- \else
- \let\enc at update\@@enc at update
- \fi
- \fi
-}
-\DeclareRobustCommand\kanjiencoding[1]{%
- \expandafter\ifx\csname T@#1\endcsname\relax
- \@latex at error{KANJI Encoding scheme `#1' unknown}\@eha
- \else
- \edef\k at encoding{#1}%
- \ifx\ck at encoding\k at encoding
- \let\kenc at update\relax
- \else
- \let\kenc at update\@@kenc at update
- \fi
- \fi
-}
-\DeclareRobustCommand\fontencoding[1]{%
- \edef\tmp at item{{#1}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kenc at list}%
- \ifin@ \kanjiencoding{#1}\else\romanencoding{#1}\fi}
-\def\@@kenc at update{%
- \default at KT
- \csname T@\k at encoding\endcsname
- \csname D@\k at encoding\endcsname
- \let\kenc at update\relax
- \let\ck at encoding\k at encoding
- \edef\tmp at item{{\k at encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@ \let\cy at encoding\k at encoding
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at list}%
- \ifin@ \let\ct at encoding\k at encoding
- \else
- \@latex at error{KANJI Encoding scheme `\k at encoding' unknown}\@eha
- \fi
- \fi
-}
-\let\kenc at update\relax
-\def\@changed at kcmd#1#2{%
- \ifx\protect\@typeset at protect
- \@inmathwarn#1%
- \expandafter\ifx\csname\ck at 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 at encoding \string#1\expandafter\endcsname
- \csname ?\string#1\endcsname
- \fi
- \csname\ck at encoding\string#1%
- \expandafter\endcsname
- \else
- \noexpand#1%
- \fi}
-\newif\if at notkfam
-\newif\if at notffam
-\newif\if at tempswz
-\DeclareRobustCommand\romanfamily[1]{\edef\f at family{#1}}
-\DeclareRobustCommand\kanjifamily[1]{\edef\k at family{#1}}
-\DeclareRobustCommand\fontfamily[1]{%
- \edef\tmp at item{{#1}}%
- \@notkfamfalse
- \@notffamfalse
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kfam at list}%
- \ifin@ \edef\k at family{#1}%
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\notkfam at list}%
- \ifin@ \@notkfamtrue
- \else
- \@tempswzfalse
- \def\fam at elt{\noexpand\fam at elt}%
- \message{(I search kanjifont definition file:}%
- \def\enc at elt<##1>{\message{.}%
- \edef\reserved at a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}%
- \reserved at a{\@tempswztrue}{}\relax}%
- \kenc at list
- \message{)}%
- \if at tempswz
- \edef\k at family{#1}%
- \else
- \@notkfamtrue
- \xdef\notkfam at list{\notkfam at list\fam at elt<#1>}%
- \fi
- \fi\fi
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ffam at list}%
- \ifin@ \edef\f at family{#1}\else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\notffam at list}%
- \ifin@ \@notffamtrue \else
- \@tempswzfalse
- \def\fam at elt{\noexpand\fam at elt}%
- \message{(I search font definition file:}%
- \def\enc at elt<##1>{\message{.}%
- \edef\reserved at a{\lowercase{\noexpand\IfFileExists{##1#1.fd}}}%
- \reserved at a{\@tempswztrue}{}\relax}%
- \fenc at list
- \message{)}%
- \if at tempswz
- \edef\f at family{#1}%
- \else
- \@notffamtrue
- \xdef\notffam at list{\notffam at list\fam at elt<#1>}%
- \fi
- \fi\fi
- \if at notkfam\if at notffam
- \edef\k at family{#1}\edef\f at family{#1}%
- \fi\fi}
-\DeclareRobustCommand\romanseries[1]{\edef\f at series{#1}}
-\DeclareRobustCommand\kanjiseries[1]{\edef\k at series{#1}}
-\DeclareRobustCommand\fontseries[1]{\kanjiseries{#1}\romanseries{#1}}
-\DeclareRobustCommand\romanshape[1]{\edef\f at shape{#1}}
-\DeclareRobustCommand\kanjishape[1]{\edef\k at shape{#1}}
-\DeclareRobustCommand\fontshape[1]{\kanjishape{#1}\romanshape{#1}}
-\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 at item{{#1}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kenc at list}%
- \ifin@ \usekanji{#1}{#2}{#3}{#4}%
- \else\useroman{#1}{#2}{#3}{#4}%
- \fi}
-\DeclareRobustCommand\normalfont{%
- \kanjiencoding{\kanjiencodingdefault}%
- \kanjifamily{\kanjifamilydefault}%
- \kanjiseries{\kanjiseriesdefault}%
- \kanjishape{\kanjishapedefault}%
- \romanencoding{\encodingdefault}%
- \romanfamily{\familydefault}%
- \romanseries{\seriesdefault}%
- \romanshape{\shapedefault}%
- \selectfont\ignorespaces}
-\adjustbaseline
-\let\reset at font\normalfont
-\DeclareRobustCommand\mcfamily
- {\not at math@alphabet\mcfamily\mathmc
- \kanjifamily\mcdefault\selectfont}
-\DeclareRobustCommand\gtfamily
- {\not at math@alphabet\gtfamily\mathgt
- \kanjifamily\gtdefault\selectfont}
-\let\romanprocess at table\process at table
-\def\kanjiprocess at table{%
- \kanjiencoding{\kanjiencodingdefault}%
- \kanjifamily{\kanjifamilydefault}%
- \kanjiseries{\kanjiseriesdefault}%
- \kanjishape{\kanjishapedefault}%
-}
-\def\process at table{%
- \romanprocess at table
- \kanjiprocess at table
-}
-\@onlypreamble\romanprocess at table
-\@onlypreamble\kanjiprocess at table
-\DeclareTextCommandDefault{\textunderscore}{%
- \leavevmode\kern.06em
- \raise-\iftdir\ifmdir\ybaselineshift
- \else\tbaselineshift\fi
- \else\ybaselineshift\fi
- \vbox{\hrule\@width.3em}}
-\def\g at tlastchart@#1{#1\ifx\lastnodechar\@undefined\m at ne\else\lastnodechar\fi}
-\def\pltx at mark{\pltx at mark@}
-\let\pltx at scanstop\relax
-\long\def\pltx at cond#1\fi{%
- #1\expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi}
-\long\def\pltx at isletter#1{%
- \expandafter\pltx at isletter@i#1\pltx at scanstop}
-\long\def\pltx at isletter@i#1\pltx at scanstop{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi{\@firstoftwo}%
- {\pltx at isletter@ii\pltx at scanstop#1\pltx at scanstop{}#1\pltx at mark}}
-\long\def\pltx at isletter@ii#1\pltx at scanstop#{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi%
- {\pltx at isletter@iii}{\pltx at isletter@iv}}
-\long\def\pltx at isletter@iii#1\pltx at mark{\@secondoftwo}
-\long\def\pltx at isletter@iv#1#2#3\pltx at mark{%
- \pltx at cond\ifx\pltx at mark#3\pltx at mark\fi{%
- \pltx at cond{\ifnum0\ifcat A\noexpand#21\fi\ifcat=\noexpand#21\fi>\z@}\fi
- {\@firstoftwo}{\@secondoftwo}%
- }{\@secondoftwo}}
-\InputIfFileExists{upldefs.cfg}
- {\typeout{*************************************^^J%
- * Local config file upldefs.cfg used^^J%
- *************************************}}%
- {\input{upldefs.ltx}}
-%% File: plcore.dtx
-\def\NeedsTeXFormat#1{%
- \def\reserved at a{#1}%
- \ifx\reserved at a\pfmtname
- \expandafter\@needsPformat
- \else
- \ifx\reserved at a\fmtname
- \expandafter\expandafter\expandafter\@needsformat
- \else
- \@latex at error{This file needs format `\reserved at a'%
- \MessageBreak but this is `\pfmtname'}{%
- The current input file will not be processed
- further,\MessageBreak
- because it was written for some other flavor of
- TeX.\MessageBreak\@ehd}%
- \endinput
- \fi
- \fi}
-\def\@needsPformat{\@ifnextchar[\@needsPf at rmat{}}
-\def\@needsPf at rmat[#1]{%
- \@ifl at t@r\pfmtversion{#1}{}%
- {\@latex at warning@no at line
- {You have requested release `#1' of pLaTeX,\MessageBreak
- but only release `\pfmtversion' is available}}}
-\@onlypreamble\@needsPformat
-\@onlypreamble\@needsPf at rmat
-\def\documentstyle{%
- \makeatletter\input{pl209.def}\makeatother
- \documentclass}
-\def\cleardoublepage{\clearpage\if at twoside
- \ifodd\c at page
- \iftdir
- \hbox{}\thispagestyle{empty}\newpage
- \if at twocolumn\hbox{}\newpage\fi
- \fi
- \else
- \ifydir
- \hbox{}\thispagestyle{empty}\newpage
- \if at twocolumn\hbox{}\newpage\fi
- \fi
- \fi\fi}
-\def\@gnewline #1{%
- \ifvmode
- \@nolnerr
- \else
- \unskip \reserved at e {\reserved at f#1}\nobreak \hfil \break \null
- \ignorespaces
- \fi}
-\gdef\@makecol{%
- \setbox\@outputbox\box\@cclv%
- \let\@elt\relax % added on LaTeX (ltoutput.dtx 2003/12/16 v1.2k)
- \xdef\@freelist{\@freelist\@midlist}%
- \global \let \@midlist \@empty
- \@combinefloats
- \let\pltx at textbottom\@textbottom % save (pLaTeX 2017/02/25)
- \ifvoid\footins\else % changed (pLaTeX 2017/02/25)
- \setbox\@outputbox \vbox {%
- \boxmaxdepth \@maxdepth
- \unvbox \@outputbox
- \@textbottom % inserted here (pLaTeX 2017/02/25)
- \vskip \skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- }%
- \let\@textbottom\relax % disable temporarily (pLaTeX 2017/02/25)
- \fi
- \ifvbox\@kludgeins
- \@makespecialcolbox
- \else
- \setbox\@outputbox \vbox to\@colht {%
- \@texttop
- \dimen@ \dp\@outputbox
- \unvbox \@outputbox
- \iftdir\vbox{\hskip\z@}\fi
- \vskip -\dimen@
- \@textbottom
- }%
- \fi
- \let\@textbottom\pltx at textbottom % restore (pLaTeX 2017/02/25)
- \global \maxdepth \@maxdepth
-}
-\gdef\@makespecialcolbox{%
- \setbox\@outputbox \vbox {%
- \@texttop
- \dimen@ \dp\@outputbox
- \unvbox\@outputbox
- \vskip-\dimen@
- }%
- \@tempdima \@colht
- \ifdim \wd\@kludgeins>\z@
- \advance \@tempdima -\ht\@outputbox
- \advance \@tempdima \pageshrink
- \setbox\@outputbox \vbox to \@colht {%
- \unvbox\@outputbox
- \vskip \@tempdima
- \@textbottom
- \ifvoid\footins\else % for pLaTeX
- \vskip\skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- \fi
- }%
- \else
- \advance \@tempdima -\ht\@kludgeins
- \setbox \@outputbox \vbox to \@colht {%
- \vbox to \@tempdima {%
- \unvbox\@outputbox
- \@textbottom
- \ifvoid\footins\else % for pLaTeX
- \vskip\skip\footins
- \color at begingroup
- \normalcolor
- \footnoterule
- \unvbox \footins
- \color at endgroup
- \fi
- }\vss}%
- \fi
- {\setbox \@tempboxa \box \@kludgeins}%
-}
-\def\@reinserts{%
- \ifvoid\footins\else\insert\footins{%
- \iftbox\footins\tate\else\yoko\fi
- \unvbox\footins}\fi
- \ifvbox\@kludgeins\insert\@kludgeins{\unvbox\@kludgeins}\fi
-}
-\newif\iftombow \tombowfalse
-\newif\iftombowdate \tombowdatetrue
-\newdimen\@tombowwidth
-\setlength{\@tombowwidth}{.1\p@}
-\newbox\@TL\newbox\@Tl
-\newbox\@TC
-\newbox\@TR\newbox\@Tr
-\newbox\@BL\newbox\@Bl
-\newbox\@BC
-\newbox\@BR\newbox\@Br
-\newbox\@CL
-\newbox\@CR
-\font\@bannerfont=cmtt9
-\newtoks\@bannertoken
-\@bannertoken{}
-\def\maketombowbox{%
- \setbox\@TL\hbox to\z@{\yoko\hss
- \vrule width13mm height\@tombowwidth depth\z@
- \vrule height10mm width\@tombowwidth depth\z@
- \iftombowdate
- \raise4pt\hbox to\z@{\hskip5mm\@bannerfont\the\@bannertoken\hss}%
- \fi}%
- \setbox\@Tl\hbox to\z@{\yoko\hss
- \vrule width10mm height\@tombowwidth depth\z@
- \vrule height13mm width\@tombowwidth depth\z@}%
- \setbox\@TC\hbox{\yoko
- \vrule width10mm height\@tombowwidth depth\z@
- \vrule height10mm width\@tombowwidth depth\z@
- \vrule width10mm height\@tombowwidth depth\z@}%
- \setbox\@TR\hbox to\z@{\yoko
- \vrule height10mm width\@tombowwidth depth\z@
- \vrule width13mm height\@tombowwidth depth\z@\hss}%
- \setbox\@Tr\hbox to\z@{\yoko
- \vrule height13mm width\@tombowwidth depth\z@
- \vrule width10mm height\@tombowwidth depth\z@\hss}%
- \setbox\@BL\hbox to\z@{\yoko\hss
- \vrule width13mm depth\@tombowwidth height\z@
- \vrule depth10mm width\@tombowwidth height\z@}%
- \setbox\@Bl\hbox to\z@{\yoko\hss
- \vrule width10mm depth\@tombowwidth height\z@
- \vrule depth13mm width\@tombowwidth height\z@}%
- \setbox\@BC\hbox{\yoko
- \vrule width10mm depth\@tombowwidth height\z@
- \vrule depth10mm width\@tombowwidth height\z@
- \vrule width10mm depth\@tombowwidth height\z@}%
- \setbox\@BR\hbox to\z@{\yoko
- \vrule depth10mm width\@tombowwidth height\z@
- \vrule width13mm depth\@tombowwidth height\z@\hss}%
- \setbox\@Br\hbox to\z@{\yoko
- \vrule depth13mm width\@tombowwidth height\z@
- \vrule width10mm depth\@tombowwidth height\z@\hss}%
- \setbox\@CL\hbox to\z@{\yoko\hss
- \vrule width10mm height.5\@tombowwidth depth.5\@tombowwidth
- \vrule height10mm depth10mm width\@tombowwidth}%
- \setbox\@CR\hbox to\z@{\yoko
- \vrule height10mm depth10mm width\@tombowwidth
- \vrule height.5\@tombowwidth depth.5\@tombowwidth width10mm\hss}%
-}
-\def\@outputtombow{%
- \iftombow
- \vbox to\z@{\kern-13mm\relax
- \boxmaxdepth\maxdimen%% Added (Apr 1, 2016)
- \moveleft3mm\vbox to\@@paperheight{%
- \hbox to\@@paperwidth{\hskip3mm\relax
- \copy\@TL\hfill\copy\@TC\hfill\copy\@TR\hskip3mm}%
- \kern-10mm
- \hbox to\@@paperwidth{\copy\@Tl\hfill\copy\@Tr}%
- \vfill
- \hbox to\@@paperwidth{\copy\@CL\hfill\copy\@CR}%
- \vfill
- \hbox to\@@paperwidth{\copy\@Bl\hfill\copy\@Br}%
- \kern-10mm
- \hbox to\@@paperwidth{\hskip3mm\relax
- \copy\@BL\hfill\copy\@BC\hfill\copy\@BR\hskip3mm}%
- }\vss
- }%
- \fi
-}
-\newdimen\@@paperheight
-\newdimen\@@paperwidth
-\newdimen\@@topmargin
-\def\@outputpage{%
-\begingroup % the \endgroup is put in by \aftergroup
- \iftdir
- \dimen\z@\textwidth \textwidth\textheight \textheight\dimen\z@
- \fi
- \let \protect \noexpand
- \language\document at default@language
- \@resetactivechars
- \global\let\@@if at newlist\if at newlist
- \global\@newlistfalse
- \@parboxrestore
- \shipout\vbox{\yoko
- \set at typeset@protect
- \aftergroup\endgroup
- \aftergroup\set at typeset@protect
- \if at specialpage
- \global\@specialpagefalse\@nameuse{ps@\@specialstyle}%
- \fi
- \if at twoside
- \ifodd\count\z@ \let\@thehead\@oddhead \let\@thefoot\@oddfoot
- \iftdir\let\@themargin\evensidemargin
- \else\let\@themargin\oddsidemargin\fi
- \else \let\@thehead\@evenhead
- \let\@thefoot\@evenfoot
- \iftdir\let\@themargin\oddsidemargin
- \else\let\@themargin\evensidemargin\fi
- \fi\fi
- \@@topmargin\topmargin
- \iftombow
- \@@paperwidth\paperwidth \advance\@@paperwidth 6mm\relax
- \@@paperheight\paperheight \advance\@@paperheight 16mm\relax
- \advance\@@topmargin 1in\relax \advance\@themargin 1in\relax
- \fi
- \reset at font
- \normalsize
- \normalsfcodes
- \let\label\@gobble
- \let\index\@gobble
- \let\glossary\@gobble
- \baselineskip\z at skip \lineskip\z at skip \lineskiplimit\z@
- \@begindvi
- \@outputtombow
- \vskip \@@topmargin
- \moveright\@themargin\vbox{%
- \setbox\@tempboxa \vbox to\headheight{%
- \vfil
- \color at hbox
- \normalcolor
- \hb at xt@\textwidth{\@thehead}%
- \color at endbox
- }% %% 22 Feb 87
- \dp\@tempboxa \z@
- \box\@tempboxa
- \vskip \headsep
- \box\@outputbox
- \baselineskip \footskip
- \color at hbox
- \normalcolor
- \hb at xt@\textwidth{\@thefoot}%
- \color at endbox
- }%
- }%
- \global\let\if at newlist\@@if at newlist
- \global \@colht \textheight
- \stepcounter{page}%
- \let\firstmark\botmark
-}
-\def \AtBeginDvi #1{%
- \global \setbox \@begindvibox
- \vbox{\yoko \unvbox \@begindvibox #1}%
-}
-\renewcommand\@makefnmark{%
- \ifydir \hbox{}\hbox{\@textsuperscript{\normalfont\@thefnmark}}\hbox{}%
- \else\hbox{\yoko\@textsuperscript{\normalfont\@thefnmark}}\fi}
-\ifx\@undefined\pltx at foot@penalty \newcount\pltx at foot@penalty \fi
-\pltx at foot@penalty\z@
-\def\footnote{\inhibitglue
- \@ifnextchar[\@xfootnote{\stepcounter\@mpfn
- \protected at xdef\@thefnmark{\thempfn}%
- \@footnotemark\@footnotetext}}
-\def\footnotemark{\inhibitglue
- \@ifnextchar[\@xfootnotemark
- {\stepcounter{footnote}%
- \protected at xdef\@thefnmark{\thefootnote}%
- \@footnotemark}}
-\def\footnotetext{%
- \ifhmode\pltx at foot@penalty\lastpenalty\unpenalty\fi%
- \@ifnextchar [\@xfootnotenext
- {\protected at xdef\@thefnmark{\thempfn}%
- \@footnotetext}}
-\long\def\@footnotetext#1{%
- \ifydir\def\@tempa{\yoko}\else\def\@tempa{\tate}\fi
- \insert\footins{\@tempa%
- \reset at font\footnotesize
- \interlinepenalty\interfootnotelinepenalty
- \splittopskip\footnotesep
- \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
- \hsize\columnwidth \@parboxrestore
- \protected at edef\@currentlabel{%
- \csname p at footnote\endcsname\@thefnmark
- }%
- \color at begingroup
- \@makefntext{%
- \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
- \color at endgroup}\ifhmode\null\fi
- \ifnum\pltx at foot@penalty=\z@\else
- \penalty\pltx at foot@penalty
- \pltx at foot@penalty\z@
- \fi}
-\def\@footnotemark{\leavevmode
- \ifhmode\edef\@x at sf{\the\spacefactor}\nobreak\fi
- \ifydir\@makefnmark
- \else\hbox to\z@{\hskip-.25zw\raise.9zh\@makefnmark\hss}\fi
- \ifhmode\spacefactor\@x at sf\fi\relax}
-\def\@setref#1#2#3{%
- \ifx#1\relax
- \protect\G at refundefinedtrue
- \nfss at text{\reset at font\bfseries ??}%
- \@latex at warning{Reference `#3' on page \thepage \space
- undefined}%
- \else
- \expandafter#2#1\protect\@setref@{}% change \null to \protect\@setref@{}
- \fi}
-\def\@setref@{\ifhmode\spacefactor\@m\fi}
-\if at compatibility\else
-\def\verb{\relax\ifmmode\hbox\else\leavevmode\vadjust{}\fi
- \bgroup
- \verb at eol@error \let\do\@makeother \dospecials
- \verbatim at font\@noligs
- \language\l at nohyphenation
- \@ifstar\@sverb\@verb}
-\fi
-\gdef\@startline{%
- \ifnum \@nxttabmar >\@hightab
- \@badtab
- \global\@nxttabmar \@hightab
- \fi
- \global\@curtabmar \@nxttabmar
- \global\@curtab \@curtabmar
- \global\setbox\@curline \hbox {}%
- \@startfield
- \strut\inhibitglue}
-\gdef\@stopfield{\null\color at endgroup\egroup}
-\newcommand\printglossary{\@input@{\jobname.gls}}
-\newcount\hour
-\newcount\minute
-\def\@tabclassz{%
- \ifcase\@lastchclass
- \@acolampacol
- \or
- \@ampacol
- \or
- \or
- \or
- \@addamp
- \or
- \@acolampacol
- \or
- \@firstampfalse\@acol
- \fi
- \edef\@preamble{%
- \@preamble{%
- \ifcase\@chnum
- \hfil\mbox{\inhibitglue\ignorespaces\@sharp\unskip}\hfil % c
- \or
- \hskip1sp\mbox{\inhibitglue\ignorespaces\@sharp\unskip}\hfil % l
- \or
- \hfil\hskip1sp\mbox{\inhibitglue\ignorespaces\@sharp\unskip}% % r
- \fi}}}
-\def\@classv{\@addtopreamble{\@startpbox{\@nextchar}\mbox{}\inhibitglue\ignorespaces
-\@sharp\unskip\@endpbox}}
-\def\@tabular{\leavevmode \null\hbox \bgroup $\let\@acol\@tabacol
- \let\@classz\@tabclassz
- \let\@classiv\@tabclassiv \let\\\@tabularcr\@tabarray}
-\def\endtabular{\crcr\egroup\egroup $\egroup\null}
-\expandafter \let \csname endtabular*\endcsname = \endtabular
-\let\@parboxto\@empty
-\long\def\@iiiparbox#1#2[#3]#4#5{%
- \leavevmode
- \@pboxswfalse
- \setlength\@tempdima{#4}%
- \@begin at tempboxa\vbox{\hsize\@tempdima\@parboxrestore#5\@@par}%
- \ifx\relax#2\else
- \setlength\@tempdimb{#2}%
- \edef\@parboxto{to\the\@tempdimb}%
- \fi
- \if#1b\vbox
- \else\if #1t\vtop
- \else\ifmmode\vcenter
- \else\@pboxswtrue\null$\vcenter% !!!
- \fi\fi\fi
- \@parboxto{\let\hss\vss\let\unhbox\unvbox
- \csname bm@#3\endcsname}%
- \if at pboxsw \m at th$\null\fi% !!!
- \@end at tempboxa}
-\def\underline#1{%
- \relax
- \ifmmode\@@underline{#1}%
- \else \leavevmode\null$\@@underline{\hbox{#1}}\m at th$\null\relax\fi}
-\ifx\omathchar\@undefined
- \ifx\widowpenalties\@undefined
- \mathchardef\e at alloc@top=255
- \let\e at alloc@chardef\chardef
- \else
- \mathchardef\e at alloc@top=32767
- \let\e at alloc@chardef\mathchardef
- \fi
+\ifx\pfmtversion\@undefined
+ \errhelp{Please update your TeX installation; if not available,
+ obtain it^^Jmanually from CTAN
+ (https://www.ctan.org/pkg/uplatex) or from^^JGitHub
+ (https://github.com/texjporg/uplatex).}%
+ \errmessage{This should not happen!^^JThere should be some
+ inconsistency in your installation;^^Jtry
+ removing old `uplatex.ltx' and install the
+ latest one}\@@end
\else
- \ifx\enablecjktoken\@undefined % pTeX
- \omathchardef\e at alloc@top=65535
- \let\e at alloc@chardef\omathchardef
- \else % upTeX
- \chardef\e at alloc@top=65535
- \let\e at alloc@chardef\chardef
+ \ifnum\expandafter\@parse at version\pfmtversion\@nil<20180309
+ \errhelp{Please update your TeX installation; if not available,
+ obtain it^^Jmanually from CTAN
+ (https://www.ctan.org/pkg/platex) or from^^JGitHub
+ (https://github.com/texjporg/platex).}%
+ \errmessage{This version of upLaTeX2e requires pLaTeX2e 2018/03/09
+ or newer!^^JObtain a newer version of `platex',
+ otherwise upLaTeX2e setup will^^Jnever succeed}\@@end
\fi
\fi
-\ifx\omathchar\@undefined
- \chardef\e at mathgroup@top=16 % LaTeX2e kernel standard
-\else
- \mathchardef\e at mathgroup@top=256 % for e-pTeX FAM256 patched
-\fi
+\def\uppatch at level{u02}
+\edef\pfmtversion{\pfmtversion\uppatch at level}
%% File: uplvers.dtx
\def\documentstyle{%
\@latex at error{upLaTeX does NOT support LaTeX 2.09 compatibility
@@ -1110,50 +48,6 @@
New documents should use Standard LaTeX conventions, and
start\MessageBreak with the \noexpand\documentclass command.}%
\documentclass}
-\ifx\patch at level\@undefined % fallback if undefined in LaTeX
- \def\patch at level{0}\fi
-\ifx\ppatch at level\@undefined % fallback if undefined in upLaTeX
- \def\ppatch at level{0}\fi
-\begingroup
- \def\parse@@BANNER\typeout#1\typeout#2#3\relax{#1}
- \toks0=\expandafter\expandafter\expandafter{%
- \expandafter\parse@@BANNER\platexBANNER}
- \ifnum\ppatch at level=0
- \toks2={\pfmtname\space<\pfmtversion>\space}%
- \else\ifnum\ppatch at level>0
- \toks2={\pfmtname\space<\pfmtversion>+\ppatch at level\space}%
- \else
- \toks2={\pfmtname\space<\pfmtversion>-pre\ppatch at level\space}%
- \fi\fi
- \edef\platexBANNER{\the\toks2 (based on \the\toks0)}
- \global\everyjob\expandafter{%
- \expandafter\typeout\expandafter{\platexBANNER}}%
-\endgroup
-\begingroup
- \def\parse@@BANNER\typeout#1\typeout#2#3\relax{#2}
- \toks0=\expandafter\expandafter\expandafter{%
- \expandafter\parse@@BANNER\platexBANNER}
- \edef\platexBANNER{\the\everyjob \noexpand\typeout{\the\toks0}}
- \global\everyjob\expandafter{\platexBANNER}%
-\endgroup
-\let\platexBANNER=\@undefined
-\ifx\l at nohyphenation \@undefined
- \newlanguage\l at nohyphenation
-\fi
-\ifx\document at default@language \@undefined
- \let\document at default@language\m at ne
-\fi
-\AtBeginDocument{%
- \@ifpackageloaded{latexrelease}{%
- \@ifpackageloaded{platexrelease}{}{%
- \@latex at warning@no at line{%
- Package latexrelease is loaded.\MessageBreak
- Some patches in pLaTeX2e core may be overwritten.\MessageBreak
- Consider using platexrelease.\MessageBreak
- See platex.pdf for detail}%
- }%
- }{}%
-}
\endinput
%%
%% End of file `uplcore.ltx'.
Modified: trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -15,7 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{upldefs.ltx}
- [2017/11/06 v1.6j-u00 upLaTeX Kernel (Default settings)]
+ [2018/02/04 v1.6l-u02 upLaTeX Kernel (Default settings)]
\DeclareKanjiEncodingDefaults{}{}
\DeclareErrorKanjiFont{JY2}{mc}{m}{n}{10}
\DeclareYokoKanjiEncoding{JY2}{}{}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,181 +16,8 @@
%% File: uplfonts.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{uptrace}
- [2017/08/05 v1.6h-u00 Standard upLaTeX package (font tracing)]
-\RequirePackageWithOptions{tracefnt}
-\DeclareRobustCommand\selectfont{%
- \let\tmp at error@fontshape\error at fontshape
- \let\error at fontshape\error at kfontshape
- \edef\tmp at item{{\k at encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\kyenc at list}%
- \ifin@
- \let\cy at encoding\k at encoding
- \edef\ct at encoding{\csname t at enc@\k at encoding\endcsname}%
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp at item\expandafter{\ktenc at list}%
- \ifin@
- \let\ct at encoding\k at encoding
- \edef\cy at encoding{\csname y at enc@\k at encoding\endcsname}%
- \else
- \@latex at error{KANJI Encoding scheme `\k at encoding' unknown}\@eha
- \fi
- \fi
- \let\font\tfont
- \let\k at encoding\ct at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \let\font\jfont
- \let\k at encoding\cy at encoding
- \xdef\font at name{\csname\curr at kfontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \expandafter\def\expandafter\k at encoding\tmp at item
- \kenc at update
- \let\error at fontshape\tmp at error@fontshape
- \if at knjcmd \@knjcmdfalse
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname\relax
- \expandafter\ifx
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname\relax
- \else
- \csname rel@\k at encoding/\k at family/\k at series/all\endcsname
- \fi
- \else
- \csname rel@\k at encoding/\k at family/\k at series/\k at shape\endcsname
- \fi
- \fi
- \let\font\afont
- \xdef\font at name{\csname\curr at fontshape/\f at size\endcsname}%
- \pickup at font
- \font at name
- \ifnum \tracingfonts>\tw@
- \@font at info{Roman:Switching to \font at name}\fi
- \enc at update
- \ifx\f at linespread\baselinestretch \else
- \set at fontsize\baselinestretch\f at size\f at baselineskip
- \fi
- \size at update}
-\plIncludeInRelease{2017/04/08}{\set at fontsize}
- {Construct \ystrutbox}%
-\def\set at fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f at size{\strip at pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f at baselineskip{\the\@tempskipa}%
- \edef\f at linespread{#1}%
- \let\baselinestretch\f at linespread
- \def\size at update{%
- \baselineskip\f at baselineskip\relax
- \baselineskip\f at linespread\baselineskip
- \normalbaselineskip\baselineskip
- \adjustbaseline
- \setbox\ystrutbox\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}%
- \ifnum \tracingfonts>\tw@
- \ifx\f at linespread\@empty
- \let\reserved at a\@empty
- \else
- \def\reserved at a{\f at linespread x}%
- \fi
- \@font at info{Changing size to\space
- \f at size/\reserved at a \f at baselineskip}%
- \aftergroup\type at restoreinfo
- \fi
- \let\size at update\relax}}
-\plEndIncludeInRelease
-\plIncludeInRelease{0000/00/00}{\set at fontsize}
- {Construct \ystrutbox}%
-\def\set at fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f at size{\strip at pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f at baselineskip{\the\@tempskipa}%
- \edef\f at linespread{#1}%
- \let\baselinestretch\f at linespread
- \def\size at update{%
- \baselineskip\f at baselineskip\relax
- \baselineskip\f at linespread\baselineskip
- \normalbaselineskip\baselineskip
- \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}%
- \ifnum \tracingfonts>\tw@
- \ifx\f at linespread\@empty
- \let\reserved at a\@empty
- \else
- \def\reserved at a{\f at linespread x}%
- \fi
- \@font at info{Changing size to\space
- \f at size/\reserved at a \f at baselineskip}%
- \aftergroup\type at restoreinfo
- \fi
- \let\size at update\relax}}
-\plEndIncludeInRelease
-\plIncludeInRelease{2017/07/29}{\adjustbaseline}
- {Change zenkaku reference}%
-\def\adjustbaseline{%
- \setbox\adjust at box\hbox{\char\jis"3441}%"
- \cht\ht\adjust at box
- \cdp\dp\adjust at box
- \cwd\wd\adjust at box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
- \iftdir
- \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
- \adjust at dimen\ht\adjust at box
- \advance\adjust at dimen\dp\adjust at box
- \advance\adjust at dimen-\cHT
- \divide\adjust at dimen\tw@
- \advance\adjust at dimen\cdp
- \advance\adjust at dimen-\dp\adjust at box
- \tbaselineshift\adjust at dimen
- \ifnum \tracingfonts>\tw@
- \typeout{baselineshift:\the\tbaselineshift}%
- \fi
- \fi}
-\plEndIncludeInRelease
-\plIncludeInRelease{0000/00/00}{\adjustbaseline}
- {Change zenkaku reference}%
-\def\adjustbaseline{%
- \setbox\adjust at box\hbox{\char\euc"A1A1}%"
- \cht\ht\adjust at box
- \cdp\dp\adjust at box
- \cwd\wd\adjust at box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
- \iftdir
- \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
- \adjust at dimen\ht\adjust at box
- \advance\adjust at dimen\dp\adjust at box
- \advance\adjust at dimen-\cHT
- \divide\adjust at dimen\tw@
- \advance\adjust at dimen\cdp
- \advance\adjust at dimen-\dp\adjust at box
- \tbaselineshift\adjust at dimen
- \ifnum \tracingfonts>\tw@
- \typeout{baselineshift:\the\tbaselineshift}
- \fi
- \fi}
-\plEndIncludeInRelease
+ [2017/12/10 v1.6k-u02 Standard upLaTeX package (font tracing)]
+\RequirePackageWithOptions{ptrace}
\endinput
%%
%% End of file `uptrace.sty'.
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utarticle.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utarticle.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utarticle.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{utarticle}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -125,6 +125,7 @@
\ProcessOptions\relax
\input{utsize1\@ptsize.clo}
\RequirePackage{plext}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{3\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utbk10.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utbk10.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utbk10.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utbk10.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xpt{17}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utbk11.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utbk11.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utbk11.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utbk11.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xipt{17}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utbk12.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utbk12.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utbk12.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utbk12.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xiipt{18}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utbook.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utbook.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utbook.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{utbook}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -135,6 +135,7 @@
\ProcessOptions\relax
\input{utbk1\@ptsize.clo}
\RequirePackage{plext}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{3\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utreport.cls
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utreport.cls 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utreport.cls 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{utreport}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX class]
\newcounter{@paper}
\newif\if at landscape \@landscapefalse
@@ -133,6 +133,7 @@
\ProcessOptions\relax
\input{utsize1\@ptsize.clo}
\RequirePackage{plext}
+\def\Cjascale{0.962216}
\if at stysize
\setlength\columnsep{3\Cwd}
\else
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utsize10.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utsize10.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utsize10.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utsize10.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xpt{17}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utsize11.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utsize11.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utsize11.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utsize11.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xipt{17}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/utsize12.clo
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/utsize12.clo 2018-03-09 22:46:10 UTC (rev 46902)
+++ trunk/Master/texmf-dist/tex/uplatex/base/utsize12.clo 2018-03-09 22:46:27 UTC (rev 46903)
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,7 +16,7 @@
%% File: ujclasses.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{utsize12.clo}
- [2017/09/19 v1.7g-u00
+ [2018/02/04 v1.7h-u00
Standard upLaTeX file (size option)]
\renewcommand{\normalsize}{%
\@setfontsize\normalsize\@xiipt{18}%
More information about the tex-live-commits
mailing list