aguplus doc update (22feb09)

git-svn-id: svn://tug.org/texlive/trunk@17156 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 970 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/aguplus/agupp.sty b/Master/texmf-dist/tex/latex/aguplus/agupp.sty
new file mode 100644
index 00000000000..bf3da0a12bc
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/aguplus/agupp.sty
@@ -0,0 +1,970 @@
+
+%%  agupp.sty -- March 29, 1999 version 
+%%  revisions by Jennifer Harvey, AGU, 3/29/99:
+%%  Table breaking problem corrected.
+%%
+%   revisions by Jennifer Harvey, AGU, 8/3/98
+%   Changed \gras journal command to \gji
+%
+%%  revisions by Amy Hendrickson, TeXnology Inc, 1/5/96
+%
+%%  This file (agupp.sty) creates two-column preprint
+%   pages suitable for distribution among colleagues.  
+%   Do not submit two-column output to AGU.
+
+
+\def\revtex@ver{5.01}
+\def\revtex@date{August 3, 1998}
+\def\revtex@org{AGU}
+\def\revtex@jnl{AGU}
+\def\revtex@genre{preprint}
+\typeout{\revtex@org\space \revtex@genre\space substyle, v\revtex@ver\space 
+<\revtex@date>.}
+\def\revtex@pageid{\xdef\@thefnmark{\null} \@footnotetext{This 
+\revtex@genre\space was prepared with 
+\revtex@org{'s}\space \LaTeX\ macros v\revtex@ver. \fmtdate@id}}
+\def\genre@MS{manuscript}
+\def\genre@PP{preprint}
+\ifx\revtex@genre\genre@MS
+\ifnum\@ptsize<2
+\typeout{Warning: Undersize \revtex@genre\space font (1\@ptsize\space pts).
+Use 12pt documentstyle option.}
+\fi
+\fi
+\def\ps@plaintop{\let\@mkboth\@gobbletwo 
+\def\@oddfoot{}\def\@oddhead{\rm\hfil--\space\thepage\space--\hfil} 
+\def\@evenfoot{}\let\@evenhead\@oddhead}
+%\ps@plain
+\textwidth=6.9in
+\textheight=8.6in
+\topmargin=0in
+\headheight=9pt
+\headsep=12pt
+\oddsidemargin=0in
+\evensidemargin=0in
+\parindent=1.2em
+
+\newdimen\saveparindent
+\saveparindent=\parindent
+
+\parskip=0.5ex
+\columnsep=0.5in
+\hoffset=-0.2in
+\def\@tolerant{600}
+\def\@verytolerant{10000}
+\tolerance\@tolerant
+\def\@tightleading{1.1}
+\def\@doubleleading{1.6}
+\let\tighten=\relax
+\let\tightenlines=\tighten
+\let\singlespace=\relax
+\let\doublespace=\relax
+\def\sec@upcase#1{\relax{#1}}
+\def\eqsecnum{
+\@newctr{equation}[section]
+\def\theequation{\hbox{\normalsize\arabic{section}-\arabic{equation}}} }
+\def\@journalname{The Geopolitical Journal} \def\cpr@holder{American 
+Geophysical Union} 
+\def\received#1{\gdef\@recvdate{#1}} \received{} 
+\def\revised#1{\gdef\@revisedate{#1}} \revised{} 
+\def\accepted#1{\gdef\@accptdate{#1}} \accepted{} 
+\def\journalid#1#2{\gdef\@jourvol{#1}\gdef\@jourdate{#2}} 
+\def\articleid#1#2{\gdef\@startpage{#1}\gdef\@finishpage{#2}} 
+\def\paperid#1{\gdef\@paperid{#1}} \paperid{} 
+\def\ccc#1{\gdef\CCC@code{#1}} \ccc{} \def\cpright#1#2{\@nameuse{cpr@#1} 
+\gdef\cpr@year{#2} \typeout{`#1' copyright \cpr@year.}}
+\newcount\@cprtype \@cprtype=\@ne
+\def\cpr@AGU{\@cprtype=1}
+\def\cpr@PD{\@cprtype=2}
+\def\cpr@Crown{\@cprtype=3}
+\def\cpr@none{\@cprtype=4}
+\def\cpr@year{\number\year}
+\def\@slug{\par\noindent
+\ifcase\@cprtype
+\relax
+\or
+Copyright \cpr@year\space by the \cpr@holder.
+\or
+This paper is not subject to U.S. copyright. Published by \cpr@year\space 
+by the \cpr@holder.
+\or
+Published by \cpr@year\space by the \cpr@holder.
+\or
+No copyright is claimed for this article.
+\fi
+\par\noindent
+Paper number \@paperid.\par\noindent \CCC@code
+}
+\def\lefthead#1{\gdef\@versohead{#1}} \lefthead{\relax} 
+\def\righthead#1{\gdef\@rectohead{#1}} \righthead{\relax} 
+\def\@runheads{\@tempcnta\c@page
+\@whilenum \@tempcnta >0\do{
+\vskip 3ex
+\hbox to30pc{\small\expandafter\uppercase\expandafter{\@versohead}:
+\expandafter\uppercase\expandafter{\@rectohead}\hfil}
+\advance\@tempcnta by\m@ne}
+}
+
+
+\def\slugcomment#1{\gdef\slug@comment{#1}} \slugcomment{} 
+\newdimen\@slugcmmntwidth \@slugcmmntwidth\textwidth 
+\long\def\@makeslugcmmnt{\ifx\slug@comment\@empty\relax\else 
+\setbox\@tempboxa\hbox{\slug@comment}
+\ifdim \wd\@tempboxa >\@slugcmmntwidth
+\hbox to\textwidth{\parbox\@slugcmmntwidth\slug@comment\hfil} \else
+\hbox to\textwidth{\box\@tempboxa\hfil} \fi
+\vskip 2ex
+\fi}
+
+\def\@dates{
+\ifx\@recvdate\@empty\relax\else
+{\rm Received}\space\@recvdate\fi% 
+\ifx\@revisedate\@empty\relax\else%
+; \space{\rm revised}\space\@revisedate\fi% 
+\ifx\@accptdate\@empty\else; \space{\rm accepted}\space%
+\@accptdate.\fi%
+}
+
+\def\@authaddrs{\ifx\authaddr@list\@empty\relax \else
+{\normalsize\authaddr@list\vskip1sp} \gdef\authaddr@list{}
+\fi}
+\def\@sluginfo{{\flushleft
+\@dates
+\endflushleft}}
+\let\dates=\relax
+\let\sluginfo=\relax
+\let\forcesluginfo=\relax
+\def\abstract{\if@twocolumn
+\section*{Abstract}
+\else \large \vspace{3em}
+\flushleft{\bf{Abstract}\vspace{-.5em}\vspace{0pt}}\endflushleft 
+\parindent\z@
+\fi}
+\def\title#1{%\thispagestyle{plain}
+\@makeslugcmmnt
+{\flushleft\if@twocolumn\large\else\Large\fi\bf#1\endflushleft}} 
+\def\author#1{{\topsep 0pt\flushleft 
+\if@twocolumn\normalsize\else\vspace{4ex}\large\fi#1\endflushleft}} 
+\def\affil#1{\vspace*{-0.8ex}{\topsep 0pt\flushleft 
+\if@twocolumn\small\else\normalsize\fi\rm#1\endflushleft}} 
+\def\altaffilmark#1{$^{#1}$}
+\def\and{\vspace*{-0.5ex}{\topsep\z@\flushleft and\endflushleft}} 
+\newtoks\@temptokenb
+\def\authaddr@list{}
+\def\authoraddress#1{
+\@temptokena={\vskip-\parskip\noindent\hskip1em#1} 
+\@temptokenb=\expandafter{\authaddr@list} 
+\xdef\authaddr@list{\the\@temptokenb\the\@temptokena}} 
+\let\authoraddr=\authoraddress
+\def\@keywordtext{Subject headings}
+\def\@keyworddelim{---}
+\def\keywords#1{\vspace*{-.7ex}
+\if@twocolumn\noindent{\small{\it\@keywordtext:\/}\space\@kwds{#1}} 
+\else{\quote\if@twocolumn\small\else\large\fi 
+{\it\@keywordtext:\/}\space\@kwds{#1}\endquote}
+\fi}
+\let\subjectheadings=\keywords
+\def\@kwds#1{#1\relax}
+\skip\footins 3ex plus 1ex minus .5ex \footnotesep 2ex
+\newif\if@firstsection \@firstsectiontrue
+
+% Make Section heads with numbers 
+% and text wraps flush left.
+
+\setcounter{secnumdepth}{0}
+
+\def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth
+\let\@svsec\@empty\else
+\refstepcounter{#1}\edef\@svsec{\csname the#1\endcsname.\ \ }\fi%
+%
+\@tempskipa #5\relax
+\ifdim \@tempskipa>\z@
+\begingroup #6\relax
+%\@hangfrom{
+\hskip #3\relax%
+\@svsec%}%
+{\hyphenpenalty10000\relax\interlinepenalty\@M% 
+#8\par}%
+\endgroup
+\csname #1mark\endcsname{#7}\addcontentsline
+{toc}{#1}{\ifnum #2>\c@secnumdepth \else
+\protect\numberline{\csname the#1\endcsname}\fi
+#7}\else
+\def\@svsechd{#6\hskip #3\relax  
+% \relax added 2 May 90
+\@svsec #8\ifnum#2=4:\else\ifnum#2=3.\fi\fi%
+\csname #1mark\endcsname
+{#7}\addcontentsline
+{toc}{#1}{\ifnum #2>\c@secnumdepth \else
+\protect\numberline{\csname 
+the#1\endcsname}\fi
+#7}}\fi
+\@xsect{#5}}
+
+% \@startsection 
+% {NAME}{LEVEL}{INDENT}{BEFORESKIP}{AFTERSKIP}{STYLE} 
+%         optional * [ALTHEADING]{HEADING}
+%    Generic command to start a section. 
+%    NAME       : e.g., `subsection'
+%    LEVEL      : a number, denoting depth of 
+%                 section -- e.g., chapter=1, 
+%                 section = 2, etc.
+%    INDENT     : Indentation of heading from left 
+%                 margin
+%    BEFORESKIP : Absolute value = skip to leave 
+%                 above the heading. If negative, 
+%                 then paragraph indent of text 
+%                 following heading is suppressed.
+%    AFTERSKIP  : if positive, then skip to leave 
+%                 below heading, else negative of 
+%                 skip to leave to right of run-in 
+%                 heading.
+%    STYLE      : commands to set style
+%  If `*' missing, then increments the counter.  
+%  If it is present, then there should be no 
+%  [ALTHEADING] argument.  Uses the counter 
+%  `secnumdepth' whose value is the highest section 
+%  level that is to be numbered.
+
+\def\section{\@startsection{section}{1}{-\parindent} {2.3ex plus 1ex minus 
+.2ex}{1.5ex plus .2ex}{\large\raggedright\bf}} 
+\def\subsection{\@startsection{subsection}{2}{-\parindent} {2ex plus 1ex 
+minus .2ex}{1ex plus .2ex}{\normalsize\raggedright\bf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\parindent} 
+{1sp}{-1em}{\normalsize\bf}}
+\def\subsubsubsection{\@startsection{paragraph}{4}{\parindent} 
+{1sp}{-1em}{\normalsize\bf}}
+\let\paragraph\subsubsubsection
+
+\def\thesection{\@arabic{\c@section}} 
+\def\thesubsection{\thesection.\@arabic{\c@subsection}} 
+\def\thesubsubsection{\thesubsection.\@arabic{\c@subsubsection}} 
+\def\theparagraph{\thesubsubsection.\@arabic{\c@paragraph}}
+
+\def\appendix{\par
+\setcounter{section}{0}
+\setcounter{equation}{0}
+\def\theequation{\hbox{\Alph{section}\arabic{equation}}} 
+\let\body@section=\section
+\def\section{\setcounter{equation}{0} 
+\setcounter{table}{0}\refstepcounter{section}% 
+\def\@currentlabel{\Alph{section}}%
+\body@section*}}
+\newcounter{cureqno}
+
+\newenvironment{mathletters}{\refstepcounter{equation}%
+\setcounter{cureqno}{\value{equation}}%
+\let\@curtheeqn\theequation%
+\edef\cur@eqn{\csname theequation\endcsname}%
+\def\theequation{\cur@eqn\alph{equation}}%
+\setcounter{equation}{0}}%
+{\let\theequation\@curtheeqn%
+\setcounter{equation}{\value{cureqno}}\hskip-4pt\relax}
+
+\def\eqnum#1{\def\theequation{#1}\let\@currentlabel\theequation 
+\addtocounter{equation}{\m@ne}}
+\def\references{\@startsection{section}{1}{\z@}
+{2.3ex plus 1ex minus .2ex}{1.5ex plus .2ex}{\large\bf}*{References} 
+\bgroup\parindent=\z@\parskip=\itemsep 
+\def\refpar{\vskip-\parskip\hangindent=1.2em\hangafter=1}}
+
+\def\endreferences{\refpar\egroup
+% new ==>>
+\vskip12pt
+\footnoterule
+\footnotesize
+\@authaddrs
+\vskip1pt
+\@dates
+\doaltaffils
+% <==
+\revtex@pageid\normalsize}
+
+\def\forcesluginfo{\vskip12pt
+\footnoterule
+\footnotesize
+\@authaddrs
+\vskip1pt
+\@dates
+\doaltaffils
+\revtex@pageid\normalsize}
+
+\def\thebibliography#1{\@startsection{section}{1}{\z@}
+{2.3ex plus 1ex minus .2ex}{1.5ex plus .2ex}{\large\bf}*{References} 
+\list{\null}{\leftmargin 1.2em\labelwidth\z@\labelsep\z@\itemindent -1.2em
+\usecounter{enumi}}
+\def\refpar{\relax}
+\def\newblock{\hskip .11em plus .33em minus .07em} 
+\sloppy\clubpenalty4000\widowpenalty4000 \itemsep=-2.5pt
+\sfcode`\.=1000\relax}
+\def\endthebibliography{\endlist{
+% new ==>> \vskip3pt
+\leftskip-1.2em
+\footnoterule
+\footnotesize
+\@authaddrs
+\vskip1pt
+\@dates
+\doaltaffils
+% <==
+\revtex@pageid}\normalsize}
+
+\def\@biblabel#1{\relax}
+
+\def\reference{\relax\refpar}
+\def\markcite#1{#1\relax}
+
+\def\figurenum#1{\def\thefigure{#1}\let\@currentlabel\thefigure 
+\addtocounter{figure}{\m@ne}}
+
+\let\set@mkcaption=\relax
+\def\set@mkcaptioncont{\long\def\@makecaption##1##2{ \hbox 
+to\pt@width{##1\hfil}\vskip -0.8ex}}
+
+\newcounter{plate}
+\def\theplate{\@arabic\c@plate}
+\def\fps@plate{bp}
+\def\ftype@plate{4}                        \def\ext@plate{lof}
+          \def\fnum@plate{{\bf Plate \theplate.}} 
+\def\plate{\@float{plate}}
+\let\endplate\end@float
+\@namedef{plate*}{\@dblfloat{plate}} \@namedef{endplate*}{\end@dblfloat}
+
+\def\platenum#1{\def\theplate{#1}\let\@currentlabel\theplate 
+\addtocounter{plate}{\m@ne}}
+\def\thefigure{\@arabic\c@figure}
+\def\fnum@figure{{\bf Figure \thefigure.}} \def\thetable{\@arabic\c@table}
+\def\fnum@table{{\bf Table \thetable.}} \def\fps@figure{bp}
+\def\fps@table{bp}
+\def\plotone#1{\centering \leavevmode \epsfxsize=\columnwidth \epsfbox{#1}} 
+\def\plottwo#1#2{\centering \leavevmode \epsfxsize=.45\columnwidth 
+\epsfbox{#1} \hfil \epsfxsize=.45\columnwidth \epsfbox{#2}} 
+\def\plotfiddle#1#2#3#4#5#6#7{\centering \leavevmode \vbox 
+to#2{\rule{0pt}{#2}}
+\special{psfile=#1 voffset=#7 hoffset=#6 vscale=#5 hscale=#4 angle=#3}}
+\let\jnl@style=\it
+\def\ref@jnl#1{{\jnl@style#1}}
+\def\aj{\ref@jnl{Astron.\ J., }} 
+\def\apj{\ref@jnl{Astrophys.\ J., }}
+\def\apjl{\ref@jnl{Astrophys.\ J., }} 
+\def\apjs{\ref@jnl{Astrophys.\ J.\ (Supp.), }} 
+\def\aap{\ref@jnl{Astron.\ Astrophys., }}
+\def\bams{\ref@jnl{Bull.\ Am.\ Meteorol.\ Soc., }} 
+\def\bssa{\ref@jnl{Bull.\ Seismol.\ Soc.\ Am., }} 
+\def\eos{\ref@jnl{Eos Trans.\ AGU, }} 
+\def\epsl{\ref@jnl{Earth Planet.\ Sci.\ Lett., }}
+\def\gca{\ref@jnl{Geochim.\ Cosmochim.\ Acta, }}
+\def\gjras{\ref@jnl{Geophys.\ J.\ R.\ Astron.\ Soc., }} 
+\def\grl{\ref@jnl{Geophys.\ Res.\ Lett., }}
+\def\gsab{\ref@jnl{Geol.\ Soc.\ Am.\ Bull., }}
+\def\jatp{\ref@jnl{J.\ Atmos.\ Terr.\ Phys., }}
+\def\jgr{\ref@jnl{J.\ Geophys.\ Res., }}
+\def\jpo{\ref@jnl{J.\ Phys.\ Oceanogr., }} 
+\def\mnras{\ref@jnl{Mon.\ Not.\ R.\ Astron.\ Soc., }} 
+\def\mwr{\ref@jnl{Mon.\ Weather Rev., }}
+\def\pepi{\ref@jnl{Phys.\ Earth Planet.\ Inter., }}
+\def\pra{\ref@jnl{Phys.\ Rev.\ A, }}
+\def\prl{\ref@jnl{Phys.\ Rev.\ Lett., }}
+\def\pasp{\ref@jnl{Publ.\ A.\ S.\ P., }}
+\def\qjrms{\ref@jnl{Q.\ J.\ R.\ Meteorol.\ Soc., }}
+\def\rg{\ref@jnl{Rev.\ Geophys., }}
+\def\rs{\ref@jnl{Radio Sci., }}
+\def\usgsof{\ref@jnl{U.S.\ Geol.\ Surv.\ Open File Rep., }}
+\def\usgspp{\ref@jnl{U.S.\ Geol.\ Surv.\ Prof.\ Pap., }}
+\let\astap=\aap
+\let\apjlett=\apjl
+\let\apjsupp=\apjs
+
+% Add on, Aug 24, 1995
+\def\lookforpunct{\ifcat\next]\else, \fi} 
+\def\dsr#1{\ifcase#1\or{\it Deep Sea Res.\ Part I}\or%
+{\it Deep Sea Res.\ Part II}\fi\futurelet\next\lookforpunct}
+
+\def\gji{{\frenchspacing\it Geophys. J. Int.}\futurelet\next\lookforpunct}
+
+\def\prb{{\frenchspacing\it Phys. Rev. B Condens. Matter}% 
+\futurelet\next\lookforpunct}
+
+\def\prc{{\frenchspacing\it Phys. Rev. C Nucl. Phys.}% 
+\futurelet\next\lookforpunct}
+
+\def\prd{{\frenchspacing\it Phys. Rev. D Part. Fields}% 
+\futurelet\next\lookforpunct}
+
+\def\pag{{\frenchspacing\it Pure Appl. Geophys.}% 
+\futurelet\next\lookforpunct}
+
+%
+\def\deg{\hbox{$^\circ$}}
+\def\sun{\hbox{$\odot$}}
+\def\earth{\hbox{$\oplus$}}
+\def\lesssim{\mathrel{\hbox{\rlap{\hbox{\lower4pt\hbox{$\sim$}}}\hbox{ 
+$<$}}}}
+\def\gtrsim{\mathrel{\hbox{\rlap{\hbox{\lower4pt\hbox{$\sim$}}}\hbox{$ 
+>$}}}}
+\def\sq{\hbox{\rlap{$\sqcap$}$\sqcup$}} \def\arcmin{\hbox{$^\prime$}}
+\def\arcsec{\hbox{$^{\prime\prime}$}} \def\fd{\hbox{$.\!\!^{\rm d}$}}
+\def\fh{\hbox{$.\!\!^{\rm h}$}}
+\def\fm{\hbox{$.\!\!^{\rm m}$}}
+\def\fs{\hbox{$.\!\!^{\rm s}$}}
+\def\fdg{\hbox{$.\!\!^\circ$}}
+\def\farcm{\hbox{$.\mkern-4mu^\prime$}} 
+\def\farcs{\hbox{$.\!\!^{\prime\prime}$}} 
+\def\fp{\hbox{$.\!\!^{\scriptscriptstyle\rm p}$}} 
+\def\micron{\hbox{$\mu$m}}
+\let\la=\lesssim
+\let\ga=\gtrsim
+\def\case#1#2{\hbox{$\frac{#1}{#2}$}} 
+\def\slantfrac#1#2{\hbox{$\,^#1\!/_#2$}} \def\onehalf{\slantfrac{1}{2}}
+\def\onethird{\slantfrac{1}{3}}
+\def\twothirds{\slantfrac{2}{3}}
+\def\onequarter{\slantfrac{1}{4}}
+\def\threequarters{\slantfrac{3}{4}} \def\ubvr{\hbox{$U\!BV\!R$}} 
+    \def\ub{\hbox{$U\!-\!B$}}
+\def\bv{\hbox{$B\!-\!V$}}
+\def\vr{\hbox{$V\!-\!R$}}
+\def\ur{\hbox{$U\!-\!R$}}
+\def\ion#1#2{#1$\;${\small\rm\@Roman{#2}}\relax} 
+\def\nodata{\multicolumn{1}{c}{$\cdots$}} \newcount\lecurrentfam
+\def\LaTeX{\lecurrentfam=\the\fam \leavevmode L\raise.42ex 
+\hbox{$\fam\lecurrentfam\scriptstyle\kern-.3em A$}\kern-.15em\TeX} 
+\def\sizrpt{
+(\fontname\the\font): em=\the\fontdimen6\font, ex=\the\fontdimen5\font 
+\typeout{
+(\fontname\the\font): em=\the\fontdimen6\font, ex=\the\fontdimen5\font }}
+\def\format@date{\ifcase\month\or January\or February\or 
+March\or April\or May\or June\or
+July\or August\or September\or October\or November\or December\fi 
+\space\number\day, \number\year}
+\def\fmtdate@id{File \jobname\space formatted \format@date.}
+
+% Captions
+
+\let\saveAA\AA
+\def\captionAA{\protect{\footnotesize\saveAA}}
+
+\long\def\@makecaption#1#2{{\let\AA\captionAA \vskip 
+2ex\noindent\parbox{\pt@width}{#1 #2}\par}}
+\long\def\@caption#1[#2]#3{\par\addcontentsline{\csname 
+ext@#1\endcsname}{#1}{\protect\numberline{\csname 
+the#1\endcsname}{\ignorespaces #2}}\begingroup \@makecaption{\csname 
+fnum@#1\endcsname}{\ignorespaces #3}\par \endgroup}
+
+% Changes needed for all styles
+
+% Alternate affiliations appearing 
+% at the end of the article:
+
+\def\altaffiltext#1#2{{\small
+\global\advance\totalaffils by 1
+\expandafter\xdef\csname altaffil#1\endcsname{\noindent\hskip1em$^{#1}${#2}}}}
+
+
+\def\doaltaffils{{\parskip=0pt
+\parindent=0pt
+\loop\ifnum\affilnum<\totalaffils
+\ifnum\affilnum=0
+\goodbreak
+\vskip12pt
+\footnoterule
+\vspace{1sp}\fi
+\csname altaffil\the\affilnum\endcsname \vskip1pt
+\global\advance\affilnum by 1
+\repeat
+\expandafter\ifx\csname altaffil\the\affilnum\endcsname\relax \else
+\csname altaffil\the\affilnum\endcsname\fi \global\affilnum=0
+\global\totalaffils=0
+\vskip12pt
+}}
+\let\doaffils\doaltaffils
+
+\newcount\affilnum
+\affilnum=0
+\newcount\totalaffils
+
+% Changes to citations
+
+\def\newcite{\@ifnextchar 
+[{\@tempswatrue\@citex}{\@tempswafalse\x@citex[]}}
+
+\def\x@citex[#1]#2{\if@filesw\immediate\write\@auxout{\string\citation{#2}}
+\fi
+  \let\@citea\@empty
+  \@cite{\@for\@citeb:=#2\do
+    {\@citea\def\@citea{;\penalty\@m\ }%
+     \def\@tempa##1##2\@nil{\edef\@citeb{\if##1\space##2\else##1##2\fi}}%
+     \expandafter\@tempa\@citeb\@nil
+     \@ifundefined{b@\@citeb}{{\reset@font\bf ?}\@warning
+       {Citation `\@citeb' on page \thepage \space undefined}}%
+% \hbox{ commented out to 
+% let citation break over lines
+\csname b@\@citeb\endcsname    %}
+}}{#1}}
+
+\def\cite{\futurelet\next\lookforbrac}
+
+\def\dobrac[#1]#2{\newcite[#1]{#2}}
+
+\def\donobrac#1{\newcite{#1}}
+
+\def\lookforbrac{\if\next[\let\go\dobrac\else\let\go\donobrac\fi\go}
+
+%
+
+\def\article{\if@twocolumn\relax\else\twocolumn\fi\vskip28pt}
+\def\endarticle{\@normalsize\onecolumn}
+
+
+\def\footnoterule{\kern-3\p@
+  \hrule width 4pc
+  \kern 2.6\p@}
+
+% Make \eqnum work in \eqnarray:
+
+\def\arrayeqnum#1{\gdef\xtheequation{#1}%
+\let\@currentlabel\xtheequation
+\addtocounter{equation}{\m@ne}}
+
+\def\eqnarray{\let\eqnum\arrayeqnum
+% <== to make eqnum work in eqnarray
+\stepcounter{equation}%
+\let\@currentlabel\theequation
+\global\@eqnswtrue\m@th
+\global\@eqcnt\z@\tabskip\@centering\let\\\@eqncr
+$$\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}
+ 
+\def\@@eqncr{\let\@tempa\relax
+    \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}%
+      \else \def\@tempa{&}\fi
+     \@tempa \if@eqnsw\expandafter\ifx\csname xtheequation\endcsname\relax
+\@eqnnum\else(\xtheequation)\global\let\xtheequation\relax\fi
+% <===
+\stepcounter{equation}\fi
+     \global\@eqnswtrue\global\@eqcnt\z@\cr}
+
+%
+
+\def\broadside{\bgroup
+\global\dimen0=\the\textheight
+\global\dimen1=\the\textwidth
+\global\textheight = \dimen1
+\global\textwidth= \dimen0
+\clearpage
+%
+%\thispagestyle{empty}
+%
+\figurewidth{\textwidth}
+\tablewidth{\textwidth}}
+
+\def\endbroadside{\egroup
+\global\textheight\dimen0
+\global\textwidth\dimen1\clearpage}
+
+\let\tableline=\hline
+\newtoks\@temptokena
+\newtoks\@temptokenb
+
+\def\tablenotemark#1{\rlap{$^{\rm #1}$}}
+\def\nodata{\multicolumn{1}{c}{$\cdots$}}
+\newcount\pt@ncol
+\def\tblnote@list{}
+
+\newdimen\pt@width
+\pt@width=\textwidth
+
+\def\tablecaption#1{\gdef\pt@caption{#1}} 
+
+\def\pt@caption{\relax}
+
+\newcount\ampcount
+\def\saveamp{&}
+\def\saveandcountamps{\global\advance\ampcount by1\saveamp}
+\catcode`\&=\active
+
+\def\htabular #1{\def\@halignto{to#1}\@tabular[t]}
+
+\def\xendtabular{\crcr\egroup\egroup}
+
+\let\endhtabular\xendtabular
+
+\def\x@tabular{\let\@acol\@tabacol
+   \let\@classz\@tabclassz
+   \let\@classiv\@tabclassiv \let\\\@tabularcr\@tabarray}
+
+\def\multicolumn#1#2#3{\multispan{#1}\begingroup
+\@mkpream{#2}%
+\def\@sharp{#3}\let\protect\relax
+  \let\@startpbox\@@startpbox\let\@endpbox\@@endpbox
+  \@arstrut \@preamble\hbox{}\endgroup\ignorespaces}
+
+\def\tablecomments#1{\@temptokena={\hskip1em\rm #1\par}%
+\@temptokenb=\expandafter{\tblnote@list}
+\xdef\tblnote@list{\the\@temptokenb\the\@temptokena}}
+
+\let\tablerefs\tablecomments
+
+\def\tablenotetext#1#2{{%
+\@temptokena={\vspace{0.0ex}{%
+\vskip1pt\noindent\strut\hskip1em$^{\rm #1}$#2}\par}%
+\@temptokenb=\expandafter{\tblnote@list}
+\xdef\tblnote@list{\the\@temptokenb\the\@temptokena}}}
+
+\def\spew@tblnotes{
+\ifx\tblnote@list\@empty\relax
+\else
+\vspace{.4ex}
+{\small\tblnote@list}
+\gdef\tblnote@list{}
+\fi}
+
+\def\spew@ptblnotes{\ifx\tblnote@list\@empty\relax
+\else
+\par
+\vspace{2ex}
+{\small\tblnote@list}
+\gdef\tblnote@list{}
+\fi}
+
+\def\continuedcaption{{\bf Table \thetable.} 
+({\rm continued})}
+
+\newbox\tabbox
+\newdimen\totaltabdp
+
+\def\xplanotable{planotable}
+
+\def\HasNoWidth#1{\cr\noalign{\vskip-2ex}%
+\multicolumn{\the\finalcolcount}{c}{$\vcenter{\parindent=0pt
+\hsize=.5\hsize
+\center\baselineskip=14pt\relax%
+\it\relax#1
+\endcenter\vskip1sp}$}\cr%
+\noalign{\vskip-2ex}}
+
+\def\haswidth#1{\cr\noalign{\center\baselineskip=14pt\relax%
+\hsize=\pt@width
+\it\relax\vskip-14pt#1}}
+
+\def\cutinhead#1{\ifdim\pt@width=0pt\let\go\HasNoWidth\else%
+\let\go\haswidth\fi\go{#1}}
+
+\def\xend{\end}
+\def\lookforending{%
+\ifx\next\end
+\global\let\xgo\pickuparg\else
+\global\let\xgo\xendline\fi\xgo}
+
+\def\pickuparg#1#2{\def\two{#2}\ifx\two\xplanotable
+\gdef\ygo{\end{planotable}}\else\gdef\ygo{#1#2\endline}\fi\ygo}
+
+\def\endline{\futurelet\next\lookforending}
+
+\long\def\xendline#1\nl{\let&\saveandcountamps
+\setbox0=\vbox{\hbox{\tabular[t]{\pt@format}
+#1\cr\doendtabular}}%
+\ifnum\ampcount>\finalcolcount \global\finalcolcount=\ampcount\fi
+\global\ampcount=0
+\ifdim\wd0>\insidetablewd
+\global\insidetablewd=\wd0\fi
+\global\advance\totaltabdp by\ht0
+\global\advance\totaltabdp by\dp0
+\ifdim\totaltabdp >.85\textheight\global\let\zgo\endpage\else
+\global\let\zgo\endline\fi#1\cr\let&\relax\zgo}%% 
+
+\def\endpage{\crcr\noalign{\vskip-\the\baselineskip\hrule\vskip4pt}
+\doendtabular\egroup%
+\expandafter\ifx\csname pt@caption\endcsname\relax
+\else
+\noindent%
+{\bf Table \thetable.} \pt@caption \vskip10pt\global\let\pt@caption\relax
+\fi
+\noindent\unvbox\tabbox
+\newpage
+\global\totaltabdp=0pt
+\startcontinueddata}
+
+\def\dofirstpreamble{\htabular{\the\pt@width}{@{\extracolsep{\fill}}
+\pt@format}}
+\def\dofirstend{\endhtabular}
+
+\def\dosecondpreamble{\tabular[t]{\pt@format}}
+
+\def\dosecondend{\endtabular}
+
+\newdimen\insidetablewd
+
+\def\startdata{\advance\totaltabdp by \the\baselineskip
+\let\endtabular\xendtabular
+\let\@tabular\x@tabular
+\let&\saveamp
+\setbox\tabbox=\vbox\bgroup%
+%
+\ifdim\pt@width=0pt\relax%
+\gdef\dopreamble{\dosecondpreamble}%
+\gdef\doendtabular{\dosecondend}%
+\else%
+\gdef\dopreamble{\dofirstpreamble}%
+\gdef\doendtabular{\dofirstend}%
+\fi\dopreamble\pt@head\cr%
+\noalign{\vskip-\the\baselineskip
+\global\finalcolcount=\the\pt@ncol\relax}
+\let&\relax
+\xendline}
+
+\def\xrelax{\relax}
+
+\def\startcontinueddata{\let&\saveamp
+\let\endtabular\xendtabular
+\let\@tabular\x@tabular
+\setbox\tabbox=\vbox\bgroup%
+%
+\ifx\pt@caption\xrelax\else
+\hbox{\continuedcaption}\fi
+\let&\saveamp
+\setbox0=\vbox{\tabular[t]{\pt@format}\pt@head\cr\doendtabular}%
+\global\advance\totaltabdp by\ht0
+\global\advance\totaltabdp by\dp0
+\advance\totaltabdp by\the\baselineskip
+\ifdim\wd0>\insidetablewd
+\global\insidetablewd=\wd0\fi
+%
+\dopreamble\pt@head\cr%
+\noalign{\vskip-\the\baselineskip}%
+\let&\relax\xendline}
+
+\let\nl\relax
+
+\long\def\pickupend#1\end#2{\def\two{#2}\ifx\two\xplanotable
+\gdef\ago{#1\nl\end{planotable}}\else
+\gdef\ago{#1\end{#2}\pickupend}\fi\ago}
+
+\def\planotable#1{\clearpage%
+\global\pt@width=0pt
+\catcode`\&=\active
+\let\ltx@label=\label\gdef\pt@label{\let\label=\ltx@label}%
+\def\label##1{\gdef\pt@labeltag{##1}%
+\gdef\pt@label{\ltx@label{\pt@labeltag}\let\label=\ltx@label}}
+\global\advance\c@table by 1\relax
+\def\@captype{table}\def\pt@format{#1}\pickupend}
+
+\def\endplanotable{\crcr
+\noalign{\vskip-\the\baselineskip\hrule}
+\doendtabular
+\egroup%
+\hsize=\wd\tabbox
+\expandafter\ifx\csname pt@caption\endcsname\relax
+\else
+\noindent%
+{\bf Table \thetable.} \pt@caption \vskip10pt\global\let\pt@caption\relax
+\fi
+\noindent\unvbox\tabbox
+\pt@label
+\vskip1sp
+%
+\spew@ptblnotes
+\vskip1sp
+\hsize=\textwidth
+\catcode`\&=4
+\global\pt@ncol=0
+\gdef\pt@caption{\relax}
+\global\totaltabdp=0pt
+\global\pt@width=\textwidth\relax\gdef\thespnum{}}
+
+\edef\tablewidth#1{\global\pt@width=#1}
+\let\platewidth=\tablewidth
+
+\def\tablehead#1{\gdef\pt@head{\noalign{\hrule\vskip3pt}
+#1\strut\cr\noalign{\vskip3pt\hrule}}}
+
+\def\colhead#1{\hfill\relax #1\global\advance\pt@ncol by\@ne\hfill\relax}
+
+\newcount\finalcolcount
+
+% Tablenum
+%
+% If a letter is given preceding the number, that letter
+% is assumed to be an appendix letter and is repeated on
+% following tables until a new appendix letter is given.
+% If a letter follows the table number, it is used for
+% that table number only.
+
+\let\thespnum\relax
+\def\saveapos{'}
+\def\savedoll{$}
+\def\dodollars#1${\xdef\thespnum{$#1$}}
+
+\def\gotokazowee#1\kazowee{\xdef\thespnum{\x#1}}
+\def\xkazowee{\kazowee}
+\def\kazowee{\relax}
+\def\xrelax{\relax}
+
+\def\loopthru#1{\def\x{#1}\ifx\x\xkazowee\let\go\relax\else
+\ifx\x\savedoll\let\go\dodollars\else
+\ifx\x\xrelax\let\go\relax\else
+\let\go\loopthru
+\expandafter\ifcat\x 8\ifx\x\saveapos\xdef\thespnum{'}\fi\else%
+\let\go\gotokazowee\fi\fi\fi\fi\go}
+
+\def\lookforletter#1#2#3\relax{\def\two{#2}
+\ifx\two\empty\global\c@table=#1\relax\else
+\def\x{#1}\def\y{#2}
+\ifcat\x a
+\ifcat\y a\gdef\theletter{#1#2}\def\test{#3}
+% in case there are 2 letters
+\else\def\test{#2#3}\gdef\theletter{#1}\fi
+% in case there is one letter
+%
+\expandafter\loopthru\test\kazowee
+\setbox0=\hbox{\global\c@table=\test}\else
+\def\test{#1#2#3}\expandafter\loopthru\test\kazowee
+\setbox0=\hbox{\global\c@table=\test}
+\gdef\theletter{\relax}\fi\fi}
+
+\def\tablenum#1{\def\xone{#1}\expandafter\lookforletter\xone\relax
+\global\let\@currentlabel\thetable\relax\relax}
+%
+
+\def\thetable{\theletter\the\c@table\thespnum}
+
+\let\theletter\relax
+
+\def\endtable{\spew@tblnotes\end@float}
+
+\def\tablevspace#1{\noalign{\vskip{#1}}}
+
+\def\tablebreak{\global\totaltabdp=2\textheight\relax}
+
+\catcode`\&=4
+
+%
+
+\def\ps@plaintop{\let\@mkboth\@gobbletwo
+\def\@oddfoot{}\def\@oddhead{\rm\hfil\thepage}
+\def\@evenfoot{}\let\@evenhead\@oddhead}
+\ps@plaintop
+
+\let\saveenddocument\enddocument
+\def\enddocument{\@runheads\saveenddocument}
+
+\newif\ifprintcallout
+\printcallouttrue
+\def\nocallouts{\global\printcalloutfalse}
+\def\callout#1{#1\ifprintcallout\marginpar{\fbox{\large#1}}\fi}
+
+% Reset these to more generous 
+% values to make it easier to 
+% position floats.
+
+\setcounter{topnumber}{10}
+\setcounter{bottomnumber}{10}
+
+\def\topfraction{.99}
+\def\bottomfraction{.99}
+\def\textfraction{.01}
+\def\floatpagefraction{.5}
+
+\setcounter{totalnumber}{20}
+
+\setcounter{dbltopnumber}{2}
+\def\dbltopfraction{.7}
+\def\dblfloatpagefraction{.5}
+
+% Macros to make caption and tablenotes 
+% be the width of the table in 
+% \begin{table}\begin{tabular}...
+% \end{tabular}\end{table}
+
+\let\savetabular\tabular
+\let\saveendtabular\endtabular
+
+\newdimen\tabwidth
+
+\def\ytabular{\global\setbox\tabbox=\hbox\bgroup\hsize=0pt\savetabular}
+\def\endytabular{\saveendtabular\egroup}
+
+\let\savetable\table
+\let\saveendtable\endtable
+
+\let\savecaption\caption
+\def\docaption#1{\gdef\currcaption{#1}}
+
+\let\savetablenum\tablenum
+\def\tabtablenum#1{\savetablenum{#1}\global\advance\c@table-1\relax}
+
+\let\savelabel\label
+\newcount\labnum
+\newcount\labloopnum
+\def\keeplabel#1{\global\advance\labnum by 1
+\expandafter\gdef\csname label\the\labnum\endcsname{#1}}
+
+\def\dolabel{\labloopnum=1\loop
+\ifnum\labloopnum<\labnum
+\savelabel{\csname label\the\labloopnum\endcsname}
+\global\advance\labloopnum by 1
+\repeat
+\ifnum\labnum=0\else
+\savelabel{\csname label\the\labloopnum\endcsname}\fi
+\global\labloopnum=0
+\global\labnum=0
+\relax}
+
+\newbox\tablebox
+\def\table{\setbox\tablebox=\vbox\bgroup\let\tabular\ytabular
+\let\endtabular\endytabular
+\let\caption\docaption
+\let\tablenum\tabtablenum
+\let\label\keeplabel
+\def\@captype{table}\tablook}
+
+\newcount\tabnotecount
+\newcount\loopnotecount
+
+\def\endtable{{\hsize=\wd\tabbox
+\ifx\currcaption\relax\else
+\savecaption{\hsize=\wd\tabbox\currcaption}\fi
+\global\tabwidth=\wd\tabbox
+\vskip9pt
+\noindent\unhbox\tabbox 
+\vskip-6pt
+\spew@tblnotes}\egroup
+\vbox{\unvbox\tablebox}
+\dolabel\gdef\thespnum{}}
+
+\def\addtotabnum#1{\gdef\thespnum{#1}}
+\let\thespnum\relax
+
+%
+\def\acknowledgments{\vskip-\lastskip\vskip12pt\indent{\small\bf
+Acknowledgments.}\quad\small}
+
+\def\acknowledgment{\vskip-\lastskip\vskip12pt\indent{\small\bf 
+Acknowledgment.}%
+\quad\small}
+
+\let\acknowledgements=\acknowledgments 
+     \let\acknowledgement=\acknowledgment
+
+     \def\figurewidth#1{\hsize=#1}
+
+%
+
+     \def\lookbrac{\if\next[\let\go\catchbrac\else\let\go\relax\fi\go}
+     \def\catchbrac[#1]{\relax}
+
+     \def\figure{\bgroup%
+     \def\@captype{figure}\futurelet\next\lookbrac}
+     \let\endfigure\egroup
+
+     \def\tablook{\futurelet\next\lookbrac}
+
+% Jan. 4, 1996
+
+     \def\lefthead#1{\relax}
+     \def\righthead#1{\relax}
+
+     \let\@runheads\relax