0,0 → 1,1650 |
% ****** 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 |
|
%% |