Go to most recent revision | Blame | Last modification | View Log | RSS feed
% ****** Start of file aipproc.sty ******
%
%
% This file is adapted from the REVTeX 3.0 distribution.
%
% The bug with figure caption is fixed. 1/17/96
%
% Copyright (c) 1995 The American Physical Society.
%
%
\typeout{Filename: aipproc.sty, v1.0 <11 May 95>}
\def\@revmess#1#2{\typeout{aipproc #1: #2}}
\newif\ifpreprintsty \global\preprintstyfalse
% The normal (default) type size is set to 12pt --- all font size options
% (such as 11pt, 12pt) are ignored. fonts are defined in this file!
\@namedef{ds@11pt}{\typeout{AIPBOOK Warning: Your option '11pt' is ignored!}}
\@namedef{ds@12pt}{\relax} % do nothing
\def\@ptsize{2}
\def\ds@twoside{\@twosidetrue %
\@mparswitchtrue} %
\def\ds@twocolumn{\@twocolumntrue}
\newif\if@amsfonts \@amsfontsfalse
\def\ds@amsfonts{\@amsfontstrue}
\newif\if@amssymbols \@amssymbolsfalse
\def\ds@amssymb{\@amssymbolstrue}
\newif\if@longtable \@longtablefalse
\def\ds@longtable{\@longtabletrue}
\newif\if@floats \@floatstrue
\newif\ifsecnumbers \global\secnumbersfalse
\@options
%from aps.sty
% ****** Start of file aps.sty (part of it) ******
\def\partname{Part}
\def\contentsname{Contents}
\def\listfigurename{List of Figures}
\def\listtablename{List of Tables}
\def\refname{REFERENCES}
\def\indexname{Index}
\def\figurename{FIG.}
\def\tablename{TABLE}
\def\abstractname{Abstract}
\newif\iffirstfig \global\firstfigtrue
\newif\iffirsttab \global\firsttabtrue
\def\tightenlines{\def\baselinestretch{1}\small\normalsize}
\let\tighten\tightenlines
%%%%
\ifx\selectfont\undefined %
\@revmess{message}{NFSS not detected. Assuming OFSS.}
\let\reset@font\relax
\def\mathhexbox{\protect\mathhexbox@}
\def\mathhexbox@#1#2#3{\relax
\ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%
\else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}
\def\text#1{%
\relax
\ifmmode %
\mathchoice
{\hbox{\everymath{\displaystyle}\rm #1}}%
{\hbox{\everymath{\textstyle}\rm #1}}%
{\hbox{\everymath{\scriptstyle}%
\def\prm{\fam\z@ \the\scriptfont\z@ \relax}%
\def\pit{\fam\itfam \the\scriptfont\itfam \relax}%
\rm #1}%
}%
{\hbox{\everymath{\scriptscriptstyle}%
\def\prm{\fam\z@ \the\scriptscriptfont\z@ \relax}%
\def\pit{\fam\itfam \the\scriptscriptfont\itfam \relax}%
\rm #1}%
}%
\else %
\leavevmode\hbox{#1}%
\fi
}
\def\bbox#1{%
\leavevmode\text{%
\textfont0 \the\textfont\bffam
\scriptfont0 \the\scriptfont\bffam
\scriptscriptfont0 \the\scriptscriptfont\bffam
\@temptokena\everymath \boldmath \everymath\@temptokena
{$\m@th\relax#1$}%
}%
}
\font\fivbf=cmbx5 \font\sixbf=cmbx6 \font\sevbf=cmbx7 \font\egtbf=cmbx8
\expandafter\def\expandafter\ixpt\expandafter{\ixpt
\scriptfont\bffam\sixbf \scriptscriptfont\bffam\fivbf}
\expandafter\def\expandafter\xpt\expandafter{\xpt
\scriptfont\bffam\sevbf \scriptscriptfont\bffam\fivbf}
\expandafter\def\expandafter\xipt\expandafter{\xipt
\scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}
\expandafter\def\expandafter\xiipt\expandafter{\xiipt
\scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}
\expandafter\def\expandafter\xivpt\expandafter{\xivpt
\scriptfont\bffam\tenbf \scriptscriptfont\bffam\sevbf}
\else %
\@revmess{message}{NFSS detected! Assuming NFSS.}
\def\text#1{%
\relax\ifmmode
\mathchoice
{\hbox{{\everymath{\displaystyle}#1}}}%
{\hbox{{\everymath{\textstyle}#1}}}%
{\hbox{{\everymath{\scriptstyle}\let\f@size\sf@size\selectfont#1}}}%
{\hbox{{\everymath{\scriptscriptstyle}\let\f@size\ssf@size\selectfont#1}}}%
\glb@settings
\else
\mbox{#1}%
\fi
}
\def\bbox#1{%
\relax\ifmmode
\mathchoice
{{\hbox{\boldmath$\displaystyle#1$}}}%
{{\hbox{\boldmath$\textstyle#1$}}}%
{{\hbox{\boldmath$\scriptstyle#1$}}}%
{{\hbox{\boldmath$\scriptscriptstyle#1$}}}%
\glb@settings
\else
\mbox{#1}%
\fi
}
\def\mathhexbox{\protect\mathhexbox@}
\def\mathhexbox@#1#2#3{\relax
\ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%
\else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}
\fi
%%%%
%from aps10.sty\relax
%%%%%
% ****** Start of file aps10.sty (part of it) ******
%
\lineskip 1pt
\normallineskip 1pt
\def\baselinestretch{1}
%%%
\let\@normalsize\normalsize
%%%%
\def\normalsize{\@setsize\normalsize{14pt}\xiipt\@xiipt
\abovedisplayskip 12\p@ plus3\p@ minus7\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3\p@
\belowdisplayshortskip 6.5\p@ plus3.5\p@ minus3\p@
\let\@listi\@listI} % Setting of \@listi added 9 Jun 87
\def\small{\@setsize\small{13.6pt}\xipt\@xipt
\abovedisplayskip 11\p@ plus3\p@ minus6\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3\p@
\belowdisplayshortskip 6.5\p@ plus3.5\p@ minus3\p@
\def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87
\parsep 4.5\p@ plus2\p@ minus\p@ \itemsep \parsep
\topsep 9\p@ plus3\p@ minus5\p@}}
\def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
\abovedisplayskip 10\p@ plus2\p@ minus5\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3\p@
\belowdisplayshortskip 6\p@ plus3\p@ minus3\p@
\def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87
\topsep 6\p@ plus2\p@ minus2\p@\parsep 3\p@ plus2\p@ minus\p@
\itemsep \parsep}}
\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
\def\large{\@setsize\large{18pt}\xivpt\@xivpt}
\def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
\def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
\def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
\let\Huge=\huge
\normalsize
\marginparsep 6pt
\topmargin -61pt
\columnsep 1.5pc
\columnseprule 0pt
\footnotesep 9.25pt
%\skip\footins 39pt plus 4pt minus 2pt
\floatsep 12pt plus 2pt minus 2pt
\textfloatsep 20pt plus 2pt minus 4pt
\intextsep 12pt plus 2pt minus 2pt
\@maxsep 20pt
\dblfloatsep 12pt plus 2pt minus 2pt
\dbltextfloatsep 20pt plus 2pt minus 4pt
\@dblmaxsep 20pt
\@fptop 0pt plus 1fil
\@fpsep 8pt plus 2fil
\@fpbot 0pt plus 1fil
\@dblfptop 0pt plus 1fil
\@dblfpsep 8pt plus 2fil
\@dblfpbot 0pt plus 1fil
\marginparpush 5pt
\parskip 0pt plus 1pt
\parindent 1em
\partopsep 2pt plus 1pt minus 1pt
\@lowpenalty 51
\@medpenalty 151
\@highpenalty 301
\@beginparpenalty -\@lowpenalty
\@endparpenalty -\@lowpenalty
\@itempenalty -\@lowpenalty
\newif\if@mainhead
\setcounter{secnumdepth}{4}
\newif\ifappendixon \global\appendixonfalse
\def\appendix{\par\global\appendixontrue
\setcounter{section}{0}
\setcounter{subsection}{0}
\setcounter{subsubsection}{0}
\def\thesection{\Alph{section}}
\def\thesubsection{\arabic{subsection}}
\def\thesubsubsection{\alph{subsubsection}}
\def\theequation@prefix{\thesection}
\@addtoreset{equation}{section}
\addcontentsline{toc}{section}{\protect\numberline{APPENDIXES\hskip
0pt plus1fill minus1fill\relax}{}}
}
\leftmargini 25pt
\leftmarginii 22pt
\leftmarginiii 18.7pt
\leftmarginiv 17pt
\leftmarginv 10pt
\leftmarginvi 10pt
\leftmargin\leftmargini
\labelsep 4pt
\labelwidth\leftmargini\advance\labelwidth-\labelsep
\def\@listI{\leftmargin\leftmargini \parsep 4\p@ plus2\p@ minus\p@
\topsep 8\p@ plus2\p@ minus4\p@
\itemsep 4\p@ plus2\p@ minus\p@}
\let\@listi\@listI
\@listi
\def\@listii{\leftmargin\leftmarginii
\labelwidth\leftmarginii\advance\labelwidth-\labelsep
\topsep 4\p@ plus2\p@ minus\p@
\parsep 2\p@ plus\p@ minus\p@
\itemsep \parsep}
\def\@listiii{\leftmargin\leftmarginiii
\labelwidth\leftmarginiii\advance\labelwidth-\labelsep
\topsep 2\p@ plus\p@ minus\p@
\parsep \z@ \partopsep \p@ plus\z@ minus\p@
\itemsep \topsep}
\def\@listiv{\leftmargin\leftmarginiv
\labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
\def\@listv{\leftmargin\leftmarginv
\labelwidth\leftmarginv\advance\labelwidth-\labelsep}
\def\@listvi{\leftmargin\leftmarginvi
\labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
\def\case{\protect\@case}
\def\@case#1#2{%
\def\@tempa{#2}\def\@tempb{/}%
\ifx\@tempa\@tempb %
\def\@tempa{\@@case{#1}}%
\else %
\def\@tempa{\@@case{#1}{#2}}%
\fi
\@tempa
}
\def\@@case#1#2{{\textstyle{#1\over#2}}}
%\@namedef{tabular*}{\tabular}
\expandafter \def\csname tabular*\endcsname #1{\def\@halignto{to#1}\@tabular}
\@namedef{endtabular*}{\endtabular}
%%%% beginninf of the AAS symbols block
%%%% this block is from aasms.sty --- except we use
%%%% sslantfrac instead of slantfrac
\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\arcdeg{\hbox{$^\circ$}}
\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\sslantfrac#1#2{\hbox{$\,^#1\!/_#2$}}
\def\onehalf{\sslantfrac{1}{2}}
\def\onethird{\sslantfrac{1}{3}}
\def\twothirds{\sslantfrac{2}{3}}
\def\onequarter{\sslantfrac{1}{4}}
\def\threequarters{\sslantfrac{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$}}
%%%%
%%%% end of the AAS symbols block
\if@amssymbols %
\def\@tempa{%
\let\gtrsim\undefined \let\lesssim\undefined
\let\precsim\undefined \let\succsim\undefined
\def\corresponds{\triangleq}%
\@ifundefined{selectfont}{\input{amssym.def}\input{amssym.tex}}%
%\@ifundefined{selectfont}{\input{hack.sty}}%
{\input{amssymb.sty}%
\let\Finv\undefined \newsymbol\Finv 2060
\let\Game\undefined \newsymbol\Game 2061
\let\Bbbk\undefined \newsymbol\Bbbk 207C
\let\diagup\undefined \newsymbol\diagup 231E
\let\diagdown\undefined \newsymbol\diagdown 231F
}%
}
\else %
\if@amsfonts %
\def\@tempa{\@ifundefined{selectfont}{\input{amssym.def}\input{amssym.tex}}%
{\input{amsfonts.sty}}}
\else %
\def\@tempa{%
\def\corresponds{{\lower.2ex\hbox{=}}{\rm\kern-.72em^\triangle}}
\let\triangleq\corresponds
\def\gtrsim{\mathrel{\mathpalette\vereq>}}
\def\lesssim{\mathrel{\mathpalette\vereq<}}
\def\succsim{\succ\kern-.9em_\sim\kern.3em}
\def\precsim{\prec\kern-1em_\sim\kern.3em}
\def\vereq##1##2{\lower3pt\vbox{\baselineskip1.5pt \lineskip1.5pt
\ialign{$\m@th##1\hfill####\hfil$\crcr##2\crcr\sim\crcr}}}%
}
\fi
\fi
\@tempa
\def\tensor#1{\protect\@ontopof{#1}{\leftrightarrow}{1.15}\mathord{\box2}}
\def\overstar#1{\protect\@ontopof{#1}{\ast}{1.15}\mathord{\box2}}
\def\overdots#1{\protect\@ontopof{#1}{\cdots}{1.0}\mathord{\box2}}
\def\overcirc#1{\protect\@ontopof{#1}{\circ}{1.2}\mathord{\box2}}
\def\loarrow#1{\protect\@ontopof{#1}{\leftarrow}{1.15}\mathord{\box2}}
\def\roarrow#1{\protect\@ontopof{#1}{\rightarrow}{1.15}\mathord{\box2}}
\def\@ontopof#1#2#3{%
{\mathchoice
{\@@ontopof{#1}{#2}{#3}\displaystyle\scriptstyle}%
{\@@ontopof{#1}{#2}{#3}\textstyle\scriptstyle}%
{\@@ontopof{#1}{#2}{#3}\scriptstyle\scriptscriptstyle}%
{\@@ontopof{#1}{#2}{#3}\scriptscriptstyle\scriptscriptstyle}%
}%
}
\def\@@ontopof#1#2#3#4#5{%
\setbox0=\hbox{$#4#1$}%
\setbox1=\hbox{$#5#2$}%
\setbox2=\hbox{}\ht2=\ht0 \dp2=\dp0 %
\ifdim\wd0>\wd1 %
\setbox1=\hbox to\wd0{\hss\box1\hss}%
\mathord{\rlap{\raise#3\ht0\box1}\box0}%
\else %
\setbox1=\hbox to.9\wd1{\hss\box1\hss}%
\setbox0=\hbox to\wd1{\hss$#4\relax#1$\hss}%
\mathord{\rlap{\copy0}\raise#3\ht0\box1}%
\fi
}%
\def\lambdabar{\protect\@lambdabar}
\def\@lambdabar{%
\relax
\bgroup
\def\@tempc{\hbox{\raise.73\ht0
\hbox to0pt{\kern.25\wd0\vrule width.5\wd0
height.1pt depth.1pt\hss}\box0}}%
\mathchoice{\setbox0\hbox{$\displaystyle\lambda$}\@tempc}%
{\setbox0\hbox{$\textstyle\lambda$}\@tempc}%
{\setbox0\hbox{$\scriptstyle\lambda$}\@tempc}%
{\setbox0\hbox{$\scriptscriptstyle\lambda$}\@tempc}%
\egroup
}
\relax
\def\@chuckoptarg[#1]{}
\let\slantfrac\frac
\def\labelenumi{\theenumi.}
\def\theenumi{\arabic{enumi}}
\def\labelenumii{(\theenumii)}
\def\theenumii{\alph{enumii}}
\def\p@enumii{\theenumi}
\def\labelenumiii{\theenumiii.}
\def\theenumiii{\roman{enumiii}}
\def\p@enumiii{\theenumi(\theenumii)}
\def\labelenumiv{\theenumiv.}
\def\theenumiv{\Alph{enumiv}}
\def\p@enumiv{\p@enumiii\theenumiii}
\def\labelitemi{$\m@th\bullet$}
\def\labelitemii{\bf --}
\def\labelitemiii{$\m@th\ast$}
\def\labelitemiv{$\m@th\cdot$}
% VERSE
%
\def\verse{\let\\=\@centercr
\list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent
\rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
\let\endverse\endlist
% QUOTATION
% Fills lines
% Indents paragraph
%
\def\quotation{\list{}{\listparindent 1.5em
\itemindent\listparindent
\rightmargin\leftmargin\parsep \z@ plus\p@}\item[]}
\let\endquotation=\endlist
% QUOTE -- same as quotation except no paragraph indentation,
%
\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
\let\endquote=\endlist
% DESCRIPTION
%
% To change the formatting of the label, you must redefine
% \descriptionlabel.
\def\descriptionlabel#1{\hspace\labelsep \bf #1 }
\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
\let\makelabel\descriptionlabel}}
\let\enddescription\endlist
\newdimen\descriptionmargin
\descriptionmargin=3em
\arraycolsep 5pt %
\tabcolsep 6pt %
\arrayrulewidth .4pt %
\doublerulesep 2pt %
\tabbingsep \labelsep %
\skip\@mpfootins = \skip\footins
\fboxsep = 3pt %
\fboxrule = .4pt %
\newcounter{part}
\newcounter{section}
\newcounter{subsection}[section]
\newcounter{subsubsection}[subsection]
\newcounter{paragraph}[subsubsection]
\newcounter{subparagraph}[paragraph]
\def\thepart {\Roman{part}} %
\def\thesection {\Roman{section}}
\def\p@section {}
\def\thesubsection {\Alph{subsection}}
\def\p@subsection {\thesection\,}
\def\thesubsubsection {\arabic{subsubsection}}
\def\p@subsubsection {\thesection\,\thesubsection\,}
\def\theparagraph {\alph{paragraph}}
\def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
\newcount\@indentflag \global\@indentflag=1 %
\newdimen\@eqtoeqnum \@eqtoeqnum=6pt %
\def\@indentamount{%
\ifcase\@indentflag 0pt\or\@centering\or0pt plus1fil\fi\relax
}
\def\FL{\global\@indentflag=0 }
\def\FR{\global\@indentflag=2 }
\newcounter{eqletter} \setcounter{eqletter}{0}
\def\@eqnnum{\hbox{\reset@font\rm(\theequation)}}
\let\make@eqnnum=\@eqnnum %
\def\eqnum#1{\dec@eqnnum \global\def\make@eqnnum{\reset@font\rm(#1)}%
\def\@currentlabel{#1}%
}
\def\inc@eqnnum{\addtocounter{equation}{1}}
\def\dec@eqnnum{\addtocounter{equation}{-1}}
\@definecounter{equation}%
\def\theequation@prefix{}
\def\theequation{\theequation@prefix\arabic{equation}}%
\def\mathletters{%
\inc@eqnnum \setcounter{eqletter}{0}%
\edef\@currentlabel{\theequation}%
\def\theequation{\theequation@prefix\arabic{equation}\alph{eqletter}}%
\def\inc@eqnnum{\addtocounter{eqletter}{1}}%
\def\dec@eqnnum{\addtocounter{eqletter}{-1}}%
}
\let\endmathletters\relax
\newbox\@testboxa
\newbox\@testboxb
\def\equation{\par\vskip-\lastskip\vskip\abovedisplayskip
\inc@eqnnum\let\@currentlabel=\theequation
\setbox\@testboxa=\hbox\bgroup\hskip\@totalleftmargin\hskip\@indentamount
\hbox\bgroup$\displaystyle
}
\def\endequation{$\egroup\hskip\@centering\egroup %
\setbox\@testboxb=\hbox{\make@eqnnum}%
\bgroup
\@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb
\ifcase\@indentflag
\advance\@tempdima by\@eqtoeqnum
\ifdim\@tempdima<\hsize %
\def\@tempa{0}%
\else
\def\@tempa{1}%
\fi
\or
\advance\@tempdima by2\@eqtoeqnum
\ifdim\@tempdima<\hsize %
\def\@tempa{0}%
\else %
\@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb
\advance\@tempdima by\@eqtoeqnum
\ifdim\@tempdima<\hsize %
\def\@tempa{0}%
\setbox\@testboxa\hbox{\hfill\box\@testboxa\kern\@eqtoeqnum}%
\else
\def\@tempa{1}%
\fi
\fi
\or
\advance\@tempdima by2\@eqtoeqnum
\ifdim\@tempdima<\hsize %
\def\@tempa{0}%
\setbox\@testboxb=\hbox{\kern\@eqtoeqnum\make@eqnnum}%
\else
\def\@tempa{1}%
\fi
\fi
\ifnum\@tempa=0 %
\hbox to\hsize{\unhbox\@testboxa\box\@testboxb}%
\else %
\vbox{\hbox to\hsize{\unhbox\@testboxa}%
\vskip6pt %
\hbox to\hsize{\hfil\box\@testboxb}}%
\fi
\egroup
\global\let\make@eqnnum\@eqnnum %
\vskip\belowdisplayskip\noindent\global\@indentflag=1 \global\@ignoretrue
}
\def\eqnarray{\par\vskip-\lastskip\vskip\abovedisplayskip
\inc@eqnnum\let\@currentlabel=\theequation
\global\@eqnswtrue\m@th
\global\@eqcnt\z@
\tabskip\@totalleftmargin\advance\tabskip by\@indentamount\let\\\@eqncr
\halign to\hsize\bgroup\hskip\@centering
$\displaystyle\tabskip\z@{##{}}$&\global\@eqcnt\@ne
\hfil${{}##{}}$\hfil
&\global\@eqcnt\tw@ $\displaystyle\tabskip\z@{##}$\hfil
\tabskip\@centering \if@eqnsw\phantom{\make@eqnnum\kern\@eqtoeqnum}\fi
&\llap{##}\tabskip\z@\cr}
\def\endeqnarray{%
\@@eqncr\egroup
\vskip\belowdisplayskip\noindent
\dec@eqnnum\global\@indentflag=1
\global\let\make@eqnnum\@eqnnum %
\global\@ignoretrue
}
\def\nonumber{\global\@eqnswfalse
\def\label##1{\@revmess{error}{\string\label{##1} used
with \string\nonumber\space before (\theequation)}}%
}
\def\@@eqncr{\let\@tempa\relax
\ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}%
\else \def\@tempa{&}\fi
\@tempa \if@eqnsw\make@eqnnum\inc@eqnnum\fi
\global\@eqnswtrue\global\@eqcnt\z@\global\let\make@eqnnum=\@eqnnum\cr
}
\@namedef{eqnarray*}{\def\@eqncr{\nonumber\@seqncr}%
\def\label##1{\@revmess{warning}{\string\label{##1} used
in eqnarray* environment before (\theequation)}}%
\eqnarray}
\def\@pnumwidth{1.55em}
\def\@tocrmarg {2.55em}
\def\@dotsep{4.5}
\setcounter{tocdepth}{3}
\def\l@section#1#2{\addpenalty{\@secpenalty}%
\addvspace{1.0em plus\p@}%
\@tempdima 3.0em %
\begingroup
\parindent \z@ \rightskip \@pnumwidth
\parfillskip -\@pnumwidth
\bf %
\leavevmode %
\advance\leftskip\@tempdima %
\hskip -\leftskip %
#1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par
\endgroup}
\def\l@subsection{\@dottedtocline{2}{3.0em}{2.0em}}
\def\l@subsubsection{\@dottedtocline{3}{5.0em}{1.5em}}
\def\l@paragraph{\@dottedtocline{4}{6.5em}{1.5em}}
\def\l@subparagraph{\@dottedtocline{5}{8.0em}{1.5em}}
\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
% ****** Start of file prabib.sty (part of it) ******
\def\@bibitem#1{\item\if@filesw \immediate\write\@auxout
{\string\bibcite{#1}{\the\value{\@listctr}}}\fi\ignorespaces}
\newdimen\WidestRefLabelThusFar
\global\WidestRefLabelThusFar\z@
\def\bibcite#1#2{\global\@namedef{b@#1}{#2}\@SetMaxRefLabel{#1}{#2}}
\def\@SetMaxRefLabel#1#2{%
{%
\if\@ExpandsToRefNumber{#1}{#2}%
\setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi
\rm[\csname b@#1\endcsname]}%
\else %
\setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi
$\scriptstyle\m@th{\csname b@#1\endcsname}$}%
\fi
\ifdim\wd0>\WidestRefLabelThusFar
\global\WidestRefLabelThusFar=\wd0
\fi
}%
}
\def\@ExpandsToRefNumber #1#2{%
TT\fi %
\@ifundefined{b@#1}%
{\@tempcntb=1
}%
{\def\@tempb{#2}%
\def\@tempa{\@temptokena=\bgroup}%
\if0A { \else \fi %
\afterassignment\@tempa
\@tempcntb=0\@tempb}%
}%
\ifnum\@tempcntb>0 %
}%
\def\cite{\@ifnextchar[{\@tempswatrue\@citex}{\@tempswafalse\@citex[]}}
\let\CITE\cite
\let\onlinecite\cite
\def\@citex[#1]#2{%
\if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi
\leavevmode\unskip\ \@cite{\@collapse{#2}}{#1}}
\def\@bylinecite{%
\@ifnextchar[{\@tempswatrue\@CITEX}{\@tempswafalse\@CITEX[]}%
}
\def\@CITEX[#1]#2{%
\if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi
\leavevmode\unskip$^{\scriptstyle\@CITE{\@collapse{#2}}{#1}}$}
\def\@cite#1#2{[{#1\if@tempswa , #2\fi}]} %
\def\@CITE#1#2{{#1\if@tempswa , #2\fi}} %
\def\@lbibitem[#1]#2{\item[\@BIBLABEL{#1}]\if@filesw
{\def\protect##1{\string ##1\space}\immediate
\write\@auxout{\string\bibcite{#2}{#1}}}\fi\ignorespaces}
\def\@biblabel#1{{[#1]}} %
\def\@BIBLABEL#1{$^{#1}\m@th$} %
\def\thebibliography#1{\references}
\def\endthebibliography{\endreferences}
\def\@collapse#1{%
{%
\let\@temp\relax
\@tempcntb\@MM
\def\@citea{}%
\@for \@citeb:=#1\do{%
\@ifundefined{b@\@citeb}%
{\@temp\@citea{\bf ?}%
\@tempcntb\@MM\let\@temp\relax
\@warning{Citation `\@citeb ' on page \thepage\space undefined}%
}%
{\@tempcnta\@tempcntb \advance\@tempcnta\@ne
\edef\MyTemp{\csname b@\@citeb\endcsname}%
\def\@tempa{\@temptokena=\bgroup}%
\if0A{\fi%
\afterassignment\@tempa %
\@tempcntb=0\MyTemp\relax}%
\ifnum\@tempcntb=0\relax%
\@tempcntb=\@MM
\@citea\MyTemp
\let\@temp = \relax
\else %
\edef\@tempd{\number\@tempcntb}%
\ifnum\@tempcnta=\@tempcntb %
\ifx\@temp\relax %
\edef\@temp{\@citea\@tempd}%
\else
\edef\@temp{\hbox{--}\@tempd}%
\fi
\else %
\@temp\@citea\@tempd
\let\@temp\relax
\fi
\fi
}%
\def\@citea{,}%
}%
\@temp %
}%
}%
%
%%%%
\newif\if@restonecol
\setcounter{topnumber}{2}
\def\topfraction{.7}
\def\textfraction{.2}
\setcounter{bottomnumber}{1}
\def\bottomfraction{.7}
\setcounter{totalnumber}{3}
\setcounter{dbltopnumber}{2}
\def\dbltopfraction{.7}
\def\floatpagefraction{.5}
\def\dblfloatpagefraction{.5}
\newcounter{figure}
\def\thefigure{\@arabic\c@figure}
\def\fps@figure{tbp}
\def\ftype@figure{1}
\def\ext@figure{lof}
\def\fnum@figure{\figurename\penalty10000\hskip.3em plus .1em\relax\thefigure.}
\if@floats
% set \if@fig TRUE at the begining of a figure. 1/17/96
\def\figure{\@figtrue\let\@capwidth\columnwidth\@float{figure}}
\let\endfigure\end@float
\@namedef{figure*}{\figure}%
\@namedef{endfigure*}{\endfigure}%
\else
\def\figure{%
\let\@capwidth\columnwidth
\vskip1pc
\def\@captype{figure}%
\interlinepenalty10000 %
\@ifnextchar[{\@chuckoptarg}{}%
}%
\def\endfigure{\goodbreak\vskip1pc\@figfalse}%reset \if@fig to FALSE. 1/17/96.
\@namedef{figure*}{\figure}%
\@namedef{endfigure*}{\endfigure}%
\fi
\ifx\c@table\undefined
\newcounter{table}
\fi
{\catcode`\.=13 %
\gdef.{\relax\egroup\def\@flag{1}\setbox1\hbox\bgroup}%
}%
\gdef\@widthforLT{\textwidth}
\def\fps@table{tbp}
\def\ftype@table{2}
\def\ext@table{lot}
\def\fnum@table{\tablename\penalty10000\hskip.3em plus .1em\relax\thetable.}
\newdimen\treflabwidth
\newdimen\tablenotetabwidth
\newdimen\tablewidth
\setbox0\hbox{m}
\global\tablenotetabwidth\wd0
\newif\ifknewtblwidth \global\knewtblwidthfalse
\def\comptblwd#1#2{%
\expandafter\gdef\csname tref@#1\endcsname{#2}%
}
\if@floats
\def\table{%
\advance\c@table by 1\relax%
\expandafter\ifx\csname tref@\thetable\endcsname\relax%
\knewtblwidthfalse%
\else\knewtblwidthtrue\fi
\ifknewtblwidth%
\gdef\@capwidth{\expandafter\csname tref@\thetable\endcsname}%
\gdef\@widthforLT{\expandafter\csname tref@\thetable\endcsname}%
\else
\gdef\@widthforLT{\textwidth}\relax
\gdef\@capwidth{\textwidth}\relax%
\fi
\global\treflabwidth=\hsize % reflabwidth is a handy temp
\global \advance\treflabwidth by-\@widthforLT
\global \divide\treflabwidth by2
\def\@tablenotes{}%
\global\tableontrue
\bgroup\parindent=0pt
\outertabtrue
\setcounter{tablenote}{0}%
\advance\c@table by -1%
\@float{table}}
\def\endtable{%
\global\tableonfalse\global\outertabfalse
{\let\protect\relax\footnotesize%
\if@filesw\immediate\write\@auxout{\noexpand\comptblwd{\thetable}%
{\the\tablewidth}}\fi%
\leftskip \treflabwidth
\rightskip\leftskip
\@tablenotes\par}\xdef\@tablenotes{}%
\end@float\egroup
}%
\@namedef{table*}{\table}
\@namedef{endtable*}{\endtable}
%
\else %
\def\table{%
\let\@capwidth\columnwidth \def\@tablenotes{}%
\iffirsttab
\global\firsttabfalse
\fi
\vskip1pc
\global\tableontrue
\bgroup\parindent=0pt
\outertabtrue
\setcounter{tablenote}{0}%
\def\@captype{table}%
\@ifnextchar[{\@chuckoptarg}{}%
}%
\def\endtable{%
\global\tableonfalse\global\outertabfalse
{\let\protect\relax\small\vskip2pt\@tablenotes\par}\xdef\@tablenotes{}%
\egroup
\vskip1pc plus 1filll \penalty-200 \vskip0pt plus -1filll
}%
\@namedef{table*}{\table}
\@namedef{endtable*}{\endtable}
\fi
\@definecounter{tablenote}
\def\thetablenote{\alph{tablenote}}
\def\@tablenotes{}
\def\@maketnmark{\leavevmode\hbox{$^{\reset@font\rm\@thetnmark}\m@th$}}
\def\tablenote{\@ifnextchar[{\@xtablenote}{\stepcounter{tablenote}%
\begingroup \def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup%
\@tablenotemark\@tablenotetext}}
\def\@xtablenote[#1]{\begingroup \c@tablenote #1\relax
\def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup
\@tablenotemark\@tablenotetext}
\long\def\@tablenotetext#1{%
\bgroup
\iftableon\else
\@revmess{error}{tablenotes used outside a table environment,}%
\typeout{\space\space\space\space\space THEY ARE ARE BEING LOST!}%
\fi
\def\protect{\noexpand\protect\noexpand}%
\edef\@tempa{\hangindent\tablenotetabwidth\hangafter0\noindent%
\llap{\@maketnmark\hspace{0.2em}}}%
\expandafter\expandafter\expandafter
\gdef
\expandafter\expandafter\expandafter
\@tablenotes
\expandafter\expandafter\expandafter
{\expandafter\@tablenotes\expandafter\par\@tempa#1}%
\egroup
}
\def\tablenotemark{%
\@ifnextchar[{\@xtablenotemark}{\stepcounter{tablenote}%
\begingroup\def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup
\@tablenotemark}}
\def\@xtablenotemark[#1]{\begingroup \c@tablenote #1\relax
\def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup \@tablenotemark}
\def\@tablenotemark{\leavevmode\ifhmode
\edef\@x@sf{\the\spacefactor}\fi \@maketnmark
\ifhmode\spacefactor\@x@sf\fi\relax}
\def\tablenotetext{\@ifnextchar [{\@xtablenotetext}%
{\begingroup
\def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup
\@tablenotetext}}
\def\@xtablenotetext[#1]{\begingroup \c@tablenote #1\relax
\def\protect{\noexpand\protect\noexpand}%
\xdef\@thetnmark{\thetablenote}\endgroup \@tablenotetext}
%\let\tableline\hline
\newdimen\@Ldec \newdimen\@Rdec
\def\dec #1.#2 {\hbox to\@Ldec{\hss#1}\def\test{#2}%
\ifx\test\empty\hbox to\@Rdec{\hfill}\else\hbox to\@Rdec{.#2\hss}\fi
}
\def\setdec #1.#2 {\relax%
\bgroup
\setbox0\hbox{\kern1pt\relax#1}\setbox1\hbox{\kern1pt\relax#2}%
\global\@Ldec\wd0\global\@Rdec\wd1%
\egroup
}
\setdec 000.000 %
\@temptokena={\relax\egroup
\ifnum\@flag=1
\setbox0\hbox{\unhbox0.\unhbox1}%
\fi
\gdef\@flag{1}\setbox1\hbox\bgroup
}%
{\catcode`\.=13\let.\relax
\xdef\@defdot{\def.{\the\@temptokena}}
}
\@temptokena={.}
{\catcode`\.=13
\ifx.\undefined %
\xdef.{\the\@temptokena}
\fi
}
%\newif\ifactivatedots \global\activatedotsfalse
\def\@activatedots{%
\def\@startcenterdot{\begingroup
\relax\gdef\@flag{0 }
\catcode`\.=13\@defdot
\setbox0\hbox\bgroup\ignorespaces}%
\def\@endcenterdot{\unskip\egroup\catcode`\.=12
%\global\activatedotstrue
\ifnum\@flag=0 %
\box0
\else %
\ifdim\wd0=0pt %
.\box1
\else
\ifdim\wd1=0pt %
\setbox1=\hbox{\phantom{.\copy0}}\box0\box1
\else %
\ifdim\wd0>\wd1
\setbox1\hbox to\wd0{\box1\hfil}%
\else
\setbox0\hbox to\wd1{\hfil\box0}%
\fi
\box0.\box1
\fi
\fi
\fi
\endgroup}%
}
\let\tabbodyfont\footnotesize
\def\squeezetable{\let\tabbodyfont\scriptsize}
\def\tabular{\def\@halignto{}
\@tabular}%
\newbox\TableBox
\def\@tabular{%
\ifoutertab
\gdef\mktblrule{\vskip-1pt\hrule height.7pt depth0pt%
\expandafter\ifx\csname tref@\thetable\endcsname\relax width10pc%
\else \relax \fi\vskip8pt}
\tabbodyfont\noindent\leftskip\treflabwidth\relax\setbox\TableBox=\vbox\bgroup
\else
\leavevmode\hbox\bgroup$%
\fi
\let\@acol\@tabacol
\let\@classz\@tabclassz
\let\@classiv\@tabclassiv \let\\\@tabularcr
\ifoutertab
\mktblrule
\expandafter\apstable@tabarray
\else
\expandafter\@tabarray
\fi
}
\def\endtabular{\crcr\egroup\egroup
\ifoutertab
\mktblrule
\vskip-\lastskip\vskip4pt\nointerlineskip
\else
$%
\fi \egroup\global\tablewidth\wd\TableBox\box\TableBox\par \nointerlineskip
}
\newif\ifoutertab
\global\outertabfalse
\def\apstable@tabarray{%
\m@th\@ifnextchar[{\apstable@array}{\apstable@array[c]}%
}
\def\apstable@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule
height\arraystretch \ht\strutbox
depth\arraystretch \dp\strutbox
width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto
\bgroup \tabskip\z@ \@arstrut
%\bgroup \tabskip\z@ plus1fill \@arstrut
\@preamble\tabskip\z@
%\@preamble\hskip-\tabcolsep \tabskip\z@
\cr}%
\let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%
\bgroup\let\par\relax\outertabfalse%
\let\@sharp##\let\protect\relax
\@activatedots
\lineskip\z@\baselineskip\z@\@preamble}
\def\@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule
height\arraystretch \ht\strutbox
depth\arraystretch \dp\strutbox
width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto
\bgroup\tabskip\z@\@arstrut\@preamble
\tabskip\z@\cr}%
\let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%
\if #1t\vtop \else \if#1b\vbox \else \vcenter \fi\fi%
\bgroup\let\par\relax%
\let\@sharp##\let\protect\relax
\@activatedots
\lineskip\z@\baselineskip\z@\@preamble}
\def\@arrayclassz{\ifcase \@lastchclass \@acolampacol \or \@ampacol \or
\or \or \@addamp \or
\@acolampacol \or \@firstampfalse \@acol \fi
\edef\@preamble{\@preamble
\ifcase \@chnum
\hfil$\relax\@sharp$\hfil \or $\relax\@sharp$\hfil
\or \hfil$\relax\@sharp$\or
\hfil$\relax\@sharp$\hfil \fi}}
\def\@tabclassz{\ifcase \@lastchclass\@acolampacol
\or \@ampacol \or \or \or \@addamp \or \@acolampacol\or
\@firstampfalse \new@tabacol \fi
\edef\@preamble{\@preamble{%
\ifcase \@chnum
\hfil\ignorespaces\@sharp\unskip\hfil
\or \ignorespaces\@sharp\unskip\hfil
\or \hfil\hskip\z@ \ignorespaces\@sharp\unskip
\or\hfil\@startcenterdot\@sharp\@endcenterdot\hfil
\fi}}}
\def\@tabclassiv{\@addtopreamble\@nextchar}
\def\new@tabacol{\edef\@preamble{\@preamble \hskip0pt%
}}
\newif\iftableon
\def\@mkpream#1{\@firstamptrue\@lastchclass6
\def\@preamble{}%
\def\protect{\noexpand\protect\noexpand}\let\@sharp\relax
\let\@startpbox\relax\let\@endpbox\relax
\let\@startcenterdot\relax \let\@endcenterdot\relax
\@expast{#1}\expandafter\@tfor \expandafter
\@nextchar \expandafter:\expandafter=\@tempa\do{\@testpach\@nextchar
\ifcase \@chclass \@classz \or \@classi \or \@classii \or \@classiii
\or \@classiv \or\@classv \fi%
\iftableon\ifoutertab %
\ifnum\@chclass=4
\@addtopreamble{\tabskip\z@}%
\else
\ifnum\@lastchclass=4
\@addtopreamble{\tabskip\z@ plus1fill}%
\fi
\fi
\fi\fi
\@lastchclass\@chclass}%
\ifcase \@lastchclass \@acol
\or \or \@preamerr \@ne\or \@preamerr \tw@\or \or \@acol \fi}
\def\@testpach#1{\@chclass \ifnum \@lastchclass=\tw@ 4 \else
\ifnum \@lastchclass=3 5 \else
\z@ \if #1c\@chnum \z@ \else
\if #1l\@chnum \@ne \else
\if #1r\@chnum \tw@ \else
\if #1d\@chnum 3 \else %
\@chclass \if #1|\@ne \else
\if #1@\tw@ \else
\if #1p3 \else \z@ \@preamerr 0\fi
\fi \fi \fi \fi \fi \fi \fi %
\fi}
\def\@authoraddress{} \def\@title{} \def\@date{} \def\@preprint{}
\def\and{\unskip, }
%
%\def\title#1{\gdef\@title{{\large\bf\centering\ignorespaces#1\vskip2.5pt}}}
%
%\def\date#1{\gdef\@date{{\small\rm\centering(\ignorespaces#1\unskip)\par}}}
%
%
%\def\keywords#1{%
%\@revmess{warning}{APS doesn't use keywords. I'll ignore them.}%
%}
%
\mark{{}{}} %
\if@twoside %
\def\ps@headings{\let\@mkboth\markboth
\def\@oddfoot{}\def\@evenfoot{}%
\def\@evenhead{\rm \hfil \sl \leftmark}%
\def\@oddhead{{\sl \rightmark}\hfil \rm}%
\def\sectionmark##1{\markboth {\uppercase{\ifnum \c@secnumdepth >\z@
\thesection\hskip 1em\relax \fi ##1}}{}}%
\def\subsectionmark##1{\markright {\ifnum \c@secnumdepth >\@ne
\thesubsection\hskip 1em\relax \fi ##1}}}
\else %
\def\ps@headings{\let\@mkboth\markboth
\def\@oddfoot{}\def\@evenfoot{}%
\def\@oddhead{{\sl \rightmark}\hfil \rm}%
\def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\z@
\thesection\hskip 1em\relax \fi ##1}}}}
\fi
\def\ps@myheadings{\let\@mkboth\@gobbletwo
\def\@oddhead{{\sl\rightmark}\hfil \rm}%
\def\@oddfoot{}\def\@evenhead{\rm \hfil\sl\leftmark}%
\def\@evenfoot{}\def\sectionmark##1{}\def\subsectionmark##1{}}
\def\today{\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}
\ps@plain %
\pagenumbering{arabic} %
\if@twoside\else\raggedbottom\fi %
\if@twocolumn %
\typeout{********** The AIPCP style is not meant to work with the
twocolumn option. ^^J quitting ...}
\@@end
\else
\sloppy
\onecolumn %
\raggedbottom %
\fi
\let\@tempa\relax
\pagestyle{headings}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% page-layout stuff
% the next two lines are added on 9/1/95 --- HW
\hoffset=0.6in
\voffset=0.4in
\headheight=14pt
\headsep=25pt
\topskip=10pt
\textheight=51pc
\footskip1.5pc
\textwidth=422pt
%\textwidth=33pc
\oddsidemargin=-.4in
\evensidemargin\oddsidemargin
\flushbottom % we want to try for this as a default
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% footnote stuff
\skip\footins 12pt plus 5pt minus 3pt
\def\footnoterule{\kern-2pt\hrule width 2in\kern1.6pt\vspace*{4pt}}
%\def\footnoterule{\kern-2pt\hrule width 2in\kern1.6pt}
\def\thefootnote{\arabic{footnote}}%
\long\def\@makefntext#1{\parindent 0pt\hsize\columnwidth\parskip0pt\relax
\footnotesize\baselineskip12pt\def\strut{\vrule width0pt height0pt depth1.75pt\relax}%
\mbox{$\m@th^{\@thefnmark)}$\hspace*{6pt}}#1}
%$\m@th^{\@thefnmark)}$#1}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% here we set 12/14 as ....
% section stuff
% iff a \section command is the first stuff after an abstract,
% preemptively vskip back by heading's skip, so that first stuff
% after abstract, whether text or heading, will be a constant distance.
\def\section{\if@firststuff\vskip-18pt\hrule height0pt depth0pt\relax\fi
% hrule above protects the preceding vskip from \@startsection,
% which will try to undo it
\@mainheadtrue \@startsection {section}{1}{\z@}{19pt plus1ex minus
.2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}}
%%% .2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}}
\def\subsection{\@mainheadfalse
\@startsection{subsection}{2}{\z@}{19pt plus1ex minus
.2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}}
\def\subsubsection{\@mainheadfalse
\@startsection{subsubsection}{3}{\z@}{19pt plus1ex minus
.2ex}{12pt plus1ex minus.2ex}{\reset@font\large\it\centering}}
\def\paragraph{\@mainheadfalse
\@startsection{paragraph}{4}{\parindent}{\z@}{-1ex}{\reset@font
\large\it}}
\def\subparagraph{\@mainheadfalse
\@startsection{subparagraph}{4}{\parindent}{3.25ex plus1ex minus
.2ex}{-1em}{\reset@font\large\bf}}
%% redefine \@ssect and \@sect s.t. \section{#1} and \section*{#1} will set
%% #1 in uppercase!
\def\@ssect#1#2#3#4#5{\@tempskipa #3\relax
\ifdim \@tempskipa>\z@
\begingroup #4\@hangfrom{\hskip #1}{\interlinepenalty \@M
\if@mainhead\uppercase{#5}\else #5\fi\par}\endgroup
\else \def\@svsechd{#4\hskip #1\relax #5}\fi
\@xsect{#3}}
\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\hskip 1em}\fi
\@tempskipa #5\relax
\ifdim \@tempskipa>\z@
\begingroup #6\relax
\@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty \@M
\if@mainhead\uppercase{#8}\else #8\fi\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 \if@mainhead\uppercase{#8}\else #8\fi
\csname #1mark\endcsname
{#7}\addcontentsline
{toc}{#1}{\ifnum #2>\c@secnumdepth \else
\protect\numberline{\csname the#1\endcsname}\fi
#7}}\fi
\@xsect{#5}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% frontmatter stuff
\def\title#1{\gdef\@title{{\par\vskip-10pt\LARGE\bf
\baselineskip20pt\centering\ignorespaces#1\vskip6pt}}%
\setcounter{part}{0}
\setcounter{table}{0}
\setcounter{figure}{0}
\setcounter{equation}{0}
\setcounter{section}{0}
\setcounter{subsection}{0}
\setcounter{subsubsection}{0}
\setcounter{paragraph}{0}
}
\def\author#1{\expandafter\def\expandafter\@authoraddress\expandafter
{\@authoraddress %
{\dimen0=-\prevdepth \advance\dimen0 by2\baselineskip
\nointerlineskip \centering
\vrule height\dimen0 width0pt\relax\ignorespaces\large\rm#1\par
}%
}%
}
\def\address#1{\expandafter\def\expandafter\@authoraddress\expandafter
{\@authoraddress{\nointerlineskip\vskip2pc
\footnotesize\it\centering\ignorespaces#1\par}}}
\def\ps@aipbook{\let\@mkboth\@gobbletwo
\def\@oddhead{}%
%\def\@oddhead{%
%\kern-.4pt \vrule height7.4pt depth0pt width.4pt
%\vrule height7.4pt depth-7.0pt width7.4pt
%\hfill
%\vrule height7.4pt depth-7pt width7.4pt
%\vrule height7.4pt depth0pt width.4pt \kern-.4pt
%}%
\def\@oddfoot{}
\def\@evenhead{}\let\@evenfoot\@oddfoot}
\def\@maketitle{%
\vspace*{30pt}
\@title
\ifdim\prevdepth=-1000pt \prevdepth0pt\fi
\@authoraddress
\@date
}
\def\maketitle{\par
\begingroup
\let\cite\@bylinecite
\global\@topnum\z@ %
\thispagestyle{aipbook}
\@maketitle
\@thanks
\endgroup
%\let\maketitle\relax \let\@maketitle\relax
%\let\@thanks\relax \let\@authoraddress\relax \let\@title\relax
%\let\@date\relax \let\thanks\relax
\def\@thanks{}\def\@authoraddress{}\def\@title{}\def\@date{}
}
\def\abstract{\par
\bgroup
\ifdim\prevdepth=-1000pt \prevdepth0pt\fi
\hsize\columnwidth
\leftskip=2em \rightskip\leftskip
\dimen0=-\prevdepth \advance\dimen0 by2pc \nointerlineskip
\noindent \vskip3\baselineskip
\nointerlineskip
\noindent\footnotesize{\bf Abstract.}\relax
}
\newif\if@firststuff
\def\endabstract{\par
\nointerlineskip \vskip0pt
\noindent \par
\egroup
\vskip2\baselineskip
% hrule below turns off interlineskip
\hrule depth0pt width0pt
\global\everypar{\global\@firststufffalse}\global\@firststufftrue
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% running head stuff
\def\righthead#1{\gdef\@oddhead{\reset@font\it\hfil \uppercase{#1}\hfil
\llap{}}}
\def\lefthead#1{\gdef\@evenhead{\reset@font\it\rlap{}\hfil
\uppercase{#1}\hfil}}
\global\@twosidetrue
\gdef\@oddhead{\reset@font\it\hfil}
\gdef\@evenhead{\reset@font\it\hfil}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% ref stuff
\def\@biblabel#1{{#1.}} %
\def\@cite#1#2{[{#1\if@tempswa , #2\fi}]} %
\def\acknowledgments{%
\section*{ACKNOWLEDGMENTS}
}
\def\endacknowledgments{\relax}
\def\references{%
\section*{REFERENCES}
\list{\@biblabel{\arabic{enumiv}}}%
{\labelwidth\WidestRefLabelThusFar \labelsep1ex %
\leftmargin\labelwidth %
\advance\leftmargin\labelsep %
\ifdim\baselinestretch pt>1 pt %
\parsep 4pt\relax %
\else %
\parsep 0pt\relax %
\fi
\itemsep0pt %
\usecounter{enumiv}%
\let\p@enumiv\@empty
\def\theenumiv{\arabic{enumiv}}%
}%
\bgroup
\footnotesize
\let\newblock\relax %
\sloppy\clubpenalty4000\widowpenalty4000
\sfcode`\.=1000\relax
\ifpreprintsty\else\small\fi
}
\def\endreferences{%
\def\@noitemerr{\@warning{Empty `thebibliography' environment}}%
\endlist \let\@SetMaxRefLabel\@gobble \egroup%
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% table and figure stuff
\def\figurename{FIGURE}
\def\fnum@table{\tablename\penalty10000\hskip.3em plus .1em\relax\thetable.}
\def\thetable{\arabic{table}}
\def\fnum@figure{\figurename\penalty10000\hskip.3em plus .1em\relax\thefigure.}
\def\thefigure{\arabic{figure}}
\newif\if@fig % added on 1/17/96 to fix a bug with Figure caption.
\def\hop#1\fi{\fi }
\def\tableline{\noalign{\vskip-.5pt
\hrule height.7pt depth0pt\vskip2pt}}
%%\long\def\@makecaption#1#2{%
%%\vspace*{2pt}
%%\setbox\@testboxa\hbox{\outertabfalse %
%%\reset@font\footnotesize\rm
%%{\bf#1}\penalty10000\hskip.5em plus.2em\ignorespaces#2}
%%\leftskip\treflabwidth
%%\setbox\@testboxb\vbox{\hsize\@capwidth\advance\hsize by\leftskip%
%%\ifdim\wd\@testboxa>\@capwidth%
%%%\small\baselineskip10pt%
%%\parindent0pt%
%%\unhbox\@testboxa\par%
%%\else%
%%\edef\ta{\@captype}\def\tb{figure}\ifx\ta\tb
%% {\hsize\textwidth \hbox to\hsize{\hfil\box\@testboxa\hfil}}%
%% \else \unhbox\@testboxa \par%
%% \fi%
%%\fi
%%\vskip2pt
%%}%
%%\box\@testboxb
%%} %
%%
\long\def\@makecaption#1#2{%
\vspace*{2pt}
\setbox\@testboxa\hbox{\outertabfalse %
\reset@font\footnotesize\rm
{\bf#1}\penalty10000\hskip.5em plus.2em\ignorespaces#2}
% next line is added on 1/17/96 to fix a bug with Figure caption.
% we ahve to reset treflabwidth to 0pt for Figures --- otherwise treflabwidth
% takes the value from the previous table (IF THERE IS ONE) which is bad for
% a figure.
\if@fig \treflabwidth0pt \relax\fi
\leftskip\treflabwidth
\setbox\@testboxb\vbox{\hsize\@capwidth\advance\hsize by\leftskip%
\ifdim\wd\@testboxa>\@capwidth%
%\small\baselineskip10pt%
\parindent0pt%
\unhbox\@testboxa\par%
\else%
\if@fig
{\hsize\textwidth \hbox to\hsize{\hfil\box\@testboxa\hfil}}%
\else \unhbox\@testboxa \par%
\fi%
\fi
\vskip2pt
}%
\box\@testboxb
} %
\newif\ifknewlongtblwidth \global\knewlongtblwidthfalse
%%%%%%%%%%%%%%% longtable stuff %%%%%%%%%%%%%
% initialize
\if@longtable% if longtable is chosen, then input longtable.sty and ...
\input longtable.sty
\gdef\@widthforLT{\textwidth}
\LTpre0pt
\LTpost0pt
%\newif\ifknewlongtblwidth \global\knewlongtblwidthfalse
\def\aiptable{%
\advance\c@LT@tables by 1\relax%
\tabbodyfont
\expandafter\ifx\csname LT@\number\c@LT@tables\endcsname\relax%
\knewlongtblwidthfalse
\else\knewlongtblwidthtrue\fi
\par
\vskip2pc plus2ex minus.4ex
\def\@tablenotes{}%
\let\tableline\hline
\global\tableontrue
\bgroup\parindent=0pt
\outertabtrue
\LTtbalewidth=0pt
\csname LT@\number\c@LT@tables\endcsname%
\setcounter{tablenote}{0}%
\ifknewlongtblwidth
\gdef\@widthforLT{\LTtbalewidth}
\LTcapwidth\LTtbalewidth%
\else
\gdef\@widthforLT{\textwidth}
\LTcapwidth\textwidth%
\fi
\advance\c@LT@tables by -1
}
\def\endaiptable{%
\global\tableonfalse\global\outertabfalse
{\let\protect\relax\footnotesize\vskip-3pt%
\treflabwidth=\hsize % reflabwidth is a handy temp
\advance\treflabwidth by-\LTtbalewidth
\divide\treflabwidth by2
\leftskip\treflabwidth
\rightskip\leftskip
\vskip-\lastskip\vskip4pt\nointerlineskip\parskip=0pt\noindent{\parskip=0pt%
\@tablenotes\par}}\xdef\@tablenotes{}%
\egroup
\vskip1.4pc plus1ex minus.4ex\nointerlineskip%
}
\newdimen\treflabwidth
\newdimen\LTtbalewidth
\def\LT@def@row{\ifx\LT@save@row\end
\xdef\LT@save@row{\omit\kern\the\wd\tw@}%
\xdef\LT@save@width{\advance\LTtbalewidth by \the\wd\tw@}\else%
\xdef\LT@save@row{\omit\kern\the\wd\tw@&\LT@save@row}%
\xdef\LT@save@width{\advance\LTtbalewidth by \the\wd\tw@\LT@save@width}%
\fi}
\def\LT@make@row{%
\global\expandafter\let\expandafter\LT@save@row
\csname LT@\romannumeral\c@LT@tables\endcsname
\global\expandafter\edef\expandafter\LT@save@width
{\csname LT@\number\c@LT@tables\endcsname}
\ifx\LT@save@row\relax\LT@blank@row\fi}
\def\endlongtable{%
\LT@echunk
\LT@start
\unvbox\z@
\LT@get@widths
\if@filesw\immediate\write\@auxout
{\gdef\string\LT@\romannumeral\c@LT@tables{\LT@save@row}}\fi
\if@filesw\immediate\write\@auxout
{\string\expandafter\gdef\string\csname\space LT@\number\c@LT@tables\string\endcsname{\LT@save@width}}
\fi
\LT@mcw@rn
\ifx\LT@save@row\LT@@save@row\else
\LT@warn{Column widths have changed\MessageBreak
in table \thetable}\fi
\endgraf\penalty -\LT@end@pen
\endgroup
\global\@mparbottom\z@
\pagegoal\vsize
\endgraf\penalty\z@\addvspace\LTpost
\ifvoid\footins\else\insert\footins{}\fi}
%% caption for longtable
\def\aftercapline{\noalign{\vskip-8pt}\hline\noalign{\vskip8pt}}
\def\afterheadline{\noalign{\vskip1pt}\hline\noalign{\vskip3pt}}
\def\LT@c@ption[#1]#2{%
\LT@mkcaption{{\footnotesize{\bf\fnum@table\hskip.5em plus.2em\ignorespaces}{#2}}}%
\def\@tempa{#1}\ifx\@tempa\empty\else
{\let\\\space
\addcontentsline{lot}{table}{\protect\numberline{\thetable}{#1}}}%
\fi}
\def\LT@@c@ption#1{%
\LT@mkcaption{{\footnotesize{\bf\fnum@table\hskip.5em plus.2em\ignorespaces}{#1}}}%
{\let\\\space
\addcontentsline{lot}{table}{\protect\numberline{\thetable}{#1}}}}
\def\LT@mkcaption#1{%
\LT@mc{\LT@cols}{l}{\hbox to \z@{\parbox[t]{\LTcapwidth}{\footnotesize%
\setbox\@tempboxa\hbox{#1}%
\ifdim \wd\@tempboxa >\hsize #1
\else \hbox to\hsize{\box\@tempboxa\hfil}\fi
\endgraf\hbox{}}}}}
\LTleft=0pt plus 1fill minus 1fill
\LTright=0pt plus 1fill minus 1fill
\fi
\endinput
%%