% \iffalse meta-comment
%% File: plext.dtx
%
%  Copyright 2001 ASCII Corporation.
%
%  This file is part of pLaTeX2e system.
%  -------------------------------------
%
% \fi
%
% \CheckSum{1845}
%% \CharacterTable
%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%%   Digits        \0\1\2\3\4\5\6\7\8\9
%%   Exclamation   \!     Double quote  \"     Hash (number) \#
%%   Dollar        \$     Percent       \%     Ampersand     \&
%%   Acute accent  \'     Left paren    \(     Right paren   \)
%%   Asterisk      \*     Plus          \+     Comma         \,
%%   Minus         \-     Point         \.     Solidus       \/
%%   Colon         \:     Semicolon     \;     Less than     \<
%%   Equals        \=     Greater than  \>     Question mark \?
%%   Commercial at \@     Left bracket  \[     Backslash     \\
%%   Right bracket \]     Circumflex    \^     Underscore    \_
%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%%   Right brace   \}     Tilde         \~}
%%
%
% \setcounter{StandardModuleDepth}{1}
% \StopEventually{}
%
% \iffalse
% \changes{v1.0}{1994/09/16}{first edition}
% \changes{v1.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}
% \fi
%
% \iffalse
%<package>\NeedsTeXFormat{pLaTeX2e}
%<package>\ProvidesPackage{plext}
\ProvidesFile{plext.dtx}
   [2001/09/26 v1.2 pLaTeX package file]
%<*driver>
\documentclass{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<%>
   {\@stabular}{\@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}{\@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}}
%    \begin{macrocode}
\def\@stabular<#1>#2{\def\@halignto{to#2}\p@tabular<#1>}
\def\p@tabular<#1>{\leavevmode \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.1d}{1995/11/10}{\cs{@array} to \cs{p@array}}
%    \begin{macrocode}
\def\p@array<#1>[#2]#3{\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\hbox{\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}%
  \fork@array@option<#1>[#2]%
  \@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.1c}{1995/09/11}{Add \cs{adjustbaseline}.}
%    \begin{macrocode}
  \@begin@alignbox\bgroup\box@dir\adjustbaseline
    \let\par\@empty
    \let\@sharp##\let\protect\relax
    \lineskip\z@skip\baselineskip\z@skip\@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
