1
% $Header: /u/levy/texts/geomsty/RCS/geomeqns.sty,v 1.6 95/07/01 02:23:17 levy Exp Locker: levy $
3
% format equation numbers like subsection numbers
5
\def\@eqnnum{\hbox{\normalshape\bf \theequation.}}
7
% set equations on left side
9
\def\equation{$$ % $$ BRACE MATCHING HACK
10
\def\object@type{equation}\refstepcounter{equation}}
11
\def\endequation{\leqno \@eqnnum % $$ BRACE MATCHING HACK
12
$$\global\@ignoretrue}
14
\def\eqnarray{\def\object@type{equation}\stepcounter{equation}%
15
\edef\@currentlabel{\theequation}
16
\global\@eqnswtrue\global\@eqcnt\z@\tabskip\@centering\let\\=\@eqncr
17
$$\halign to\displaywidth\bgroup\@eqnsel\hskip\@centering % $$BRACE MATCHING
18
$\displaystyle\tabskip\z@{##}$&\global\@eqcnt\@ne\hfil${}##{}$\hfil
19
&\global\@eqcnt\tw@ $\displaystyle\tabskip\z@{##}$\hfil
20
\tabskip\@centering&\llap{##}\tabskip\z@\cr}
21
\def\endeqnarray{\@@eqncr\egroup
22
\global\advance\c@equation\m@ne$$\global\@ignoretrue}
23
\def\@@eqncr{\let\@tempa\relax
24
\ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}
25
\else \def\@tempa{&}\fi
27
\if@eqnsw\hbox to .01pt{}\rlap{\rm \hskip -\displaywidth\@eqnnum}%
28
\stepcounter{equation}\fi
29
\global\@eqnswtrue\global\@eqcnt\z@\cr}
30
\def\@eqncr{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M
31
\@yeqncr}{\global\@eqpen\interdisplaylinepenalty \@yeqncr}%
32
\edef\@currentlabel{\theequation }}
34
% $Log: geomeqns.sty,v $
35
%Revision 1.6 95/07/01 02:23:17 levy
36
%fixed currentlabel inside eqnarray
38
%Revision 1.5 92/07/13 21:54:29 levy
39
%further cleaned up the environments
41
%Revision 1.4 92/07/13 08:46:04 levy
44
%Revision 1.3 92/04/02 09:08:39 levy
45
%*** empty log message ***
47
%Revision 1.2 1992/03/20 19:17:42 levy
48
%*** empty log message ***