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