% \iffalse meta-comment
%% File: plext.dtx
%
%  Copyright 2001 ASCII Corporation.
%  Copyright (c) 2010 ASCII MEDIA WORKS
%  Copyright (c) 2016-2022 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.1a}{1995/03/11}{$B=DAH%^%/%m<BAu(B}
% \changes{v1.1b}{1995/04/01}{$B8_49%b!<%IItJ,$rJL%U%!%$%k$K0\F0(B}
% \changes{v1.1c}{1995/08/25}{\cs{newline}, \cs{strut}$B$N=$@5(B}
% \changes{v1.1d}{1995/11/10}{$B%*%j%8%J%k$H$N%3%^%s%IL>%P%C%F%#%s%0$r$d$a$?(B}
% \changes{v1.1d}{1995/11/21}{\cs{Rensuji}, \cs{prensuji}$B$r:n@.(B}
% \changes{v1.1e}{1995/11/21}{$B%W%j%"%s%V%k%3%^%s%I$r(B\file{plcore}$B$K0\F0(B}
% \changes{v1.1f}{1996/01/09}{$B=DAH$K0MB8$7$J$$%3%^%s%I$rJ,N%$7!"$3$N%U%!%$%k$r(B
%     $B3HD%%Q%C%1!<%8$H$7$?(B}
% \changes{v1.1g}{1996/01/12}{minipage$B4D6-$NCf$G(B\cs{parbox}$B$r2sE>%*%W%7%g%s(B
%   $BIU$-$G;HMQ$9$k$H%(%i!<$H$J$k%P%0$r=$@5(B}
% \changes{v1.1h}{1996/01/30}{$B%-%c%W%7%g%s3HD%%^%/%m$rDI2C(B}
% \changes{v1.1i}{2001/05/10}{$B=DAH$G(Bz$B$r;XDj$9$k$H%(%i!<$K$J$k$N$r=$@5!#(B
%    $B$"$j$,$H$&!"Bg@P$5$s(B}
% \changes{v1.2}{2001/09/26}{$B%?%0L>$r(Bplcore$B$+$i(Bpackage$B$KJQ99$7$?(B}
% \changes{v1.2a}{2016/08/20}{tabular$B4D6-A0$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
% \changes{v1.2a}{2016/08/20}{tabular$B4D6-8e$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
% \changes{v1.2a}{2016/08/20}{\cs{parbox}$BA08e$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
% \changes{v1.2a}{2016/08/20}{$B2#AH$G(B\texttt{<t>}$B$r;XDj$7$?>l9g$K(B
%    \cs{@arstrutbox}$B$rM>7W$K(B\cs{hbox}$B$KF~$l$F$$$?$N$r=$@5(B}
% \changes{v1.2b}{2016/11/07}{$B2#AH$GCJMn$NF,$K(B\cs{rensuji}$B$r;H$($k(B
%    $B$h$&$K(B\cs{leavevmode}$B$rDI2C$7$F=$@5(B}
% \changes{v1.2c}{2016/11/19}{Use \cs{setlength}, so that
%           calc extensions apply (sync with lttab.dtx v1.1j)}
% \changes{v1.2c}{2016/11/19}{Use \cs{@setminpage}
%                             (sync with ltboxes v1.1a)}
% \changes{v1.2c}{2016/11/19}{put \cs{global} into definition
%    of \cs{@minipagefalse} (sync with ltboxes v1.0z)}
% \changes{v1.2c}{2016/11/19}{Changed \cs{endgraf} to
%    \cs{@@par} (sync with ltboxes.dtx v1.0y)}
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
% \changes{v1.2c}{2016/11/19}{Ensure \cs{@parboxto} holds the value
%    of \cs{@tempdimb} not the register itself (pr/3867)
%    (sync with ltboxes.dtx v1.1g)}
% \changes{v1.2d}{2017/02/04}{\cs{Kanji}$B$N0z?t$@$1$G$J$/8e$KO"B3$9$k(B
%    $B?t;z$b4A?t;z$K$J$C$F$7$^$&%P%0$r=$@5(B}
% \changes{v1.2e}{2017/03/02}{Make \cs{parbox} Robust
%    (sync with ltboxes 2015/01/08 v1.1h)}
% \changes{v1.2f}{2017/03/28}{$BI=$H<~0O$H$NB7$(0LCV$r=$@5(B}
% \changes{v1.2f}{2017/03/28}{$BCJMn$NH"$H<~0O$H$NB7$(0LCV$r=$@5(B}
% \changes{v1.2g}{2017/05/04}{Make \cs{pbox} Robust}
% \changes{v1.2g}{2017/05/04}{Use \cs{setlength}, so that
%           calc extensions apply}
% \changes{v1.2h}{2017/07/21}{$BI=$H<~0O$H$NB7$(0LCV$r$5$i$K=$@5(B}
% \changes{v1.2i}{2018/09/09}{Made caption an error outside a float: latex/2815
%    (sync with ltfloat 1999/04/19 v1.1u)}
% \changes{v1.2i}{2018/09/09}{$B=D?t<0%G%#%l%/%7%g%s$NO"?t;z(B}
% \changes{v1.2i}{2018/09/09}{Moved the code associated with
%    \cs{@mkpream} into the group provided by the box,
%    for robustness (latex/2183)
%    (sync with lttab.dtx 1996/10/21 v1.1i)}
% \changes{v1.2i}{2018/09/09}{Use \cs{set@typeset@protect}
%    (sync with lttab.dtx 1996/10/21 v1.1i)}
% \changes{v1.2i}{2018/09/09}{Check for hmode to see if something
%     went wrong during parsing (pr/2884)
%    (sync with lttab.dtx 1998/11/13 v1.1m)}
% \changes{v1.2i}{2018/09/09}{$B0BA4$N$?$a!"(B\cs{DeclareLayoutCaption}$B$G(B
%    $BDj5A$9$kFbItL?Na$r(B\cs{...@layoutcaption}$B$+$i(B
%    \cs{...@layoutc@ption}$B$XJQ99(B}
% \changes{v1.2j}{2018/09/20}{Change \cs{@stabular} to \cs{p@stabular},
%           to avoid conflict with \textsf{stabular} package}
% \changes{v1.2k}{2018/10/07}{$B%-%c%W%7%g%s$N%G%U%)%k%H$NAHJ}8~$r(By$B$+$i(Bn$B$X(B
%    $BJQ99(B (forum:2506, issue~76)}
% \changes{v1.2k}{2018/10/07}{$B%-%c%W%7%g%s$NAH$_J}8~$,4pK\AH$NAH$_J}8~$H(B
%    $BD>8r$9$k>l9g$K!"?<$5$rK:$l$F$$$?%P%0=$@5(B (forum:2506, issue~76)}
% \changes{v1.2l}{2019/09/29}{Make \cs{bou} robust}
% \changes{v1.2l}{2019/09/29}{Make \cs{kasen} robust}
% \changes{v1.2m}{2020/10/07}{$B%^%/%mDI2C(B}
% \changes{v1.2m}{2020/10/07}{Use \cs{@defaultunitsset} (gh/372)
%    (sync with ltpictur.dtx 2020/08/14 v1.2a)}
% \fi
%
% \iffalse
\NeedsTeXFormat{pLaTeX2e}
%<*driver>
\ProvidesFile{plext.dtx}
%</driver>
%<package>\ProvidesPackage{plext}
   [2020/10/07 v1.2m pLaTeX package file (community edition)]
%<*driver>
\RequirePackage{plautopatch}
\documentclass[dvipdfmx,a4paper]{jltxdoc}
\usepackage{plext}
\GetFileInfo{plext.dtx}
\title{p\LaTeXe{}$B3HD%%Q%C%1!<%8(B\space\fileversion}
\author{Ken Nakano}
\date{$B:n@.F|!'(B\filedate}
\begin{document}
   \maketitle
   \tableofcontents
   \DocInput{\filename}
\end{document}
%</driver>
% \fi
%
%
% \section{$B35MW(B}\label{plext:intro}
% $B$3$N%Q%C%1!<%8$O!"0J2<$N9`L\$K4X$9$k5!G=$r3HD%$9$k$b$N$G$9!#(B
%
% \begin{itemize}
% \item $BI=AH4D6-(B
% \item $B%U%m!<%H$H%-%c%W%7%g%s$N=PNO0LCV(B
% \item $BCJMn%\%C%/%94D6-(B
% \item $B:n?^4D6-(B
% \item $BO"?t;z!"4A?t;z!"K5E@!"2<@~(B
% \item $B;2>HHV9f(B
% \end{itemize}
%
% $B$3$N%Q%C%1!<%8$O=DAHMQ%/%i%9!J(Btarticle, tbook, treport$B!K$N$H$-$K$O!"(B
% $B<+F0E*$KFI$_9~$^$l$^$9!#2#AHMQ%/%i%9!J(Bjarticle, jbook, jreport$B!K$G(B
% $B3HD%5!G=$r;H$$$?$$>l9g$O!"J8=q%U%!%$%k$N%W%j%"%s%V%k$K0J2<$N0l9T$r(B
% $B5-=R$7$F$/$@$5$$!#(B
%
%\begin{verbatim}
%     \usepackage{plext}
%\end{verbatim}
% 
% \section{$BAHJ}8~%*%W%7%g%s$K$D$$$F(B}
% $B$D$.$N4D6-$d%3%^%s%I$O!"AHJ}8~%*%W%7%g%s$,DI2C$5$l!"3HD%$5$l$F$$$^$9!#(B
%
% \begin{itemize}
% \item tabular$B4D6-!"(Barray$B4D6-(B
% \item |\layoutcaption|$B%3%^%s%I(B
% \item minipage$B4D6-!"(B|\parbox|$B%3%^%s%I!"(B|\pbox|$B%3%^%s%I(B
% \item picture$B4D6-(B
% \end{itemize}
%
% $BAHJ}8~%*%W%7%g%s$O!"%3%^%s%IL>$d4D6-$N8e$m$G(B|<|$B$H(B|>|$B$G0O$C$F!"(B
% ``y'', ``t'', ``z''$B$N$$$:$l$+$r;XDj$7$^$9!#(B
% $B$=$l$>$l$N%*%W%7%g%s$N0UL#$O$D$.$N$H$*$j$G$9!#(B
% $B%G%U%)%k%H$NAH$_J}8~$O!"2#AH$N$H$-$O(B``y''$B!"=DAH$N$H$-$O(B``t''$B$G$9!#(B
%
% \medskip
% \DeleteShortVerb{\|}
% \begin{center}
% \begin{tabular}{c|l}
% \emph{$B%*%W%7%g%s(B} & \emph{$B0UL#(B}\\\hline
% \texttt{y}& $B2#AH$G=PNO!J2#AH%b!<%I$G$O2?$b$7$J$$!K(B\\
% \texttt{t}& $B=DAH$G=PNO!J=DAH%b!<%I$G$O2?$b$7$J$$!K(B\\
% \texttt{z}& 90$BEY2sE>$7$F=PNO!J2#AH%b!<%I$G$O2?$b$7$J$$!K(B\\
% \end{tabular}
% \end{center}
% \MakeShortVerb{\|}
%
% $BAHJ}8~%*%W%7%g%s$rMQ$$$?%5%s%W%k$r?^(B\ref{fig:diroption}$B$K<($7$^$9!#(B
% $B:8$+$i!"(B``y'', ``t'', ``z''$B%*%W%7%g%s$r;XDj$7$F$"$j$^$9!#(B
%
% \begin{figure}[htb]
% \begin{small}
% \begin{tsample}{10zw}
% \vfil
%  \parbox<z>{10zw}{$B$?$H$($P!"$3$l$O$$$C$?$$2?!"$$$C$?$$$I$&$7$F!"(B
%   $B$J$I$H;W$($k$h$&$J$3$H$,@$$NCf$K$O$?$/$5$s$"$j$^$9!*(B}\par
% \vfil
%  \parbox<t>{10zw}{$B$?$H$($P!"$3$l$O$$$C$?$$2?!"$$$C$?$$$I$&$7$F!"(B
%   $B$J$I$H;W$($k$h$&$J$3$H$,@$$NCf$K$O$?$/$5$s$"$j$^$9!)(B}\par
% \vfil
%  \parbox<y>{10zw}{$B$?$H$($P!"$3$l$O$$$C$?$$2?!"$$$C$?$$$I$&$7$F!"(B
%   $B$J$I$H;W$($k$h$&$J$3$H$,@$$NCf$K$O$?$/$5$s$"$j$^$9!#(B}
% \vfil
% \end{tsample}
% \end{small}
% \caption{$BAHJ}8~%*%W%7%g%s$N;HMQNc(B\label{fig:diroption}}
% \end{figure}
%
%
% \section{$B%3!<%I(B}
%
% \begin{macro}{\if@rotsw}
% $B$3$N%9%$%C%A$O!"=DAH%b!<%I$G(B90$BEY2sE>$5$;$k$+$I$&$+$r<($9$N$K;H$$$^$9!#(B
%    \begin{macrocode}
%<*package>
\newif\if@rotsw
%    \end{macrocode}
% \end{macro}
%
%
% \subsection{$BI=AH4D6-(B}
% tabular$B4D6-$H(Barray$B4D6-$O!"AHJ}8~$r;XDj$9$k%*%W%7%g%s$rDI2C$7$^$7$?!#(B
% $B$3$l$i$N%3%^%s%I$O!"(B\file{lttab.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
%
% \begin{macro}{\array}
% \begin{macro}{\tabular}
% \begin{macro}{\tabular*}
% array$B4D6-$H(Btabular$B4D6-$r3+;O$9$k%3%^%s%I$G$9!#(B
% tabular$B4D6-$K$O%"%9%?%j%9%/7A<0$,$"$j$^$9!#(B
%    \begin{macrocode}
\def\array{\let\@acol\@arrayacol \let\@classz\@arrayclassz
  \let\@classiv\@arrayclassiv
  \let\\\@arraycr\let\@halignto\@empty\X@tabarray}
%
\def\tabular{\let\@halignto\@empty\X@tabular}
\@namedef{tabular*}{\@ifnextchar<%>
   {\p@stabular}{\p@stabular<Z>}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\X@tabarray}
% \begin{macro}{\X@tabular}
% $BAHJ}8~%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.1c}{1995/08/11}{\cs{tabarray}$B$N%?%$%W%_%9=$@5(B}
% \changes{v1.1d}{1995/11/10}{\cs{@tabarray} to \cs{p@tabarray}}
% \changes{v1.1d}{1995/11/10}{\cs{@tabular} to \cs{p@tabular}}
%    \begin{macrocode}
\def\X@tabarray{\@ifnextchar<%>
   {\p@tabarray}{\p@tabarray<Z>}}
\def\X@tabular{\@ifnextchar<%>
   {\p@tabular}{\p@tabular<Z>}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\p@stabular}
% \begin{macro}{\p@tabular}
% $B%"%9%?%j%9%/7A<0$N>l9g$O!"AHJ}8~%*%W%7%g%s$N8e$m$KI}$r;XDj$7$^$9!#(B
% \changes{v1.1d}{1995/11/10}{\cs{@tabular} to \cs{p@tabular}}
% \changes{v1.2a}{2016/08/20}{tabular$B4D6-A0$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
% \changes{v1.2c}{2016/11/19}{Use \cs{setlength}, so that
%           calc extensions apply (sync with lttab.dtx v1.1j)}
% \changes{v1.2j}{2018/09/20}{Change \cs{@stabular} to \cs{p@stabular},
%           to avoid conflict with \textsf{stabular} package}
%    \begin{macrocode}
\def\p@stabular<#1>#2{%
   \setlength\dimen@{#2}%
   \edef\@halignto{to\the\dimen@}\p@tabular<#1>}
\def\p@tabular<#1>{\leavevmode \null\hbox \bgroup $\let\@acol\@tabacol
   \let\@classz\@tabclassz
   \let\@classiv\@tabclassiv \let\\\@tabularcr\p@tabarray<#1>}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\p@tabarray}
% $B0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.1d}{1995/11/10}{\cs{@tabarray} to \cs{p@tabarray}}
%    \begin{macrocode}
\def\p@tabarray<#1>{\m@th\@ifnextchar[%]
   {\p@array<#1>}{\p@array<#1>[c]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\p@array}
% tabular$B4D6-$H(Barray$B4D6-$NFbIt7A<0$G$9!#(B
% \changes{v1.1c}{1995/09/11}{Add \cs{adjustbaseline}.}
% \changes{v1.1d}{1995/11/10}{\cs{@array} to \cs{p@array}}
% \changes{v1.2a}{2016/08/20}{$B2#AH$G(B\texttt{<t>}$B$r;XDj$7$?>l9g$K(B
%    \cs{@arstrutbox}$B$rM>7W$K(B\cs{hbox}$B$KF~$l$F$$$?$N$r=$@5(B}
% \changes{v1.2i}{2018/09/09}{Moved the code associated with
%    \cs{@mkpream} into the group provided by the box,
%    for robustness (latex/2183)
%    (sync with lttab.dtx 1996/10/21 v1.1i)}
%    \begin{macrocode}
\def\p@array<#1>[#2]#3{%
  \fork@array@option<#1>[#2]\@begin@alignbox
  \bgroup\box@dir\adjustbaseline
  \setbox\@arstrutbox\hbox{%
  \iftdir
    \if #1y\relax\yoko
       \vrule\@height\arraystretch\ht\strutbox
             \@depth\arraystretch\dp\strutbox \@width\z@
    \else\if #1z\relax\@rotswtrue
       \vrule\@height\arraystretch\ht\zstrutbox
             \@depth\arraystretch\dp\zstrutbox \@width\z@
    \else
       \vrule\@height\arraystretch\ht\tstrutbox
             \@depth\arraystretch\dp\tstrutbox \@width\z@
    \fi\fi
  \else
    \if #1t\relax\tate
       \vrule\@height\arraystretch\ht\tstrutbox
             \@depth\arraystretch\dp\tstrutbox \@width\z@
    \else
       \vrule\@height\arraystretch\ht\strutbox
             \@depth\arraystretch\dp\strutbox \@width\z@
    \fi
  \fi}%
  \@mkpream{#3}\edef\@preamble{\ialign \noexpand\@halignto
  \bgroup \tabskip\z@skip \@arstrut \@preamble \tabskip\z@skip \cr}%
  \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox
  \let\tabularnewline\\%
%    \end{macrocode}
% \changes{v1.2i}{2018/09/09}{Use \cs{set@typeset@protect}
%    (sync with lttab.dtx 1996/10/21 v1.1i)}
%    \begin{macrocode}
    \let\par\@empty
    \let\@sharp##%
    \set@typeset@protect
    \lineskip\z@skip\baselineskip\z@skip
%    \end{macrocode}
% \changes{v1.2i}{2018/09/09}{Check for hmode to see if something
%     went wrong during parsing (pr/2884)
%    (sync with lttab.dtx 1998/11/13 v1.1m)}
%    \begin{macrocode}
    \ifhmode \@preamerr\z@ \@@par\fi
    \@preamble}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\endarray}
% \begin{macro}{\endtabular}
% array$B4D6-$H(Btabular$B4D6-$N=*N;%3%^%s%I$G$9!#(B
% |\@end@alignbox|$B$O(B|\p@array|$B$+$i8F$S=P$5$l$k(B|\fork@array@option|$B$K$h$C$F(B
% $B@_Dj$5$l$^$9!#(B
% \changes{v1.2a}{2016/08/20}{tabular$B4D6-8e$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
%    \begin{macrocode}
\def\endarray{\crcr\egroup\egroup\@end@alignbox}
\def\endtabular{\crcr\egroup\egroup\@end@alignbox $\egroup\null}
\expandafter \let \csname endtabular*\endcsname = \endtabular
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
%
% \begin{macro}{\fork@array@option}
% array$B4D6-$H(Btabular$B4D6-$GM?$($i$l$?(B
% $BBh0l0z?t$HBhFs0z?t$NAH9g$;$NJ,4t$r9T$J$$$^$9!#(B
%
% $B%3%_%e%K%F%#HG$G$O!"%"%9%-!<HG$GIT<+A3$@$C$?I=AH!J(Barray$B4D6-$*$h$S(Btabular$B4D6-!K$H(B
% $B<~0O$NK\J8$H$NB7$(0LCV$r=$@5$7!"0J2<$N$h$&$K@_7W$7$^$7$?!#(B
% \begin{itemize}
% \item $B<~0O$NAHJ}8~$,2#AH$+$DAHJ}8~$,(B|<y>|, |<z>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$B0l9TL\$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW!J7S@~$N>l9g$OOBJ8%Y!<%9%i%$%s$N0LCV!K(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BI=AH$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$B:G=*9T$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW!J7S@~$N>l9g$OOBJ8%Y!<%9%i%$%s$N0LCV!K(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,2#AH$+$DAHJ}8~$,(B|<t>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$BI=AH$N>eC<$,<~0O$NOBJ8%Y!<%9%i%$%s$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BI=AH$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$BI=AH$N2<C<$,<~0O$NOBJ8%Y!<%9%i%$%s$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<y>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$BI=AH$N>eC<$,<~0O$NOBJ8%Y!<%9%i%$%s$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BI=AH$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$BI=AH$N2<C<$,<~0O$NOBJ8%Y!<%9%i%$%s$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<t>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$B0l9TL\$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW!J7S@~$N>l9g$OOBJ8%Y!<%9%i%$%s$N0LCV!K(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BI=AH$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$B:G=*9T$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW!J7S@~$N>l9g$OOBJ8%Y!<%9%i%$%s$N0LCV!K(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<z>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$B0l9TL\$N2$J8%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BI=AH$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$B:G=*9T$N2$J8%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
% \end{itemize}
% \end{itemize}
% \changes{v1.2f}{2017/03/28}{$BI=$H<~0O$H$NB7$(0LCV$r=$@5(B}
% \changes{v1.2h}{2017/07/21}{$BI=$H<~0O$H$NB7$(0LCV$r$5$i$K=$@5(B}
%    \begin{macrocode}
\def\fork@array@option<#1>[#2]{%
\@rotswfalse
%    \end{macrocode}
% $B=DAH%b!<%I$N$H$-!'(B
%    \begin{macrocode}
\iftdir
\if #1y\relax\let\box@dir\yoko
  \if #2t\relax
     \def\@begin@alignbox{%
         \@tempdima=\tbaselineshift
         \advance\@tempdima-\ybaselineshift
         \raise\@tempdima\vtop\bgroup\kern\z@\vtop}%
     \let\@end@alignbox\egroup
  \else\if #2b\relax
     \def\@begin@alignbox{%
         \@tempdima=\tbaselineshift
         \advance\@tempdima-\ybaselineshift
         \raise\@tempdima\vbox\bgroup\vbox}%
     \def\@end@alignbox{\kern\z@\egroup}%
  \else
     \let\@begin@alignbox\vcenter
     \let\@end@alignbox\relax
  \fi\fi
\else\if #1z\relax\let\box@dir\relax\@rotswtrue
  \if #2t\relax
     \def\@begin@alignbox{%
         \@tempdima=\tbaselineshift
         \advance\@tempdima-\ybaselineshift
         \advance\@tempdima\ht\tstrutbox
         \raise\arraystretch\@tempdima\vtop\bgroup\kern\z@\vtop}%
     \let\@end@alignbox\egroup
  \else\if #2b\relax
     \def\@begin@alignbox{%
         \@tempdima=\tbaselineshift
         \advance\@tempdima-\ybaselineshift
         \advance\@tempdima-\dp\tstrutbox
         \raise\arraystretch\@tempdima\vbox\bgroup\vbox}%
     \def\@end@alignbox{\kern\z@\egroup}%
  \else
     \let\@begin@alignbox\vcenter
     \let\@end@alignbox\relax
  \fi\fi
\else\let\box@dir\tate
  \if #2t\relax
     \let\@begin@alignbox\vtop
     \let\@end@alignbox\relax
  \else\if #2b\relax
     \let\@begin@alignbox\vbox
     \let\@end@alignbox\relax
  \else
     \let\@begin@alignbox\vcenter
     \let\@end@alignbox\relax
  \fi\fi
\fi\fi
%    \end{macrocode}
% $B2#AH%b!<%I$N$H$-!'(B
%    \begin{macrocode}
\else
\if #1t\relax\let\box@dir\tate
  \if #2t\relax
     \def\@begin@alignbox{\vtop\bgroup\kern\z@\vbox}%
     \let\@end@alignbox\egroup
  \else\if #2b\relax
     \def\@begin@alignbox{\vbox\bgroup\vbox}%
     \def\@end@alignbox{\kern\z@\egroup}%
  \else
     \let\@begin@alignbox\vcenter
     \let\@end@alignbox\relax
  \fi\fi
\else\let\box@dir\yoko
  \if #2t\relax
     \let\@begin@alignbox\vtop
     \let\@end@alignbox\relax
  \else\if #2b\relax
     \let\@begin@alignbox\vbox
     \let\@end@alignbox\relax
  \else
     \let\@begin@alignbox\vcenter
     \let\@end@alignbox\relax
  \fi\fi
\fi\fi}
%    \end{macrocode}
% \end{macro}
%
%
% \subsection{$B%U%m!<%H$H%-%c%W%7%g%s$N=PNO0LCV(B}
% $B%-%c%W%7%g%s$H%U%m!<%H$O!"(B
% $B=PNO0LCV$N;XDj$dBg$-$5$N;XDj$J$I$,$G$-$k$h$&$K3HD%$7$F$$$^$9!#(B
% $B>\:Y$O!"!XF|K\8l(B\LaTeXe{}$B%V%C%/!Y$r;2>H$7$F$/$@$5$$!#(B
%
% |\layoutfloat|$B%3%^%s%I$G:n$i$l$k%\%C%/%9$G$9!#(B
%    \begin{macrocode}
\newbox\@floatbox
%    \end{macrocode}
% $B%U%m!<%H%*%V%8%'%/%H$NI}$H9b$5$G$9!#(B
%    \begin{macrocode}
\newdimen\floatwidth
\newdimen\floatheight
%    \end{macrocode}
% $B%U%m!<%H%*%V%8%'%/%H$N$^$o$j$K0z$+$l$k7S@~$NB@$5$G$9!#(B
%    \begin{macrocode}
\newdimen\floatruletick \floatruletick=0.4pt
%    \end{macrocode}
% $B%U%m!<%H%*%V%8%'%/%H$H%-%c%W%7%g%s$N4V$N%"%-$G$9!#(B
%    \begin{macrocode}
\newdimen\captionfloatsep \captionfloatsep=10pt
%    \end{macrocode}
% |\caption@dir|$B$K$O!"%-%c%W%7%g%s$rAH$`J}8~$r<($9%*%W%7%g%s$,3JG<$5$l$^$9!#(B
% |\captiondir|$B$O(B|\caption@dir|$B$NCM$H8=:_$NAH$_J}8~$K$h$C$F!"(B
% |\yoko|, |\tate|, |\relax|$B$N$$$:$l$+$K@_Dj$5$l$^$9!#(B
%    \begin{macrocode}
\def\caption@dir{Z}
\let\captiondir\relax
%    \end{macrocode}
% $B%-%c%W%7%g%s$NI}$G$9!#(B
%    \begin{macrocode}
\newdimen\captionwidth \captionwidth\z@
%    \end{macrocode}
% $B%-%c%W%7%g%s$rIU$1$k0LCV$r;XDj$7$^$9!#(B
%    \begin{macrocode}
\def\caption@posa{Z}
\def\caption@posb{Z}
%    \end{macrocode}
% $BAH$_N)$F$i$l$?%-%c%W%7%g%s$,3JG<$5$l$k%\%C%/%9$G$9!#(B
%    \begin{macrocode}
\newbox\@captionbox
%    \end{macrocode}
% $B%-%c%W%7%g%s$K;H$o$l$kJ8;z$G$9!#(B
%    \begin{macrocode}
\def\captionfontsetup{\normalfont\normalsize}
%    \end{macrocode}
%
% \begin{macro}{\layoutfloat}
% \begin{macro}{\X@layoutfloat}
% \begin{macro}{\@layoutfloat}
% |\layoutfloat|$B$O?^I=N`$NBg$-$5$H0LCV$r;XDj$9$k$N$K;H$$$^$9!#(B
% $BBg$-$5$r>JN,$9$k$+!"Ii$NCM$r;XDj$9$k$H!"(B
% $B$=$N%*%V%8%'%/%H$N<+A3$JD9$5$K$J$j$^$9!#$3$N$H$-$O!"7S$,0z$+$l$^$;$s!#(B
% $B@5$NBg$-$5$r;XDj$9$k$H!"(B|\floatruletick|$B$NB@$5$N7S$G0O$^$l$^$9!#(B
%
% $B0LCV;XDj$r>JN,$7$?>l9g!"Cf1{B7$($K$J$k$h$&$K$7$F$$$^$9!#(B
%    \begin{macrocode}
\def\layoutfloat{\@ifnextchar(%)
   {\X@layoutfloat}{\X@layoutfloat(-5\p@,-5\p@)}}
%
\def\X@layoutfloat(#1,#2){\@ifnextchar[%]
   {\@layoutfloat(#1,#2)}{\@layoutfloat(#1,#2)[c]}}
%
\long\def\@layoutfloat(#1,#2)[#3]#4{%
  \setbox\z@\hbox{#4}%
  \floatwidth=#1 \floatheight=#2 \edef\float@pos{#3}%
  \ifdim\floatwidth<\z@
     \floatwidth\wd\z@\floatruletick\z@
  \fi
  \ifdim\floatheight<\z@
     \floatheight\ht\z@\advance\floatheight\dp\z@\relax
     \floatruletick\z@
  \fi
  \setbox\@floatbox\vbox to\floatheight{\offinterlineskip
    \hrule width\floatwidth height\floatruletick depth\z@
    \vss\hbox to\floatwidth{%
      \vrule width\floatruletick height\floatheight depth\z@
      \hss\vbox to\floatheight{\hsize\floatwidth\vss#4\vss}\hss
      \vrule width\floatruletick height\floatheight depth\z@
    }\hrule width\floatwidth height\floatruletick depth\z@}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\DeclareLayoutCaption}
% |\DeclareLayoutCaption|$B%3%^%s%I$O!"%-%c%W%7%g%s$NAHJ}8~!"IU$1$k0LCV$dI}$N(B
% $B%G%U%)%k%H$r%U%m!<%H$N%?%$%W$4$H$K@_Dj$9$k$3$H$,$G$-$^$9!#(B
% $B$3$N%3%^%s%I$G%G%U%)%k%HCM$,@_Dj$5$l$F$$$J$$$H!"(B
% |\pcaption|$B%3%^%s%I$G%(%i!<$,H/$;$i$l$^$9!#(B
% $B$3$N%3%^%s%I$O%W%j%"%s%V%k$G$N$_!";HMQ$G$-$^$9!#(B
%
% |\DeclareLayoutCaption|\meta{type}^^A
%         |<|\meta{dir}|>(|\meta{width}|)[|\meta{pos1}\meta{pos2}|]|
%
% $B%3%^%s%I0z?t$r>JN,$9$k$3$H$O$G$-$^$;$s!#(B
% \meta{dir}$B$K$O!"(B`|y|', `|t|', `|z|', `|n|'$B$N$$$:$l$+$r;XDj$7$^$9!#(B
% `|n|'$B$H;XDj$r$9$k$H!"K\J8$NAH$_J}8~$HF1$8J}8~$G%-%c%W%7%g%s$,AH$^$l$^$9!#(B
% $B$3$l$,%G%U%)%k%H$G$9!#!JJdB-!'(B2018/09/20 v1.2j$B$^$G$O!"$3$N@bL@$KH?$7$F(B
% $B<B:]$N%3!<%I$O(B`|y|'$B$,%G%U%)%k%H$K$J$C$F$*$j!"(B
% $B!VF|K\8l(B\LaTeXe{}$B%V%C%/!W$K$b(B`|y|'$B$H=q$+$l$F$$$^$7$?$,!"(B
% $B8e=R$N!z$N%P%0=$@5$K9g$o$;!"(B2018/10/07 v1.2k$B$G(B`|n|'$B$KD>$7$^$7$?!#!K(B
%
% \meta{width}$B$K$O!"%-%c%W%7%g%s$r@^$jJV$9D9$5$r;XDj$7$^$9!#(B
% `|(12zw)|'$B$H;XDj$r$9$k$H!"4A;z(B12$BJ8;zJ,$ND9$5$G@^$jJV$5$l$^$9!#(B
% $B%G%U%)%k%H$O(B|(.8\linewidth)|$B$G$9!#(B
% ^^A $B!JJdB-!'(B2018/09/20 v1.2j$B$^$G$O!"$3$3$N@bL@J8$@$1(B
% ^^A   `|(\floatwidth)|'$B$,%G%U%)%k%H$H=q$+$l$F$$$^$7$?$,!"(B
% ^^A   $B<B:]$N%3!<%I5Z$S!VF|K\8l(B\LaTeXe{}$B%V%C%/!W$K9g$o$;$^$7$?!#!K(B
% $B$J$*!"%-%c%W%7%g%s$NI}$r%U%m!<%H%*%V%8%'%/%H$NI}$K9g$o$;$k>l9g$O(B
% `|(\floatwidth)|'$B$H;XDj$7!"9b$5$K9g$o$;$k>l9g$O(B`|(\floatheight)|'$B$H(B
% $B;XDj$7$^$9!#(B
%
% \meta{pos1}$B$H(B\meta{pos2}$B$K$O!"%-%c%W%7%g%s$r=PNO$9$k0LCV$r;XDj$7$^$9!#(B
% \meta{pos1}$B$O!"(B`|c|', `|t|', `|b|'$B$N$$$:$l$+$G$9!#(B
% \meta{pos2}$B$O!"(B`|u|', `|d|', `|l|', `|r|'$B$N$$$:$l$+$G$9!#(B
% $B%G%U%)%k%H$O!"(B|figure|$B%?%$%W$,(B`|cd|'$B!"(B|table|$B%?%$%W$O(B`|cu|'$B$G$9!#(B
% \changes{v1.2i}{2018/09/09}{$B0BA4$N$?$a!"(B\cs{DeclareLayoutCaption}$B$G(B
%    $BDj5A$9$kFbItL?Na$r(B\cs{...@layoutcaption}$B$+$i(B
%    \cs{...@layoutc@ption}$B$XJQ99(B}
%    \begin{macrocode}
\def\DeclareLayoutCaption#1<#2>(#3)[#4#5]{%
  \expandafter
  \ifx\csname #1@layoutc@ption\endcsname\relax \else
    \@latex@info{Redeclaring capiton layout setting of '#1'}%
  \fi
  \expandafter
  \gdef\csname #1@layoutc@ption\endcsname{%
     \if Z\caption@dir\def\caption@dir{#2}\fi
     \ifdim\captionwidth=\z@ \captionwidth=#3\relax\fi
     \if Z\caption@posa\def\caption@posa{#4}\fi
     \if Z\caption@posb\def\caption@posb{#5}\fi}}
\@onlypreamble\DeclareLayoutCaption
%    \end{macrocode}
% \changes{v1.0h}{1996/03/13}{$B%-%c%W%7%g%s=PNO0LCV$N=i4|CM$r@_Dj(B}
% \changes{v1.2k}{2018/10/07}{$B%-%c%W%7%g%s$N%G%U%)%k%H$NAHJ}8~$r(By$B$+$i(Bn$B$X(B
%    $BJQ99(B (forum:2506, issue~76)}
%    \begin{macrocode}
\DeclareLayoutCaption{figure}<n>(.8\linewidth)[cd]
\DeclareLayoutCaption{table}<n>(.8\linewidth)[cu]
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\layoutcaption}
% \begin{macro}{\X@layoutcaption}
% \begin{macro}{\@ilayoutcaption}
% \begin{macro}{\@iilayoutcaption}
% |\DeclareLayoutCaption|$B%3%^%s%I$G@_Dj$r$7$?!"%G%U%)%k%HCM$H$O0[$J$k@_Dj$G(B
% $BAH$_$?$$>l9g$O!"(B|\layoutcaption|$B%3%^%s%I$r;HMQ$7$^$9!#(B
% 
% |\layoutcaption<|\meta{dir}|>(|\meta{width}|)[|\meta{pos}|]|
%
% $B$J$*!"(B|\layoutcaption|$B$KAH$_J}8~%*%W%7%g%s$rIU$1$^$7$?$N$G!"(B
% |\captiondir|$B$GAH$_J}8~$r;XDj$9$kI,MW$O$"$j$^$;$s!#(B
% $B$^$?!"(B|\captiondir|$B$G;XDj$r$7$F$b!"$=$NCM$OL5;k$5$l$^$9!#(B
%    \begin{macrocode}
\def\layoutcaption{\def\caption@dir{Z}\captionwidth\z@
  \def\caption@posa{Z}\def\caption@posb{Z}%
  \@ifnextchar<\X@layoutcaption{%
    \@ifnextchar(\@ilayoutcaption{%
      \@ifnextchar[\@iilayoutcaption\relax}}}
%
\def\X@layoutcaption<#1>{\def\caption@dir{#1}%
  \@ifnextchar(\@ilayoutcaption{%
    \@ifnextchar[\@iilayoutcaption\relax}}
%
\def\@ilayoutcaption(#1){\setlength\captionwidth{#1}%
  \@ifnextchar[{\@iilayoutcaption}{\relax}}
%
\def\@iilayoutcaption[#1#2]{%
  \def\caption@posa{#1}\def\caption@posb{#2}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\pcaption}
% \begin{macro}{\@pcaption}
% $B%-%c%W%7%g%s$r?^I=N`$NE7CO:81&$N;XDj2U=j$KIU$1$k$K$O(B|\pcaption|$B%3%^%s%I$G(B
% $B;XDj$r$7$^$9!#0LCV$N;XDj$O(B|\layoutcaption|$B%3%^%s%I$G9T$J$$$^$9!#(B
% |\layoutcaption|$B%3%^%s%I$,>JN,$5$l$?>l9g$O!"(B|\DeclareLayoutCaption|$B%3%^%s%I(B
% $B$G@_Dj$5$l$F$$$k%G%U%)%k%HCM$,;H$o$l$^$9!#(B
% \changes{v1.2i}{2018/09/09}{Made caption an error outside a float: latex/2815
%    (sync with ltfloat 1999/04/19 v1.1u)}
%    \begin{macrocode}
\def\pcaption{%
   \ifx\@captype\@undefined
     \@latex@error{\noexpand\pcaption outside float}\@ehd
     \expandafter\@gobble
   \else
     \refstepcounter\@captype
     \expandafter\@firstofone
   \fi
   {\@dblarg{\@pcaption\@captype}}%
}
%
\long\def\@pcaption#1[#2]#3{%
  \addcontentsline{\csname ext@#1\endcsname}{#1}{%
    \protect\numberline{\csname the#1\endcsname}{\ignorespaces#2}}%
  \ifvoid\@floatbox
     \@latex@error{Use \noexpand\pcaption with `\string\layoutfloat'}\@eha
  \fi
  \make@pcaptionbox{#3}%
  \@pboxswfalse
  \setbox\@tempboxa\vbox{\hbox to\hsize{\if l\float@pos\else\hss\fi
    \if l\caption@posb\box\@captionbox\kern\captionfloatsep\fi
    \if t\caption@posa\vtop
    \else\if b\caption@posa\vbox
    \else\@pboxswtrue $\vcenter \fi\fi
    {\if u\caption@posb\box\@captionbox\kern\captionfloatsep\fi
     \unvbox\@floatbox
     \if d\caption@posb\kern\captionfloatsep\box\@captionbox\fi}%
    \if@pboxsw \m@th$\fi
    \if r\caption@posb\kern\captionfloatsep\box\@captionbox\fi
    \if r\float@pos\else\hss\fi}}%
  \par\vskip.25\baselineskip
  \box\@tempboxa}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\make@pcaptionbox}
% $B%-%c%W%7%g%s$rAH$_N)$F!"(B|\@captionbox|$B$r:n@.$7$^$9!#(B
%    \begin{macrocode}
\def\make@pcaptionbox#1{%
%    \end{macrocode}
% $B$^$:!"%G%U%)%k%H$N@_Dj$,$5$l$F$$$k$+$r3NG'$7$^$9!#(B
% $B@_Dj$5$l$F$$$J$$>l9g$O!"7Y9p%a%C%;!<%8$r=PNO$7!"(B
% $B8=:_$NAH%b!<%I$G$N%G%U%)%k%HCM$r;HMQ$7$^$9!#(B
% $B@_Dj$5$l$F$$$l$P!"$=$N%G%U%)%k%HCM$K$7$^$9!#(B
%
% \changes{v1.1h}{1996/03/13}{typo: \cs{@latex@warning}.}
%    \begin{macrocode}
  \expandafter
  \ifx\csname\@captype @layoutc@ption\endcsname\relax
     \@latex@warning{Default caption layout of `\@captype' unknown}%
       \def\caption@dir{Z}\captionwidth\z@
       \def\caption@posa{Z}\def\caption@posb{Z}%
  \else
     \csname \@captype @layoutc@ption\endcsname
  \fi
%    \end{macrocode}
% $B<!$K!"AH$_J}8~$r@_Dj$7$^$9!#(B 
% $B4pK\AH$NAH$_J}8~$H%-%c%W%7%g%s$NAH$_J}8~$rJQ$($k>l9g$K$O!"(B
% |\@tempswa|$B$r??$H$7$^$9!#J8;z$r2sE>$5$;$k$H$-$O(B|\@rotsw|$B$r??$K$7$^$9!#(B
%    \begin{macrocode}
  \@rotswfalse \@tempswafalse
  \iftdir\if y\caption@dir \let\captiondir\yoko \@tempswatrue
    \else\if z\caption@dir \let\captiondir\relax \@rotswtrue
    \else\let\captiondir\tate\fi\fi
  \else\if t\caption@dir\let\captiondir\tate \@tempswatrue
    \else\let\captiondir\yoko\fi
  \fi
%    \end{macrocode}
% $B%-%c%W%7%g%s$rAH$_N)$F$kA0$K!"$^$:!"%-%c%W%7%g%sJ8;zNs$,$I$NDxEY$ND9$5$r(B
% $B;}$C$F$$$k$N$+$r3NG'$9$k$?$a$K!"(B|\hbox|$B$KF~$l$^$9!#(B
%    \begin{macrocode}
  \setbox0\hbox{\if@rotsw $\fi\hbox{\captiondir
     \captionfontsetup\parindent\z@\inhibitglue
     \csname fnum@\@captype\endcsname\char\euc"A1A1\relax#1}%
  \if@rotsw \m@th$\fi}%
%    \end{macrocode}
% $B%-%c%W%7%g%s$NI}$K9g$o$;$k$?$a!":F$S!"%\%C%/%9$rAH$_N)$F$^$9!#(B
%
% $B%-%c%W%7%g%s$r@^$jJV$5$J$/$F$b$h$$>l9g!"(B|\@tempdima|$B$r%-%c%W%7%g%s$ND9$5$K(B
% $B$7$^$9!#$?$@$7!"%-%c%W%7%g%s$NAH$_J}8~$,4pK\AH$NAH$_J}8~$H0[$J$k>l9g(B
% $B!J(B|\@tempswa|$B$,??!K$O!"%\%C%/%9(B0$B$NI}$G$O$J$/!"9b$5$K@_Dj$r$7$^$9(B
% $B!J(Bp\TeX{}$B$G$OF1$8%\%C%/%9$G$b!"AHJ}8~$K$h$C$F(B |\wd| $B$H(B |\ht|+|\wd| $B$N(B
% $BJV$9@#K!$,0[$J$k$3$H$KCm0U!K!#(B
% |\captionwidth|$B$NCM$,!"%-%c%W%7%g%s$NI}$h$j$bD9$$>l9g!"(B
% $B@^$jJV$5$J$/$F$O$J$j$^$;$s$N$G!"(B|\@tempdima|$B$r(B|\captionwidth|$B$K$7$^$9!#(B
%
% \noindent\emph{$BF|K\8l(B\TeX{}$B3+H/%3%_%e%K%F%#$K$h$k=$@5(B}$B!'(B
% 2018/09/20 v1.2j$B$^$G$O!"%-%c%W%7%g%s$NAHJ}8~$,4pK\AH$NAH$_J}8~$H(B
% $BD>8r$9$k>l9g$K?<$5$r9MN8$9$k$N$rK:$l$F$$$?$?$a$K!"(B
% $BK\Mh$O@^$jJV$5$:$K:Q$`$O$:$NC;$$%-%c%W%7%g%s$,!"I,$:@^$jJV$5$l$F(B
% $B$7$^$&$H$$$&%P%0!J!z!K$,$"$j$^$7$?!#(B2018/10/07 v1.2k$B$G$3$N%P%0$r(B
% $B=$@5$7$?$?$a!"AHHG7k2L$,Bg$-$/JQ$o$k>l9g$,$"$j$^$9!#(B
% \changes{v1.2k}{2018/10/07}{$B%-%c%W%7%g%s$NAH$_J}8~$,4pK\AH$NAH$_J}8~$H(B
%    $BD>8r$9$k>l9g$K!"?<$5$rK:$l$F$$$?%P%0=$@5(B (forum:2506, issue~76)}
%    \begin{macrocode}
  \if@tempswa \@tempdima\ht0 \advance\@tempdima\dp0
  \else \@tempdima\wd0 \fi
  \ifdim\@tempdima>\captionwidth \@tempdima\captionwidth \fi
  \@pboxswfalse
  \setbox0\hbox{\if@rotsw $\fi
    \if u\caption@posb\vbox
    \else\if d\caption@posb\vbox
    \else\if t\caption@posa\vtop
    \else\if b\caption@posa\vbox
    \else\ifmmode\vcenter\else\@pboxswtrue $\vcenter\fi
    \fi\fi\fi\fi
    {\hsize\@tempdima\kern\z@
    \vbox{\captiondir\hsize\@tempdima
      \captionfontsetup\parindent\z@\inhibitglue
      \csname fnum@\@captype\endcsname\char\euc"A1A1\relax#1}\kern\z@
    }\if@pboxsw \m@th$\fi \if@rotsw \m@th$\fi}%
%    \end{macrocode}
% $B:G8e$K(B|\@captionbox|$B$rAH$_N)$F$^$9!#(B
%
% $B0LCV(B2$B%*%W%7%g%s$,(B`|u|'$B$+(B`|d|'$B$N>l9g!"(B
% $B$3$N%\%C%/%9$NI}$r%U%m!<%H%*%V%8%'%/%H$NI}$HF1$8D9$5$K$7!"(B
% $B0LCV(B1$B%*%W%7%g%s$G$NB7$($KAH$_N)$F$^$9!#(B
%
% $B0LCV(B2$B%*%W%7%g%s$,(B`|l|'$B$+(B`|r|'$B$N>l9g$O!"%-%c%W%7%g%s$NI}$G$9!#(B
% $B$3$N$H$-$N0LCV(B1$B%*%W%7%g%s$NB7$($O!"$3$NA0$NCJ3,$G=`Hw$r$7$F$*$-!"(B
% |\@pcaption|$B$G:G=*E*$K%U%m!<%H%*%V%8%'%/%H$HAH$_9g$o$;$k$H$-$K$J$5$l$^$9!#(B
%    \begin{macrocode}
  \let\to@captionboxwidth\relax
  \if l\caption@posb \else\if r\caption@posb\else
  \def\to@captionboxwidth{to\floatwidth}\fi\fi
  \setbox\@captionbox\hbox\to@captionboxwidth{%
     \if t\caption@posa\else\hss\fi
     \unhbox0\relax
     \if b\caption@posa\else\hss\fi}}
%    \end{macrocode}
% \end{macro}
%
%
%
% \subsection{$BCJMn%\%C%/%94D6-(B}
% minipage$B4D6-$H(B|\parbox|$B%3%^%s%I$b!"(Btabular$B4D6-$HF1$8$h$&$K!"(B
% $BAHJ}8~$r;XDj$9$k%*%W%7%g%s$rDI2C$7$F$"$j$^$9!#(B
% $B$3$l$i$N%3%^%s%I$O!"(B\file{ltboxes.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
%
% |\parbox|$B%3%^%s%I$OI}$@$1$G$J$/9b$5$b;XDj$G$-$k$h$&$K$J$C$F$$$^$9!#(B
% $B?7$7$$(B|\parbox|$B%3%^%s%I$K$D$$$F$N>\:Y$O!"(B\file{usrguide.tex}$B$r;2>H(B
% $B$7$F$/$@$5$$!#(B
%
% \subsubsection*{minipage$B4D6-(B}
%
% \begin{macro}{\minipage}
% $BAHJ}8~%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\minipage{\@ifnextchar<%>
   {\X@minipage}{\X@minipage<Z>}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@minipage}
% $B0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
%    \begin{macrocode}
\def\X@minipage<#1>{\@ifnextchar[%]
   {\@iminipage<#1>}{\@iiiminipage<#1>{c}\relax[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iminipage}
% $B9b$5%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
%    \begin{macrocode}
\def\@iminipage<#1>[#2]{\@ifnextchar[%]
   {\@iiminipage<#1>{#2}}{\@iiiminipage<#1>{#2}\relax[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iiminipage}
% $BFbIt0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\@iiminipage<#1>#2[#3]{\@ifnextchar[%]
   {\@iiiminipage<#1>{#2}{#3}}{\@iiiminipage<#1>{#2}{#3}[#2]}}
%    \end{macrocode}
% \end{macro}
% 
% \begin{macro}{\@iiiminipage}
% minipage$B4D6-$NFbIt7A<0$G$9!#(B
% \changes{v1.1g}{1996/01/12}{\break Grouping \cs{@iiiminipage}}
% \cs{leavevmode}$B$N8e$N(B\cs{bgroup}$B$O!"(B
% $B2sE>%*%W%7%g%s$,;XDj$5$l$?$H$-$N%U%i%0(B|\if@rotsw|$B$,!"$3$N%^%/%m$NFbIt$@$1(B
% $B$GM-8z$K$J$k$h$&$K$9$k$?$a$G$9!#$3$N3g8L$O!"(B\cs{endminipage}$B%3%^%s%I$G(B
% $BJD$8$^$9!#(B
%    \begin{macrocode}
\def\@iiiminipage<#1>#2#3[#4]#5{%
  \leavevmode\bgroup
  \setlength\@tempdima{#5}%
  \def\@mpargs{<#1>{#2}{#3}[#4]{#5}}%
  \@rotswfalse
  \iftdir
    \if #1y\relax\let\box@dir\yoko
    \else\if #1z\relax\@rotswtrue \let\box@dir\relax
    \else\let\box@dir\tate
    \fi\fi
  \else
    \if #1t\relax\let\box@dir\tate
    \else\let\box@dir\yoko
    \fi
  \fi
  \setbox\@tempboxa\vbox\bgroup\box@dir
    \if@rotsw \hsize\@tempdima\hbox\bgroup$\vbox\bgroup\fi
%    \end{macrocode}
% \changes{v1.1c}{1995/09/11}{Add \cs{adjustbaseline}.}
% \changes{v1.2c}{2016/11/19}{Use \cs{@setminpage}
%                             (sync with ltboxes v1.1a)}
%    \begin{macrocode}
    \adjustbaseline
    \color@begingroup
      \hsize\@tempdima
      \textwidth\hsize \columnwidth\hsize
      \@parboxrestore
      \def\@mpfn{mpfootnote}\def\thempfn{\thempfootnote}%
      \c@mpfootnote\z@
      \let\@footnotetext\@mpfootnotetext
      \let\@listdepth\@mplistdepth \@mplistdepth\z@
      \@minipagerestore
      \@setminipage}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\endminipage}
% minipage$B4D6-$N=*N;%3%^%s%I$G$9!#(B
% \changes{v1.2c}{2016/11/19}{put \cs{global} into definition
%    of \cs{@minipagefalse} (sync with ltboxes v1.0z)}
%    \begin{macrocode}
\def\endminipage{%
    \par
    \unskip
    \ifvoid\@mpfootins\else
      \vskip\skip\@mpfootins
      \normalcolor
      \footnoterule
      \unvbox\@mpfootins
    \fi
    \@minipagefalse   %% added 24 May 89
  \color@endgroup
  \if@rotsw \egroup\m@th$\egroup\fi
%    \end{macrocode}
% \cs{@iiiminipage}$B$G3+;O$7$?%0%k!<%W$rJD$8$k$?$a$N(B\cs{egroup}$B$G$9!#(B
%    \begin{macrocode}
  \egroup
  \expandafter\@iiiparbox\@mpargs{\unvbox\@tempboxa}\egroup}
%    \end{macrocode}
% \end{macro}
%
% \subsubsection*{\cs{parbox}$B%3%^%s%I(B}
%
% \begin{macro}{\parbox}
% $BAHJ}8~%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2e}{2017/03/02}{Make \cs{parbox} Robust
%    (sync with ltboxes 2015/01/08 v1.1h)}
%    \begin{macrocode}
\DeclareRobustCommand\parbox{\@ifnextchar<%>
   {\X@parbox}{\X@parbox<Z>}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@parbox}
% $B0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
%    \begin{macrocode}
\def\X@parbox<#1>{\@ifnextchar[%]
   {\@iparbox<#1>}{\@iiiparbox<#1>{c}\relax[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iparbox}
% $B9b$5%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
%    \begin{macrocode}
\def\@iparbox<#1>[#2]{\@ifnextchar[%]
   {\@iiparbox<#1>{#2}}{\@iiiparbox<#1>{#2}\relax[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iiparbox}
% $BFbIt0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\@iiparbox<#1>#2[#3]{\@ifnextchar[%]%
   {\@iiiparbox<#1>{#2}{#3}}{\@iiiparbox<#1>{#2}{#3}[#2]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iiiparbox}
% |parbox|$B$NFbIt7A<0$G$9!#(B
% \changes{v1.1c}{1995/09/11}{Add \cs{adjustbaseline}.}
% \changes{v1.1c}{1995/10/24}{\break typo \cs{adjustbaesline}.}
% \changes{v1.1g}{1996/01/12}{\break Grouping \cs{@iiiparbox}}
% minipage$B4D6-$HF1$8$h$&$K%0%k!<%T%s%0$r$7$^$9!#(B
% $B$3$N3g8L$HBP$K$J$k$N$O!"$3$N%^%/%m$N:G8e$N(B\cs{egroup}$B$G$9!#(B
% \changes{v1.2a}{2016/08/20}{\cs{parbox}$BA08e$NM>J,$J(B\cs{xkanjiskip}$B$r:o=|(B}
% \changes{v1.2c}{2016/11/19}{Changed \cs{endgraf} to
%    \cs{@@par} (sync with ltboxes.dtx v1.0y)}
% \changes{v1.2c}{2016/11/19}{Changed \cs{@empty} to \cs{relax} as
%    flag for natural width: pr/2975 (sync with ltboxes.dtx v1.1f)}
% \changes{v1.2c}{2016/11/19}{Ensure \cs{@parboxto} holds the value
%    of \cs{@tempdimb} not the register itself (pr/3867)
%    (sync with ltboxes.dtx v1.1g)}
%    \begin{macrocode}
\long\def\@iiiparbox<#1>#2#3[#4]#5#6{%
  \leavevmode\null\bgroup
  \setlength\@tempdima{#5}%
  \fork@parbox@option<#1>[#2]%
\if@rotsw
  \@begin@tempboxa\vbox{\box@dir\hsize\@tempdima
    \hbox{$\vbox{\@parboxrestore\adjustbaseline#6\@@par}\m@th$}}%
\else
  \@begin@tempboxa\vbox{\box@dir
    \hsize\@tempdima\@parboxrestore\adjustbaseline#6\@@par}%
\fi
    \ifx\relax#3\relax\else
      \setlength\@tempdimb{#3}%
      \edef\@parboxto{to\the\@tempdimb}%
    \fi
    \@begin@parbox\@parboxto{\box@dir\adjustbaseline
       \let\hss\vss\let\unhbox\unvbox
       \csname bm@#4\endcsname}\@end@parbox
  \@end@tempboxa\egroup\null}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\fork@parbox@option}
% |\parbox|$B$GM?$($i$l$?Bh0l0z?t$HBhFs0z?t$NAH9g$;$NJ,4t$r9T$J$$$^$9!#(B
%
% $B%3%_%e%K%F%#HG$G$O!"%"%9%-!<HG$GIT<+A3$@$C$?(B|\parbox|$B$NH"$H(B
% $B<~0O$NK\J8$H$NB7$(0LCV$r=$@5$7!"0J2<$N$h$&$K@_7W$7$^$7$?!#(B
% \begin{itemize}
% \item $B<~0O$NAHJ}8~$,2#AH$+$DAHJ}8~$,(B|<y>|, |<z>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$B0l9TL\$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BH"$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$B:G=*9T$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,2#AH$+$DAHJ}8~$,(B|<t>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$BH"$N>eC<$,<~0O$NOBJ8J8;z$N9b$5$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BH"$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$BH"$N2<C<$,<~0O$NOBJ8J8;z$N?<$5$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<y>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$BH"$N>eC<$,<~0O$NOBJ8J8;z$N9b$5$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BH"$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$BH"$N2<C<$,<~0O$NOBJ8J8;z$N?<$5$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<t>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$B0l9TL\$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BH"$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$B:G=*9T$N%Y!<%9%i%$%s$,<~0O$N$=$l$H0lCW(B
% \end{itemize}
% \item $B<~0O$NAHJ}8~$,=DAH$+$DAHJ}8~$,(B|<z>|$B;XDj$N>l9g(B
% \begin{itemize}
%   \item |[t]|$B;XDj$N$H$-(B\\$BH"$N>eC<$,<~0O$NOBJ8J8;z$N9b$5$H0lCW(B
%   \item |[c]|$B;XDj$N$H$-(B\\$BH"$NCf?4$,<~0O$N?t<0<4$rDL$k!J2$J8%Y!<%9%i%$%s%7%U%H$N1F6A2<!K(B
%   \item |[b]|$B;XDj$N$H$-(B\\$BH"$N2<C<$,<~0O$NOBJ8J8;z$N?<$5$H0lCW(B
% \end{itemize}
% \end{itemize}
% \changes{v1.2f}{2017/03/28}{$BCJMn$NH"$H<~0O$H$NB7$(0LCV$r=$@5(B}
%    \begin{macrocode}
\def\fork@parbox@option<#1>[#2]{%
\@rotswfalse
%    \end{macrocode}
% $B=DAH%b!<%I$N$H$-!'(B
%    \begin{macrocode}
\iftdir
\if #1y\relax\let\box@dir\yoko
   \if #2t\relax
      \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vtop}%
      \let\@end@parbox\egroup
   \else\if #2b\relax
      \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
      \def\@end@parbox{\kern\z@\egroup}%
   \else\ifmmode
      \let\@begin@parbox\vcenter
      \let\@end@parbox\relax
   \else
      \def\@begin@parbox{$\vcenter}%
      \def\@end@parbox{\m@th$}%
   \fi\fi\fi
\else\if #1z\relax\@rotswtrue \let\box@dir\relax
   \if #2t\relax
      \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vtop}%
      \let\@end@parbox\egroup
   \else\if #2b\relax
      \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
      \def\@end@parbox{\kern\z@\egroup}%
   \else\ifmmode
      \let\@begin@parbox\vcenter
      \let\@end@parbox\relax
   \else
      \def\@begin@parbox{$\vcenter}%
      \def\@end@parbox{\m@th$}%
   \fi\fi\fi
\else\let\box@dir\tate
   \if #2t\relax
      \let\@begin@parbox\vtop
      \let\@end@parbox\relax
   \else\if #2b\relax
      \let\@begin@parbox\vbox
      \let\@end@parbox\relax
   \else\ifmmode
      \let\@begin@parbox\vcenter
      \let\@end@parbox\relax
   \else
      \def\@begin@parbox{$\vcenter}%
      \def\@end@parbox{\m@th$}%
   \fi\fi\fi
\fi\fi
%    \end{macrocode}
% $B2#AH%b!<%I$N$H$-!'(B
%    \begin{macrocode}
\else
\if #1t\relax\let\box@dir\tate
   \if #2t\relax
      \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vtop}%
      \let\@end@parbox\egroup
   \else\if #2b\relax
      \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
      \def\@end@parbox{\kern\z@\egroup}%
   \else\ifmmode
      \let\@begin@parbox\vcenter
      \let\@end@parbox\relax
   \else
      \def\@begin@parbox{$\vcenter}%
      \def\@end@parbox{\m@th$}%
   \fi\fi\fi
\else\let\box@dir\yoko
   \if #2t\relax
      \let\@begin@parbox\vtop
      \let\@end@parbox\relax
   \else\if #2b\relax
      \let\@begin@parbox\vbox
      \let\@end@parbox\relax
   \else\ifmmode
      \let\@begin@parbox\vcenter
      \let\@end@parbox\relax
   \else
      \def\@begin@parbox{$\vcenter}%
      \def\@end@parbox{\m@th$}%
   \fi\fi\fi
\fi\fi}
%    \end{macrocode}
% \end{macro}
%
% \subsubsection*{\cs{pbox}$B%3%^%s%I(B}
%
% |\pbox|$B$OAH$_J}8~$r;XDj$G$-$k%\%C%/%9%3%^%s%I$G$9!#(B
% $B<!$N$h$&$J9=J8$H$J$C$F$$$^$9!#(B
%
% |\pbox<|\meta{dir}|>[|\meta{width}|][|\meta{pos}|]{|\meta{obj}|}|
%
% \begin{macro}{\pbox}
% $B%*%W%7%g%s$rD4$Y$^$9!#(B
% \changes{v1.2g}{2017/05/04}{Make \cs{pbox} Robust}
%    \begin{macrocode}
\DeclareRobustCommand\pbox{\leavevmode\@ifnextchar<{\X@makePbox}{\X@makePbox<Z>}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@makepbox}
% \begin{macro}{\@imakepbox}
%    \begin{macrocode}
\def\X@makePbox<#1>{%
  \@ifnextchar[{\@imakePbox<#1>}{\@imakePbox<#1>[-5\p@]}}
%
\def\@imakePbox<#1>[#2]{\@ifnextchar[%]
  {\@iimakePbox<#1>{#2}}{\@iimakePbox<#1>{#2}[c]}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\@iimakePbox}
% |\pbox|$B$NFbIt7A<0$G$9!#(B
% \changes{v1.1i}{2001/05/10}{$B=DAH$G(Bz$B$r;XDj$9$k$H%(%i!<$K$J$k$N$r=$@5!#(B}
% \changes{v1.2g}{2017/05/04}{Use \cs{setlength}, so that
%           calc extensions apply}
%    \begin{macrocode}
\def\@iimakePbox<#1>#2[#3]#4{%
  \bgroup \@rotswfalse \@pboxswfalse
  \iftdir
    \if #1y\relax\let\box@dir\yoko
    \else\if #1z\relax\@rotswtrue \let\box@dir\relax
    \else\let\box@dir\tate
    \fi\fi
  \else
    \if #1t\relax\let\box@dir\tate
    \else\let\box@dir\yoko
    \fi
  \fi
  \ifmmode\else\if@rotsw\@pboxswtrue\hbox\bgroup$\fi\fi
    \setlength{\@tempdima}{#2}%
    \ifdim\@tempdima<\z@ \hbox{\box@dir#4}\else
    \hb@xt@\@tempdima{\box@dir
               \if #3l\relax\else\hss\fi
               #4\relax
               \if #3r\relax\else\hss\fi}\fi
  \if@pboxsw \m@th$\egroup\fi\egroup}
%    \end{macrocode}
% \end{macro}
%
% \subsection{$B:n?^4D6-(B}
% picture$B4D6-$b!"AHJ}8~$r;XDj$9$k%*%W%7%g%s$rDI2C$7$F$"$j$^$9!#(B
% $B$J$*!"$3$l$i$N%3%^%s%I$O!"(B\file{ltpictur.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
%
% \begin{macro}{\picture}
% $BAHJ}8~%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\picture{\@ifnextchar<%>
   {\X@picture}{\X@picture<Z>}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@picture}
% $B?^7ANN0h%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\X@picture<#1>(#2,#3){\@ifnextchar(%)
   {\@@picture<#1>(#2,#3)}{\@@picture<#1>(#2,#3)(0,0)}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@@picture}
% picture$B4D6-$NFbIt$G$O%Y!<%9%i%$%s%7%U%H$NCM$r%<%m$K$7$^$9!#(B
% $B0JA0$K@_Dj$5$l$F$$$?CM$O!"$=$l$>$lJ]B8$5$l!"=*N;;~$K!"$=$NCM$KLa$5$l$^$9!#(B
%    \begin{macrocode}
\newdimen\save@ybaselineshift
\newdimen\save@tbaselineshift
\newdimen\@picwd
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@picture@dimens}
% $B?^7ANN0h$N@#K!CM$rD4@0$9$kL?Na$r@Z$j=P$7$^$7$?!#(B
% $B4pK\AH$NAH$_J}8~$HD>8r$9$k>l9g$O!"9b$5$HI}$rF~$lBX$($^$9!#(B
% \changes{v1.2m}{2020/10/07}{$B%^%/%mDI2C(B}
%    \begin{macrocode}
\ifx\@defaultunitsset\@undefined     % old
  \def\X@picture@dimens#1#2#3#4{%
    \@picwd=#1\unitlength \@picht=#2\unitlength
    \@tempdima=#3\unitlength \@tempdimb=#4\unitlength
  }
\else                                % 2020-10-01
  \def\X@picture@dimens#1#2#3#4{%
    \@defaultunitsset\@picwd{#1}\unitlength
    \@defaultunitsset\@picht{#2}\unitlength
    \@defaultunitsset\@tempdima{#3}\unitlength
    \@defaultunitsset\@tempdimb{#4}\unitlength
  }
\fi
%    \end{macrocode}
% |\picture|$B$NFbIt7A<0$G$9!#(B3$BAHL\$N0z?t$O!"86E@:BI8$G$9!#(B
% \changes{v1.2m}{2020/10/07}{Use \cs{@defaultunitsset} (gh/372)
%    (sync with ltpictur.dtx 2020/08/14 v1.2a)}
%    \begin{macrocode}
\def\@@picture<#1>(#2,#3)(#4,#5){%
  \save@ybaselineshift\ybaselineshift
  \save@tbaselineshift\tbaselineshift
  \iftdir
    \if#1y\let\box@dir\yoko
      \X@picture@dimens{#3}{#2}{#5}{#4}%
    \else\let\box@dir\tate
      \X@picture@dimens{#2}{#3}{#4}{#5}%
    \fi
  \else
    \if#1t\let\box@dir\tate
      \X@picture@dimens{#3}{#2}{#5}{#4}%
    \else\let\box@dir\yoko
      \X@picture@dimens{#2}{#3}{#4}{#5}%
    \fi
  \fi
  \setbox\@picbox\hb@xt@\@picwd\bgroup\box@dir
    \hskip-\@tempdima
    \lower\@tempdimb\hbox\bgroup
      \ybaselineshift\z@ \tbaselineshift\z@
      \ignorespaces}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\endpicture}
% $B?^7ANN0h$NI}$H9b$5$r;XDj$NBg$-$5$K$7$F$+$i!"=PNO$r$7$^$9!#(B
% $B$=$7$F!":G8e$K%Y!<%9%i%$%s%7%U%H$NCM$r85$KLa$7$^$9!#(B
%    \begin{macrocode}
\def\endpicture{%
  \egroup\hss\egroup
  \ht\@picbox\@picht \wd\@picbox\@picwd \dp\@picbox\z@
  \mbox{\box\@picbox}%
  \ybaselineshift\save@ybaselineshift
  \tbaselineshift\save@tbaselineshift}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\put}
% \begin{macro}{\line}
% \begin{macro}{\vector}
% \begin{macro}{\dashbox}
% \begin{macro}{\oval}
% \begin{macro}{\circle}
% picture$B4D6-$NFbIt$G!"%U%)%s%H%5%$%:JQ99%3%^%s%I$J$I$,;HMQ$5$l$?>l9g!"(B
% $B%Y!<%9%i%$%s%7%U%HNL$,?7$?$K@_Dj$5$l$F$7$^$&$?$a!"(B
% $B$3$l$i$N%3%^%s%I$,%Y!<%9%i%$%s%7%U%H$N1F6A$r<u$1$J$$$h$&$K:FDj5A$r$7$^$9!#(B
% $B%Y!<%9%i%$%s%7%U%H$rM-8z$K$7$?$$>l9g$O!"(B|\pbox|$B%3%^%s%I$r;HMQ$7$F$/$@$5$$!#(B
%    \begin{macrocode}
\let\org@put\put
\def\put{\ybaselineshift\z@\tbaselineshift\z@\org@put}
%
\let\org@line\line
\def\line{\ybaselineshift\z@\tbaselineshift\z@\org@line}
%
\let\org@vector\vector
\def\vector{\ybaselineshift\z@\tbaselineshift\z@\org@vector}
%
\let\org@dashbox\dashbox
\def\dashbox{\ybaselineshift\z@\tbaselineshift\z@\org@dashbox}
%
\let\org@oval\oval
\def\oval{\ybaselineshift\z@\tbaselineshift\z@\org@oval}
%
\let\org@circle\circle
\def\circle{\ybaselineshift\z@\tbaselineshift\z@\org@circle}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
%
%
%
% \subsection{$BO"?t;z!?4A?t;z!?K5E@!?2<@~(B}
% $B$3$3$G$O!"O"?t;z!"4A?t;z!"K5E@!"2<@~$K$D$$$F@bL@$r$7$F$$$^$9!#(B
%
% $BO"?t;z$H4A?t;z!"$*$h$SK5E@$H2<@~$K$D$$$F$N>\:Y$O!"(B
% $B!XF|K\8l(B\LaTeXe{}$B%V%C%/!Y$r;2>H$7$F$/$@$5$$!#(B
% $B$J$*!"K5E@$K;H$&J8;z$O(B\file{pldefs.ltx}$B$GDj5A$5$l$F$$$^$9!#(B
%
% $B$J$*!"O"?t;z%3%^%s%I$O(B3$B<oN`$"$j$^$7$?$,!"(B
% |\rensuji|$B%3%^%s%I0l$D$K$^$H$a$^$7$?!#(B
% $B?7$7$$O"?t;z%3%^%s%I$O<!$N9=J8$H$J$j$^$9!#(B
%
% \medskip
% |\rensuji[|\meta{pos}|]|\meta{$B2#$KJB$Y$kH>3QJ8;z(B}
%
% |\rensuji*[|\meta{pos}|]|\meta{$B2#$KJB$Y$kH>3QJ8;z(B}
% \medskip
%
% $B%"%9%?%j%9%/7A<0$N>l9g$O!"9T4V$rO"?t;z$NI}$K9g$o$;$F9-$2$^$;$s!#(B
% \meta{pos}$B$O!"O"?t;z$rB7$($k0LCV$G$9!#(B
% `|c|'$B!JCf1{B7$(!K!"(B`|r|'$B!J1&4s$;!K!"(B`|l|'$B!J:84s$;!K$r;XDj$G$-$^$9!#(B
% $B%G%U%)%k%H$G$O!"Cf1{$KB7$($^$9!#(B
%
% $B<!$N%U%i%0$,??$N>l9g$K$O!"O"?t;z$NI}$K9g$o$;$F9T4V$r9-$2(B\emph{$B$^$;$s(B}$B!#(B
% $B%"%9%?%j%9%/7A<0$N>l9g$K??$K$J$j$^$9!#(B
%    \begin{macrocode}
\newif\ifnot@advanceline
%    \end{macrocode}
%
% |\rensujiskip|$B$OO"?t;z$NA08e$KF~$k%"%-$G$9!#(B
% $B%G%U%)%k%H$O!"8=:_$NJ8;z$NI}$N(B4$BJ,$N(B1$B$r4p=`$K$7$F$$$^$9!#(B
%    \begin{macrocode}
\newskip\rensujiskip
\rensujiskip=0.25\chs plus.25zw minus.25zw
%    \end{macrocode}
%
% \subsubsection*{$BO"?t;z(B}
%
% \begin{macro}{\rensuji}
% \begin{macro}{\@rensuji}
% \begin{macro}{\@@rensuji}
% |\rensuji|$B$O!"(B|*|$B7A<0$+$I$&$+$rD4$Y$^$9!#(B
% |\@rensuji|$B$O!"0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
% |\@@rensuji|$B$,(B|\rensuji|$B$NFbIt7A<0$G$9!#(B
% \changes{v1.2b}{2016/11/07}{$B2#AH$GCJMn$NF,$K(B\cs{rensuji}$B$r;H$($k(B
%    $B$h$&$K(B\cs{leavevmode}$B$rDI2C$7$F=$@5(B}
% \changes{v1.2i}{2018/09/09}{$B=D?t<0%G%#%l%/%7%g%s$NO"?t;z(B}
%    \begin{macrocode}
\DeclareRobustCommand\rensuji{%
  \@ifstar{\not@advancelinetrue\@rensuji}{\@rensuji}}
\def\@rensuji{\@ifnextchar[{\@@rensuji}{\@@rensuji[c]}}
\def\@@rensuji[#1]#2{%
  \ifvmode\leavevmode\fi
 \iftdir\ifmdir\hbox{#2}\else
  \hskip\rensujiskip
  \ifnot@advanceline\not@advancelinefalse\else
    \setbox\z@\hbox{\yoko#2}%
    \@tempdima\ht\z@ \advance\@tempdima\dp\z@
    \if #1c\relax\vrule\@width\z@ \@height.5\@tempdima \@depth.5\@tempdima
    \else\if #1r\relax\vrule\@width\z@\@height\z@ \@depth\@tempdima
    \else\vrule\@width\z@ \@height\@tempdima \@depth\z@
    \fi\fi
  \fi
  \if #1c\relax\hbox to1zw{\yoko\hss#2\hss}%
  \else\if #1r\relax\vbox{\hbox to1zw{\yoko\hss#2}}%
  \else\vtop{\hbox to1zw{\yoko#2\hss}}%
  \fi\fi
  \hskip\rensujiskip
 \fi\else\hbox{#2}\fi
}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\Rensuji}
% \begin{macro}{\prensuji}
% \changes{v1.1d}{1995/11/21}{\cs{Rensuji}, \cs{prensuji}$B$r:n@.(B}
% |\Rensuji|$B%3%^%s%I$H(B|\prensuji|$B%3%^%s%I$O!"(B|\rensuji|$B%3%^%s%I$GBeMQ$G$-(B
% $B$^$9!#(B
%    \begin{macrocode}
\let\Rensuji\rensuji
\let\prensuji\rensuji
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
%
% \subsubsection*{$B4A?t;z(B}
%
% \begin{macro}{\Kanji}
% \begin{macro}{\@Kanji}
% \begin{macro}{\kanji}
% |\Kanji|$B%3%^%s%I$rDj5A$7$^$9!#(B|\Kanji|$B%3%^%s%I$O(B|\Alph|$B$HF1$8$h$&$K!"(B
% $B%+%&%s%?$KBP$7$F$N$_;HMQ$9$k$3$H$,$G$-$^$9!#(B
%
% |\kanji|$B%3%^%s%I$O!"8eB3$NH>3Q?t;z$r4A?t;z$K$7$^$9!#(B
% |\kanji 1989|$B$N$h$&$K;XDj$r$7$^$9!#(B
% $B$?$@$7!"2#AH%b!<%I$N$H$-$K$O!"2?$b$7$^$;$s!#(B
% $B$D$M$K4A?t;z$K$7$?$$>l9g$O!"(B|\kansuji|$B%W%j%_%F%#%V$r;H$C$F$/$@$5$$!#(B
%
% $B8eB3$N?t;z$^$G4A?t;z$K$J$C$F$7$^$&%P%0$r=$@5$7$^$7$?(B(Issue~\#33)$B!#(B
% \changes{v1.0h}{1996/03/13}{\cs{@Kanji}$B$rDI2C!#1Q8lHG$HF1MM$K$7$?!#(B}
% \changes{v1.2d}{2017/02/04}{\cs{Kanji}$B$N0z?t$@$1$G$J$/8e$KO"B3$9$k(B
%    $B?t;z$b4A?t;z$K$J$C$F$7$^$&%P%0$r=$@5(B}
%    \begin{macrocode}
\def\Kanji#1{\expandafter\@Kanji\csname c@#1\endcsname}
\def\@Kanji#1{\kansuji #1}
\def\kanji{\iftdir\expandafter\kansuji\fi}
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
% \subsubsection*{$BK5E@(B}
%
% \begin{macro}{\boutenchar}
% \begin{macro}{\bou}
% |\bou|$B$O!"K5E@$rIU$1$k%3%^%s%I$G$9!#(B
%
% $BK5E@$H$7$F=PNO$9$kJ8;z$O(B|\boutenchar|$B$K;XDj$7$^$9!#(B
% $B$3$NJ8;z$O!"$$$D$G$b!"2#AHMQ%U%)%s%H$,;H$o$l$^$9!#(B
% $B%G%U%)%k%H$O!"(BEUC$B%3!<%I(B|A1A2|$B!J(B\hbox{\yoko $B!"(B}$B!K$G$9!#(B
%    \begin{macrocode}
\def\boutenchar{\char\euc"A1A2}
%    \end{macrocode}
%
% \changes{v1.2l}{2019/09/29}{Make \cs{bou} robust}
%    \begin{macrocode}
\DeclareRobustCommand\bou[1]{\ifvmode\leavevmode\fi\@bou#1\end}
\def\@bou#1{%
  \ifx#1\end \let\next=\relax
  \else
    \iftdir\if@rotsw
      \hbox to\z@{\vbox to\z@{\boxmaxdepth\maxdimen
        \vss\moveleft-0.2zw\hbox{\boutenchar}\nointerlineskip
        \hbox{\char\euc"A1A1}}\hss}\nobreak#1\relax
    \else
      \hbox to\z@{\vbox to\z@{\boxmaxdepth\maxdimen
        \vss\moveleft0.2zw\hbox{\yoko\boutenchar}\nointerlineskip
        \hbox{\char\euc"A1A1}}\hss}\nobreak#1\relax
    \fi\else
      \hbox to\z@{\vbox to\z@{%
        \vss\moveleft-0.2zw\hbox{\yoko\boutenchar}\nointerlineskip
        \hbox{\char\euc"A1A1}}\hss}\nobreak#1\relax
    \fi
    \let\next=\@bou
  \fi\next}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \subsubsection*{$B2<@~(B}
%
% \begin{macro}{\kasen}
% $B2<@~$r0z$/%3%^%s%I$G$9!#(B
% $B2#AH%b!<%I$N$H$-$O!"0z?t$r(B|\underline|$B$KEO$7$^$9!#(B
% $B=DAH%b!<%I$G$b!"2sE>%b!<%I$N(B|\parbox|$B$J$I$G;H$o$l$?$H$-$K$O!"(B
% $B$d$O$j0z?t$r(B|\underline|$B$KEO$7$^$9!#(B
% $B$3$l0J30$N>l9g$O!"0z?t$N>e$KD>@~$r0z$-$^$9!#(B
% \changes{v1.2l}{2019/09/29}{Make \cs{kasen} robust}
%    \begin{macrocode}
\DeclareRobustCommand\kasen[1]{%
  \ifydir\underline{#1}%
  \else\if@rotsw\underline{#1}\else
    \setbox\z@\hbox{#1}\leavevmode\raise.7zw
    \hbox to\z@{\vrule\@width\wd\z@ \@depth\z@ \@height.4\p@\hss}%
    \box\z@
  \fi\fi}
%    \end{macrocode}
% \end{macro}
%
%
%
% \subsection{$B;2>HHV9f(B}
% $B;2>HHV9f$NN`$rO"?t;z$G=PNO$9$k$h$&$K:FDj5A$7$^$9!#(B
% itemize$B4D6-$J$I$N%j%9%H7?$N%i%Y%k$K$D$$$F$O!"(Bjarticle$B$J$I$N(B
% $B%Q%C%1!<%8$GDj5A$7$F$$$^$9!#>\:Y$O!"(B\file{jclasses.dtx}$B$r;2>H$7$F$/$@$5$$!#(B
%
% \begin{macro}{\@eqnnum}
% \begin{macro}{\@thecounter}
% $B$3$l$i$O(B|\equation|$B%3%^%s%I$G:n@.$5$l$??t<0$KIU2C$5$l$kHV9f$G$9!#(B
% \file{ltmath.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
%    \begin{macrocode}
\def\@eqnnum{{\reset@font\rmfamily \normalcolor
  \iftdir\raise.25zh\hbox{\yoko(\theequation)}%
  \else (\theequation)\fi}}
\def\@thecounter#1{\noexpand\rensuji{\noexpand\arabic{#1}}}
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\@thmcounter}
% |\newtheorem|$B%3%^%s%I$G:n@.$7$?4D6-$G;2>H$5$l$k%i%Y%k$G$9!#(B
% \file{ltthm.dtx}$B$GDj5A$5$l$F$$$^$9!#(B
%    \begin{macrocode}
\def\@thmcounter#1{\noexpand\rensuji{\noexpand\arabic{#1}}}
%</package>
%    \end{macrocode}
% \end{macro}
%
%
% \Finale
\endinput