%    \begin{macrocode}
\def\endarray{\crcr\egroup\egroup\@end@alignbox}
\def\endtabular{\crcr\egroup\egroup\@end@alignbox $\egroup}
\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
%    \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{\raise\cdp\vtop\bgroup\kern\z@\vbox}%
     \let\@end@alignbox\egroup
  \else\if #2b\relax
     \def\@begin@alignbox{\lower\cdp\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{\raise\cdp\vtop\bgroup\kern\z@\vbox}%
     \let\@end@alignbox\egroup
  \else\if #2b\relax
     \def\@begin@alignbox{\lower\cdp\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
     \def\@begin@alignbox{\raise\cdp\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
     \def\@begin@alignbox{\raise\cdp\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
%
% \DescribeMacro\DeclareLayoutCaption
% |\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!#(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
% `|(\floatwidth)|'$B$H;XDj$r$9$k$H!"(B
% $B%-%c%W%7%g%s$NI}$O%U%m!<%H%*%V%8%'%/%H$NI}$H$J$j$^$9!#(B
% $B$3$l$,%G%U%)%k%H$G$9!#$J$*!"(B`|(\floatheigt)|'$B$H;XDj$r$9$k$H!"(B
% $B%-%c%W%7%g%s$NI}$O%U%m!<%H%*%V%8%'%/%H$N9b$5$H$J$j$^$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
%    \begin{macrocode}
\def\DeclareLayoutCaption#1<#2>(#3)[#4#5]{%
  \expandafter
  \ifx\csname #1@layoutcaption\endcsname\relax \else
    \@latex@info{Redeclaring capiton layout setting of '#1'}%
  \fi
  \expandafter
  \gdef\csname #1@layoutcaption\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}
%    \begin{macrocode}
\DeclareLayoutCaption{figure}<y>(.8\linewidth)[cd]
\DeclareLayoutCaption{table}<y>(.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
%    \begin{macrocode}
\def\pcaption{\refstepcounter\@captype \@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 with `\protect\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\ifmmode\vcenter \else\@pboxswtrue $\vcenter \fi\fi\fi
    {\if u\caption@posb\box\@captionbox\kern\captionfloatsep\fi
     \unvbox\@floatbox
     \if d\caption@posb\kern\captionfloatsep\box\@captionbox\fi}%
    \if r\caption@posb\kern\captionfloatsep\box\@captionbox\fi
    \if@pboxsw \m@th$\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 @layoutcaption\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 @layoutcaption\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#0$NI}$G$O$J$/!"9b$5$K@_Dj$r$7$^$9!#(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
%    \begin{macrocode}
  \if@tempswa \@tempdima\ht0 \else\@tempdima\wd0 \fi
  \ifdim\@tempdima>\captionwidth \@tempdima\captionwidth \fi
  \@pboxswfalse
  \setbox0\hbox{\if@rotsw\ifmmode\@rotswfalse \else $\fi\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#2%*%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#1%*%W%7%g%s$G$NB7$($KAH$_N)$F$^$9!#(B
%
% $B0LCV#2%*%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#1%*%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{ltbox.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@minpage}
% $B0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\X@minipage<#1>{\@ifnextchar[%]
   {\@iminipage<#1>}{\@iiiminipage<#1>{c}\@empty[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iminpage}
% $B9b$5%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\@iminipage<#1>[#2]{\@ifnextchar[%]
   {\@iiminipage<#1>{#2}}{\@iiiminipage<#1>{#2}\@empty[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iiminpage}
% $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}{\@iiiminpage}
% minipage$B4D6-$NFbIt7A<0$G$9!#(B
% \changes{v1.1g}{1996/01/12}{Grouping \cs{@iiiminipage}}
% \cs{levevmode}$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}.}
%    \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
      \global\@minipagetrue %% \global added 24 May 89
      \everypar{\global\@minipagefalse\everypar{}}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\endminpage}
% minipage$B4D6-$N=*N;%3%^%s%I$G$9!#(B
%    \begin{macrocode}
\def\endminipage{%
    \par
    \unskip
    \ifvoid\@mpfootins\else
      \vskip\skip\@mpfootins
      \normalcolor
      \footnoterule
      \unvbox\@mpfootins
    \fi
    \global\@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
%    \begin{macrocode}
\def\parbox{\@ifnextchar<%>
   {\X@parbox}{\X@parbox<Z>}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\X@parbox}
% $B0LCV%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\X@parbox<#1>{\@ifnextchar[%]
   {\@iparbox<#1>}{\@iiiparbox<#1>{c}\@empty[s]}}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@iparbox}
% $B9b$5%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\@iparbox<#1>[#2]{\@ifnextchar[%]
   {\@iiparbox<#1>{#2}}{\@iiiparbox<#1>{#2}\@empty[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}{typo \cs{adjustbaesline}.}
% \changes{v1.1g}{1996/01/12}{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
%    \begin{macrocode}
\long\def\@iiiparbox<#1>#2#3[#4]#5#6{%
  \leavevmode\bgroup
  \setlength\@tempdima{#5}%
  \fork@parbox@option<#1>[#2]%
\if@rotsw
  \@begin@tempboxa\vbox{\box@dir\hsize\@tempdima
    \hbox{$\vbox{\@parboxrestore\adjustbaseline#6\endgraf}\m@th$}}%
\else
  \@begin@tempboxa\vbox{\box@dir
    \hsize\@tempdima\@parboxrestore\adjustbaseline#6\endgraf}%
\fi
    \ifx\@empty#3\relax\else
      \setlength\@tempdimb{#3}%
      \def\@parboxto{to\@tempdimb}%
    \fi
    \@begin@parbox\@parboxto{\box@dir\adjustbaseline
       \let\hss\vss\let\unhbox\unvbox
       \csname bm@#4\endcsname}\@end@parbox
  \@end@tempboxa\egroup}
%    \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
%    \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\cdp\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{\hskip\tbaselineshift$\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\cdp\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{\hskip\tbaselineshift$\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
      \def\@begin@parbox{\lower\cdp\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{\vtop\bgroup\kern\z@\vbox}%
      \let\@end@parbox\egroup
   \else\if #2b\relax
      \def\@begin@parbox{\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}
% \begin{macro}{\X@makepbox}
% \begin{macro}{\@imakepbox}
% $B%*%W%7%g%s$rD4$Y$^$9!#(B
%    \begin{macrocode}
\def\pbox{\leavevmode\@ifnextchar<{\X@makePbox}{\X@makePbox<Z>}}
%
\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}
% \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}
%    \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
    \ifdim #2 <\z@ \hbox{\box@dir#4}\else
    \hbox to#2{\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}
% |\picture|$B$NFbIt7A<0$G$9!##3AHL\$N0z?t$O!"86E@:BI8$G$9!#(B
%    \begin{macrocode}
\def\@@picture<#1>(#2,#3)(#4,#5){%
  \save@ybaselineshift\ybaselineshift
  \save@tbaselineshift\tbaselineshift
  \iftdir
    \if#1y\let\box@dir\yoko
      \@picwd=#3\unitlength \@picht=#2\unitlength
      \@tempdima=#5\unitlength \@tempdimb=#4\unitlength
    \else\let\box@dir\tate
      \@picwd=#2\unitlength \@picht=#3\unitlength
      \@tempdima=#4\unitlength \@tempdimb=#5\unitlength
    \fi
  \else
    \if#1t\let\box@dir\tate
      \@picwd=#3\unitlength \@picht=#2\unitlength
      \@tempdima=#5\unitlength \@tempdimb=#4\unitlength
    \else\let\box@dir\yoko
      \@picwd=#2\unitlength \@picht=#3\unitlength
      \@tempdima=#4\unitlength \@tempdimb=#5\unitlength
    \fi
  \fi
  \setbox\@picbox\hbox to\@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#3<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#4J,$N#1$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
%    \begin{macrocode}
\DeclareRobustCommand\rensuji{%
  \@ifstar{\not@advancelinetrue\@rensuji}{\@rensuji}}
\def\@rensuji{\@ifnextchar[{\@@rensuji}{\@@rensuji[c]}}
\def\@@rensuji[#1]#2{\ifydir\hbox{#2}\else
  \hskip\rensujiskip
  \ifvmode\leavevmode\fi
  \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}
%    \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|\Alpha|$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
%
% \changes{v1.0h}{1996/03/13}{\cs{@Kanji}$B$rDI2C!#1Q8lHG$HF1MM$K$7$?!#(B}
%    \begin{macrocode}
\def\Kanji#1{\expandafter\@Kanji\csname c@#1\endcsname}
\def\@Kanji#1{\expandafter\kansuji\number #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}
%
%    \begin{macrocode}
\def\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
%    \begin{macrocode}
\def\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
