blob: 1223f1bb376e9d26db56c55fd392a4c12c1680c0 (
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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
%%
%% This is file `subeqnarray.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% subeqnarray.dtx (with options: `package')
%%
%% Copyright (C) 1999-2004 Johannes Braams. All rights reserved.
%%
%% This file was generated from file(s) of the subeqnarray package.
%% ----------------------------------------------------------------
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%% http://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of LaTeX
%% version 2003/12/01 or later.
%%
%% This work has the LPPL maintenance status "maintained".
%%
%% The Current Maintainer of this work is Johannes Braams.
%%
%% This file may only be distributed together with a copy of the
%% subeqnarray package. You may however distribute the subeqnarray
%% package without such generated files.
%%
%% The list of all files belonging to the subeqnarray package is
%% given in the file `manifest.txt.
%%
%% The list of derived (unpacked) files belonging to the distribution
%% and covered by LPPL is defined by the unpacking scripts (with
%% extension .ins) which are part of the distribution.
%% Copyright (C) 1988--2004 by Johannes Braams,
%% all rights resserved
%%
%% Error reports please to: J. Braams
%% TeXniek
%% Kooienswater 62
%% 2715 AJ Zoetermeer
%% The Netherlands
%% Email: texniek at braams.cistron.nl
\NeedsTeXFormat{LaTeX2e}[1998/06/01]
\ProvidesPackage{subeqnarray}
[2004/04/15 v2.1c subeqnarray package]
\newcounter{subequation}[equation]
\def\thesubequation{\theequation\alph{subequation}}
\DeclareOption{leqno}{%
\def\@subeqnnum{\hbox to .01\p@{}\rlap{\reset@font\rmfamily
\hskip -\displaywidth(\thesubequation)}}}
\DeclareOption{reqno}{%
\def\@subeqnnum{{\reset@font\rmfamily (\thesubequation)}}}
\DeclareOption{fleqn}{%
\def\subeqn@start{%
\tabskip\mathindent
\abovedisplayskip\topsep
\ifvmode\advance\abovedisplayskip\partopsep\fi
\belowdisplayskip\abovedisplayskip
\belowdisplayshortskip\abovedisplayskip
\abovedisplayshortskip\abovedisplayskip
$$\everycr{}\halign to \linewidth}}% $$
\DeclareOption{deqn}{%
\def\subeqn@start{%
\tabskip\@centering
$$\everycr{}\halign to \displaywidth}}% $$
\DeclareOption*{\OptionNotUsed}
\ExecuteOptions{reqno,deqn}
\ProcessOptions
\newcommand\slabel[1]{%
\@bsphack
\if@filesw
{\let\thepage\relax
\def\protect{\noexpand\noexpand\noexpand}%
\edef\@tempa{\write\@auxout{\string
\newlabel{#1}{{\thesubequation}{\thepage}}}}%
\expandafter}\@tempa
\if@nobreak \ifvmode\nobreak\fi\fi
\fi\@esphack}
\newenvironment{subeqnarray}%
{\stepcounter{equation}%
\def\@currentlabel{\p@equation\theequation}%
\global\c@subequation\@ne
\global\@eqnswtrue\m@th
\global\@eqcnt\z@\let\\\@subeqncr
\subeqn@start
\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@@
\hbox to\z@\bgroup\hss##\egroup\tabskip\z@skip\cr}
{\@@subeqncr\egroup $$\global\@ignoretrue}
\def\@subeqncr{{\ifnum0=`}\fi\@ifstar{\global\@eqpen\@M
\@ysubeqncr}{\global\@eqpen\interdisplaylinepenalty \@ysubeqncr}}
\def\@ysubeqncr{\@ifnextchar [{\@xsubeqncr}{\@xsubeqncr[\z@skip]}}
\def\@xsubeqncr[#1]{\ifnum0=`{\fi}\@@subeqncr
\noalign{\penalty\@eqpen\vskip\jot\vskip #1\relax}}
\def\@@subeqncr{\let\@tempa\relax
\ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}
\or \def\@tempa{&}\else
\let\@tempa\@empty
\@latexerr{Too many columns in subeqnarray environment}\@ehc\fi
\@tempa \if@eqnsw\@subeqnnum\refstepcounter{subequation}\fi
\global\@eqnswtrue\global\@eqcnt\z@\cr}
\newenvironment{subeqnarray*}%
{\def\@subeqncr{\nonumber\@ssubeqncr}\subeqnarray}
{\global\advance\c@equation\m@ne\nonumber\endsubeqnarray}
\let\@ssubeqncr\@subeqncr
\endinput
%%
%% End of file `subeqnarray.sty'.
|