%% %% This is file `deleq.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% deleq.dtx (with options: `paketkod') %% %% Copyright (c) 1994-97 by Mats Dahlgren . %% All rights reserved. See the file `deleq.ins' for information %% on how you may (re-)distribute the `deleq' package files. %% \NeedsTeXFormat{LaTeX2e}[1995/06/01] \ProvidesPackage{deleq}[1997/02/22 v.4.41 Partial equation numbering] \def\deleqver{\textsf{deleq} version 4.41 (February~22, 1997)} \newcounter{deleq}[equation] \newcounter{Deleq} \newlength{\jotbaseline} \renewcommand{\thedeleq}{\ensuremath{\theequation\mathrm{\alph{deleq}}}} \renewcommand{\theDeleq}{\ensuremath{\mathrm{\alph{Deleq}}}} \def\@deleqnnum{(\thedeleq)} \def\@deleqrnum#1{(\ref{#1}\theDeleq)} \def\@eqrnum#1{(\ref{#1})} \def\@deqncr{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M \@ydeqncr}{\global\@eqpen\interdisplaylinepenalty \@ydeqncr}} \def\@ydeqncr{\@ifnextchar [{\@xdeqncr}{\@xdeqncr[\z@]}} \def\@xdeqncr[#1]{\ifnum0=`{\fi}\@@deqncr \noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}} \def\@@deqncr{\let\@tempa\relax \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}% \else \def\@tempa{&}\fi \@tempa \if@eqnsw\@deleqnnum\stepcounter{deleq}\fi \global\@eqnswtrue\global\@eqcnt\z@\cr} \newcommand{\@xeqrcr}[2]{\ifnum0=`{\fi}\@@eqrcr{#2} \noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}} \def\@@eqrcr#1{\let\@tempa\relax \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}% \else \def\@tempa{&}\fi \@tempa \if@eqnsw\@eqrnum{#1}\fi \global\@eqnswtrue\global\@eqcnt\z@\cr} \newcommand{\@xdeqrcr}[2]{\ifnum0=`{\fi}\@@deqrcr{#2} \noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}} \def\@@deqrcr#1{\let\@tempa\relax \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}% \else \def\@tempa{&}\fi \@tempa \if@eqnsw\@deleqrnum{#1}\fi \global\@eqnswtrue\global\@eqcnt\z@\cr} \def\@deqrarcr{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M \@ydeqrarcr}{\global\@eqpen\interdisplaylinepenalty \@ydeqrarcr}} \def\@ydeqrarcr{\@ifnextchar [{\@xdeqrarcr}{\@xdeqrarcr[\z@]}} \def\@xdeqrarcr[#1]{\ifnum0=`{\fi}\@@deqrarcr \noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}} \def\@@deqrarcr{\let\@tempa\relax \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}% \else \def\@tempa{&}\fi \@tempa \global\@eqnswtrue\global\@eqcnt\z@\cr} \newcommand{\nydeleqno}{\stepcounter{equation}\stepcounter{deleq} \let\@currentlabel\thedeleq \eqno (\thedeleq)} \newcommand{\deleqno}{\refstepcounter{deleq} \let\@currentlabel\thedeleq \eqno (\thedeleq)} \newcommand{\reqno}[1]{\setcounter{Deleq}{-1}\refstepcounter{Deleq} \eqno (\ref{#1}) } \newcommand{\rdeqno}[1]{\refstepcounter{Deleq} \eqno (\ref{#1}\theDeleq)} \newcommand{\rndeqno}[1]{\setcounter{Deleq}{0}\refstepcounter{Deleq} \eqno (\ref{#1}\theDeleq)} \newcommand{\eqreqno}[2][0pt]{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M \@xeqrcr{#1}{#2}}{\global\@eqpen\interdisplaylinepenalty \@xeqrcr{#1}{#2}}} \newcommand{\deqreqno}[2][0pt]{\setcounter{Deleq}{0}\refstepcounter{Deleq} {\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M \@xdeqrcr{#1}{#2}}{\global\@eqpen\interdisplaylinepenalty \@xdeqrcr{#1}{#2}}} \newcommand{\ddeqreqno}[2][0pt]{\refstepcounter{Deleq} {\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M \@xdeqrcr{#1}{#2}}{\global\@eqpen\interdisplaylinepenalty \@xdeqrcr{#1}{#2}}} \newcommand{\arrlabel}[1]{\let\@currentlabel\theequation \label{#1}} \newcommand{\nydeqno}{\stepcounter{equation}\stepcounter{deleq}} \newcommand{\heqno}{\stepcounter{equation}} \def\where{\let\@tempa\relax \def\@tempa{& & &} \@tempa {\hbox to .01\p@{}\rlap{\hskip -\displaywidth where}}\cr} \def\rem#1{\let\@tempa\relax \def\@tempa{& & &} \@tempa {\hbox to .01\p@{}\rlap{\hskip -\displaywidth #1}}\cr} \def\@dlqnv{\setlength{\jotbaseline}{\baselineskip}% \addtolength{\jotbaseline}{\jot} \global\@eqnswtrue\m@th \global\@eqcnt\z@\tabskip\@centering $$\halign to\displaywidth\bgroup\@eqnsel\hskip\@centering $\displaystyle\tabskip\z@{##}$&\global\@eqcnt\@ne \hskip 2\arraycolsep \hfil${##}$\hfil &\global\@eqcnt\tw@ \hskip 2\arraycolsep $\displaystyle\tabskip\z@{##}$\hfil \tabskip\@centering&\llap{##}\tabskip\z@\cr} \newenvironment{deqarr}{\stepcounter{equation}\stepcounter{deleq} \let\@currentlabel\thedeleq \let\\\@deqncr \@dlqnv} {\@@deqncr\egroup \global\advance\c@deleq\m@ne$$\global\@ignoretrue} \newenvironment{ddeqar}{\stepcounter{deleq} \let\@currentlabel\thedeleq \let\\\@deqncr \@dlqnv} {\enddeqarr} \newenvironment{deqn}{$$\refstepcounter{equation}\stepcounter{deleq} \let\@currentlabel\thedeleq} {\eqno \hbox{\@deleqnnum} $$\global\@ignoretrue} \newenvironment{ddeqn}{$$\refstepcounter{deleq} \let\@currentlabel\thedeleq} {\enddeqn} \newenvironment{deqrarr}{\let\@currentlabel\theDeleq \let\\\@deqrarcr \@dlqnv} {\@deqrarcr \egroup $$\global\@ignoretrue} \newif\ifl@qn \l@qnfalse \DeclareOption{leqno}{% \global\l@qntrue% \renewcommand{\@deleqnnum}{\hbox to .01\p@{}\rlap{\reset@font\rmfamily \hskip -\displaywidth(\thedeleq)}} \renewcommand{\nydeleqno}{\stepcounter{equation}\stepcounter{deleq} \let\@currentlabel\thedeleq \leqno (\thedeleq)} \renewcommand{\deleqno}{\refstepcounter{deleq} \let\@currentlabel\thedeleq \leqno (\thedeleq)} \renewcommand{\reqno}[1]{\setcounter{Deleq}{-1}\refstepcounter{Deleq} \leqno (\ref{#1}) } \renewcommand{\rdeqno}[1]{\refstepcounter{Deleq} \leqno (\ref{#1}\theDeleq)} \renewcommand{\rndeqno}[1]{\setcounter{Deleq}{0}\refstepcounter{Deleq} \leqno (\ref{#1}\theDeleq)} \renewcommand{\@eqrnum}[1]{\hbox to .01\p@{}\rlap{\reset@font\rmfamily \hskip -\displaywidth(\ref{#1})}} \renewcommand{\@deleqrnum}[1]{\hbox to .01\p@{}\rlap{\reset@font\rmfamily \hskip -\displaywidth(\ref{#1}\theDeleq)}} } \DeclareOption{fleqn}{% \ifl@qn \AtBeginDocument{\addtolength{\mathindent}{1em}} \fi \renewenvironment{deqn}% {\@beginparpenalty\predisplaypenalty \@endparpenalty\postdisplaypenalty \refstepcounter{equation}\stepcounter{deleq} \let\@currentlabel\thedeleq% \trivlist \item[]\leavevmode \hb@xt@\linewidth\bgroup $\m@th% $ \displaystyle \hskip\mathindent}% {$\hfil % $ \displaywidth\linewidth\hbox{\@deleqnnum}% \egroup \endtrivlist} \renewenvironment{ddeqn}% {\@beginparpenalty\predisplaypenalty \@endparpenalty\postdisplaypenalty \refstepcounter{deleq} \let\@currentlabel\thedeleq% \trivlist \item[]\leavevmode \hb@xt@\linewidth\bgroup $\m@th% $ \displaystyle \hskip\mathindent}% {\enddeqn} \renewcommand{\@dlqnv}{% \setlength{\jotbaseline}{\baselineskip} \addtolength{\jotbaseline}{\jot} \global\@eqcnt\z@ \tabskip\mathindent \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 \hskip \tw@\arraycolsep \hfil${##}$\hfil&% \global\@eqcnt\tw@ \hskip \tw@\arraycolsep $\displaystyle{##}$\hfil \tabskip\@centering&% \global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup\tabskip\z@skip\cr} } \DeclareOption*{\OptionNotUsed} \ProcessOptions \endinput %% %% End of file `deleq.sty'.