summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/dotseqn
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:54:20 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:54:20 +0000
commit24645112fad7809b93791757deff2fc0dca7f880 (patch)
tree512199109b20456e1cbe69d10b6fc0cf3501aa4c /Master/texmf-dist/tex/latex/dotseqn
parentb3403dcb21fb73b290d26aa5374e7f0a75e30403 (diff)
dotseqn
git-svn-id: svn://tug.org/texlive/trunk@833 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/dotseqn')
-rw-r--r--Master/texmf-dist/tex/latex/dotseqn/dotseqn.sty77
1 files changed, 77 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/dotseqn/dotseqn.sty b/Master/texmf-dist/tex/latex/dotseqn/dotseqn.sty
new file mode 100644
index 00000000000..60303a42c42
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/dotseqn/dotseqn.sty
@@ -0,0 +1,77 @@
+%%
+%% This is file `dotseqn.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% dotseqn.dtx (with options: `package')
+%%
+%% D O T S E Q N . S T Y is Copyright (c) 1995 by Donald Arseneau
+%%
+%% This file may be freely transmitted and reproduced, but it may not be
+%% changed unless the name is changed also. This notice must remain intact.
+%%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{dotseqn}
+ [1995/03/22 v1.1 \space Dots leading to equation numbers]
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\newcommand\EqnDots{\leaders\hbox{\kern4\p@ .\kern4\p@}\hfill}
+\@ifundefined{mathindent}{\newdimen\mathindent \mathindent\leftmargini}{}
+\renewcommand{\[}{\relax \ifmmode\@badmath \else
+ \begin{trivlist}%
+ \@beginparpenalty\predisplaypenalty \@endparpenalty\postdisplaypenalty
+ \item[]\leavevmode \hbox to\linewidth\bgroup $\m@th\displaystyle %$
+ \hskip\mathindent\bgroup
+ \fi}
+\renewcommand{\]}{\relax\ifmmode \egroup $\hfil% $
+ \egroup \end{trivlist}%
+ \else \@badmath \fi}
+\renewenvironment{equation}%
+ {\@beginparpenalty\predisplaypenalty \@endparpenalty\postdisplaypenalty
+ \refstepcounter{equation}\trivlist \item[]\leavevmode
+ \hbox to\linewidth\bgroup $\m@th% $
+ \displaystyle \hskip\mathindent}%
+ {$\EqnDots % $ Replace `\hfil' with dotted leaders `\EqnDots'.
+ \displaywidth\linewidth\hbox{\@eqnnum}\egroup \endtrivlist}
+\renewenvironment{eqnarray}{%
+ \stepcounter{equation}%
+ \def\@currentlabel{\p@equation\theequation}%
+ \global\@eqnswtrue \m@th \global\@eqcnt\z@ \tabskip\mathindent
+ \let\\\@eqncr \setlength\abovedisplayskip\topsep
+ \ifvmode \addtolength\abovedisplayskip\partopsep \fi
+ \addtolength\abovedisplayskip\parskip
+ \setlength\belowdisplayskip\abovedisplayskip
+ \setlength\belowdisplayshortskip\abovedisplayskip
+ \setlength\abovedisplayshortskip\abovedisplayskip
+ $$\everycr{}\halign to\linewidth% $$
+ \bgroup
+ \hskip\@centering
+ $\displaystyle\tabskip\z@skip{##}$\@eqnsel&%
+ \global\@eqcnt\@ne \hfil${\DEQ@acs##\DEQ@acs}$\hfil&%
+ \global\@eqcnt\tw@ $\displaystyle{##}$\hskip\@centering\cr%
+ }% end of "\begin" part
+ {\@@eqncr
+ \noalign{% vertical skip up to overlay phantom line
+ \penalty\@M \vskip-\prevdepth
+ \edef\@tempa{\omit\span\omit\span\omit % span three columns
+ \vrule\@depth\the\prevdepth \@width\z@ % strut of proper depth
+ \kern-\mathindent \kern\linewidth}% % full line width
+ \nointerlineskip \expandafter % use saved |\@tempa| outside group
+ }\@tempa\cr
+ \egroup
+ \global\advance\c@equation\m@ne$$% $$
+ \global\@ignoretrue
+ }
+\def\@@eqncr{\let\reserved@a\@empty
+ \ifcase\@eqcnt \def\reserved@a{& &}\or \def\reserved@a{&}\fi
+ \reserved@a
+ \if@eqnsw \egroup $\EqnDots \@eqnnum $\bgroup \stepcounter{equation}%
+ \fi \global\@eqnswtrue\global\@eqcnt\z@\cr}
+\def\DEQ@acs{\hskip\tw@\arraycolsep}
+\DeclareOption{leftjust}{\let\@eqnsel\hfil}
+\DeclareOption{nocolsep}{\let\DEQ@acs\null}
+\ProcessOptions
+\endinput
+%%
+%% End of file `dotseqn.sty'.