49 lines
1.6 KiB
TeX
49 lines
1.6 KiB
TeX
% FLEQN DOCUMENT-STYLE OPTION - released 04 November 1991
|
|
% for LaTeX version 2.09
|
|
% Copyright (C) 1989,1991 by Leslie Lamport
|
|
|
|
\typeout{Document style option `fleqn' - Released 04 Nov 91}
|
|
|
|
\def\[{\relax\ifmmode\@badmath\else
|
|
\begin{trivlist}%
|
|
\@beginparpenalty\predisplaypenalty
|
|
\@endparpenalty\postdisplaypenalty
|
|
\item[]\leavevmode
|
|
\hbox to\linewidth\bgroup $\m@th\displaystyle
|
|
\hskip\mathindent\bgroup\fi}
|
|
|
|
\def\]{\relax\ifmmode \egroup $\hfil
|
|
\egroup \end{trivlist}\else \@badmath \fi}
|
|
|
|
\def\equation{\@beginparpenalty\predisplaypenalty
|
|
\@endparpenalty\postdisplaypenalty
|
|
\refstepcounter{equation}\trivlist \item[]\leavevmode
|
|
\hbox to\linewidth\bgroup $\m@th% $ TO MAKE DOLLAR NESTING OK
|
|
\displaystyle
|
|
\hskip\mathindent}
|
|
|
|
\def\endequation{$\hfil
|
|
\displaywidth\linewidth\@eqnnum\egroup \endtrivlist}
|
|
|
|
\def\eqnarray{\stepcounter{equation}\let\@currentlabel=\theequation
|
|
\global\@eqnswtrue
|
|
\global\@eqcnt\z@\tabskip\mathindent\let\\=\@eqncr
|
|
\abovedisplayskip\topsep\ifvmode\advance\abovedisplayskip\partopsep\fi
|
|
\belowdisplayskip\abovedisplayskip
|
|
\belowdisplayshortskip\abovedisplayskip
|
|
\abovedisplayshortskip\abovedisplayskip
|
|
$$\m@th\halign
|
|
to\linewidth\bgroup\@eqnsel\hskip\@centering$\displaystyle\tabskip\z@
|
|
{##}$&\global\@eqcnt\@ne \hskip 2\arraycolsep \hfil${##}$\hfil
|
|
&\global\@eqcnt\tw@ \hskip 2\arraycolsep $\displaystyle{##}$\hfil
|
|
\tabskip\@centering&\llap{##}\tabskip\z@\cr}
|
|
|
|
\def\endeqnarray{\@@eqncr\egroup
|
|
\global\advance\c@equation\m@ne$$\global\@ignoretrue
|
|
}
|
|
|
|
\newdimen\mathindent
|
|
\mathindent = \leftmargini
|
|
|
|
\endinput
|