[PromiseBook] / trunk / burgess.sty Repository:
ViewVC logotype

Annotation of /trunk/burgess.sty

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1 - (view) (download) (as text)

1 : mark 1 % burgess.sty
2 :     % last modified by alison woollatt, 1-nov-2001
3 :    
4 :     % subeqn.sty follows
5 :     % Copyright (c) 1990 by Stephen Gildea
6 :     % Permission to copy all or part of this work is granted, provided
7 :     % that the copies are not made or distributed for resale, and that
8 :     % the copyright notice and this notice are retained.
9 :     % Modified for use with JFM/LaTeX2e.
10 :    
11 :     \AtBeginDocument{%
12 :     \ifuseAMSsubequ \else
13 :     \global\let\subequations\CUPsubequations
14 :     \global\let\endsubequations\endCUPsubequations
15 :     \fi
16 :     }
17 :    
18 :     \newif\ifuseAMSsubequ
19 :     \newcommand\useAMSsubequations{\global\useAMSsubequtrue}
20 :    
21 :     \newtoks\@stequation
22 :    
23 :     \newenvironment{CUPsubequations}
24 :     {\refstepcounter{equation}%
25 :     \edef\@savedequation{\the\c@equation}%
26 :     \@stequation=\expandafter{\theequation}%
27 :     \edef\@savedtheequation{\the\@stequation}%
28 :     \edef\oldtheequation{\theequation}%
29 :     \setcounter{equation}\z@
30 :     \def\theequation{\oldtheequation{\itshape\alph{equation}}}}
31 :     {\setcounter{equation}{\@savedequation}%
32 :     \@stequation=\expandafter{\@savedtheequation}%
33 :     \edef\theequation{\the\@stequation}\global\@ignoretrue}
34 :    
35 :     \newcommand\returnthesubequation{%
36 :     \gdef\thesubequation{\theequation{\itshape\@alph\c@subequation}}}
37 :    
38 :     % subeqnarray.sty
39 :     % Copyright (C) 1988 by Johannes Braams, Dr Neher Laboratories
40 :     % Modified for use with JFM/LaTeX2e.
41 :    
42 :     \newcounter{subequation}[equation]
43 :     \renewcommand\thesubequation{\theequation{\itshape\@alph\c@subequation}}
44 :     \def\@subeqnnum{{\normalfont\rmfamily (\thesubequation)}}
45 :    
46 :     \newcommand\slabel[1]{\@bsphack % MODIFIED IN LINE WITH LATEX.LTX
47 :     \protected@write\@auxout{}%
48 :     {\string\newlabel{#1}{{\thesubequation}{\thepage}}}%
49 :     \@esphack}
50 :    
51 :     \newenvironment{subeqnarray} % MODIFIED IN LINE WITH LATEX.LTX
52 :     {\stepcounter{equation}%
53 :     \let\@currentlabel=\theequation
54 :     \global\c@subequation\@ne
55 :     \global\@eqnswtrue
56 :     \m@th
57 :     \global\@eqcnt\z@
58 :     \tabskip\@centering
59 :     \let\\\@subeqncr
60 :     $$\everycr{}\halign to\displaywidth\bgroup
61 :     \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
62 :     &\global\@eqcnt\@ne \hfil${\;##\;}$\hfil
63 :     &\global\@eqcnt\tw@
64 :     $\displaystyle\tabskip\z@skip{##}$\hfil\tabskip\@centering
65 :     &\hb@xt@\z@\bgroup\hss##\egroup
66 :     \tabskip\z@skip \cr}
67 :     {\@@subeqncr\egroup $$\global\@ignoretrue}
68 :    
69 :     \def\@subeqncr{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M
70 :     \@ysubeqncr}{\global\@eqpen\interdisplaylinepenalty \@ysubeqncr}}
71 :    
72 :     \def\@ysubeqncr{\@ifnextchar [{\@xsubeqncr}{\@xsubeqncr[\z@]}}
73 :    
74 :     \def\@xsubeqncr[#1]{\ifnum0=`{\fi}\@@subeqncr
75 :     \noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}}
76 :    
77 :     \def\@@subeqncr{\let\@tempa\relax
78 :     \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}
79 :     \else \def\@tempa{&}\fi
80 :     \@tempa \if@eqnsw\@subeqnnum\refstepcounter{subequation}\fi
81 :     \global\@eqnswtrue\global\@eqcnt\z@\cr}
82 :    
83 :     \let\@ssubeqncr=\@subeqncr
84 :     \newenvironment{subeqnarray*}
85 :     {\def\@subeqncr{\nonumber\@ssubeqncr}\subeqnarray}
86 :     {\global\advance\c@equation\m@ne \nonumber\endsubeqnarray}
87 :    
88 :     \renewenvironment{eqnarray} % MODIFIED IN LINE WITH LATEX.LTX
89 :     {\stepcounter{equation}%
90 :     \let\@currentlabel=\theequation
91 :     \global\@eqnswtrue
92 :     \m@th
93 :     \global\@eqcnt\z@
94 :     \tabskip\@centering
95 :     \let\\\@eqncr
96 :     $$\everycr{}\halign to \displaywidth\bgroup
97 :     \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
98 :     &\global\@eqcnt\@ne \hfil${\;##\;}$\hfil
99 :     &\global\@eqcnt\tw@
100 :     $\displaystyle\tabskip\z@skip{##}$\hfil \tabskip\@centering
101 :     &\hb@xt@\z@\bgroup\hss##\egroup
102 :     \tabskip\z@skip \cr}
103 :     {\@@eqncr\egroup\global\advance\c@equation\m@ne
104 :     $$\global\@ignoretrue}
105 :    
106 :     % revert to arabic footnotes
107 :    
108 :     \renewcommand\thefootnote{\mbox{\scriptsize\arabic{footnote}}}
109 :     \renewcommand\@makefnmark{\@textsuperscript{\normalfont\@thefnmark}} % FROM LATEX.LTX
110 :    
111 :     \newdimen\oneem \oneem=1em
112 :     \renewcommand\@makefntext[1]{%
113 :     \@setpar{\@@par\@tempdima \hsize
114 :     \advance\@tempdima-\oneem
115 :     \parshape \@ne \oneem \@tempdima}\par
116 :     \noindent \hb@xt@\z@{\hss\@makefnmark$\,$}#1}
117 :    
118 :     \endinput

Administrator
ViewVC Help
Powered by ViewVC 1.0.3