Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 68 | f9daq | 1 | % ****** Start of file aipproc.sty ****** |
| 2 | % |
||
| 3 | % |
||
| 4 | % This file is adapted from the REVTeX 3.0 distribution. |
||
| 5 | % |
||
| 6 | % The bug with figure caption is fixed. 1/17/96 |
||
| 7 | % |
||
| 8 | % Copyright (c) 1995 The American Physical Society. |
||
| 9 | % |
||
| 10 | % |
||
| 11 | \typeout{Filename: aipproc.sty, v1.0 <11 May 95>} |
||
| 12 | |||
| 13 | \def\@revmess#1#2{\typeout{aipproc #1: #2}} |
||
| 14 | |||
| 15 | \newif\ifpreprintsty \global\preprintstyfalse |
||
| 16 | |||
| 17 | % The normal (default) type size is set to 12pt --- all font size options |
||
| 18 | % (such as 11pt, 12pt) are ignored. fonts are defined in this file! |
||
| 19 | \@namedef{ds@11pt}{\typeout{AIPBOOK Warning: Your option '11pt' is ignored!}} |
||
| 20 | \@namedef{ds@12pt}{\relax} % do nothing |
||
| 21 | \def\@ptsize{2} |
||
| 22 | |||
| 23 | \def\ds@twoside{\@twosidetrue % |
||
| 24 | \@mparswitchtrue} % |
||
| 25 | \def\ds@twocolumn{\@twocolumntrue} |
||
| 26 | |||
| 27 | \newif\if@amsfonts \@amsfontsfalse |
||
| 28 | \def\ds@amsfonts{\@amsfontstrue} |
||
| 29 | |||
| 30 | \newif\if@amssymbols \@amssymbolsfalse |
||
| 31 | \def\ds@amssymb{\@amssymbolstrue} |
||
| 32 | |||
| 33 | \newif\if@longtable \@longtablefalse |
||
| 34 | \def\ds@longtable{\@longtabletrue} |
||
| 35 | |||
| 36 | \newif\if@floats \@floatstrue |
||
| 37 | |||
| 38 | \newif\ifsecnumbers \global\secnumbersfalse |
||
| 39 | |||
| 40 | \@options |
||
| 41 | |||
| 42 | %from aps.sty |
||
| 43 | % ****** Start of file aps.sty (part of it) ****** |
||
| 44 | |||
| 45 | \def\partname{Part} |
||
| 46 | \def\contentsname{Contents} |
||
| 47 | \def\listfigurename{List of Figures} |
||
| 48 | \def\listtablename{List of Tables} |
||
| 49 | \def\refname{REFERENCES} |
||
| 50 | \def\indexname{Index} |
||
| 51 | \def\figurename{FIG.} |
||
| 52 | \def\tablename{TABLE} |
||
| 53 | \def\abstractname{Abstract} |
||
| 54 | |||
| 55 | \newif\iffirstfig \global\firstfigtrue |
||
| 56 | \newif\iffirsttab \global\firsttabtrue |
||
| 57 | |||
| 58 | \def\tightenlines{\def\baselinestretch{1}\small\normalsize} |
||
| 59 | \let\tighten\tightenlines |
||
| 60 | |||
| 61 | %%%% |
||
| 62 | |||
| 63 | \ifx\selectfont\undefined % |
||
| 64 | \@revmess{message}{NFSS not detected. Assuming OFSS.} |
||
| 65 | \let\reset@font\relax |
||
| 66 | \def\mathhexbox{\protect\mathhexbox@} |
||
| 67 | \def\mathhexbox@#1#2#3{\relax |
||
| 68 | \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}% |
||
| 69 | \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi} |
||
| 70 | \def\text#1{% |
||
| 71 | \relax |
||
| 72 | \ifmmode % |
||
| 73 | \mathchoice |
||
| 74 | {\hbox{\everymath{\displaystyle}\rm #1}}% |
||
| 75 | {\hbox{\everymath{\textstyle}\rm #1}}% |
||
| 76 | {\hbox{\everymath{\scriptstyle}% |
||
| 77 | \def\prm{\fam\z@ \the\scriptfont\z@ \relax}% |
||
| 78 | \def\pit{\fam\itfam \the\scriptfont\itfam \relax}% |
||
| 79 | \rm #1}% |
||
| 80 | }% |
||
| 81 | {\hbox{\everymath{\scriptscriptstyle}% |
||
| 82 | \def\prm{\fam\z@ \the\scriptscriptfont\z@ \relax}% |
||
| 83 | \def\pit{\fam\itfam \the\scriptscriptfont\itfam \relax}% |
||
| 84 | \rm #1}% |
||
| 85 | }% |
||
| 86 | \else % |
||
| 87 | \leavevmode\hbox{#1}% |
||
| 88 | \fi |
||
| 89 | } |
||
| 90 | \def\bbox#1{% |
||
| 91 | \leavevmode\text{% |
||
| 92 | \textfont0 \the\textfont\bffam |
||
| 93 | \scriptfont0 \the\scriptfont\bffam |
||
| 94 | \scriptscriptfont0 \the\scriptscriptfont\bffam |
||
| 95 | \@temptokena\everymath \boldmath \everymath\@temptokena |
||
| 96 | {$\m@th\relax#1$}% |
||
| 97 | }% |
||
| 98 | } |
||
| 99 | \font\fivbf=cmbx5 \font\sixbf=cmbx6 \font\sevbf=cmbx7 \font\egtbf=cmbx8 |
||
| 100 | \expandafter\def\expandafter\ixpt\expandafter{\ixpt |
||
| 101 | \scriptfont\bffam\sixbf \scriptscriptfont\bffam\fivbf} |
||
| 102 | \expandafter\def\expandafter\xpt\expandafter{\xpt |
||
| 103 | \scriptfont\bffam\sevbf \scriptscriptfont\bffam\fivbf} |
||
| 104 | \expandafter\def\expandafter\xipt\expandafter{\xipt |
||
| 105 | \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf} |
||
| 106 | \expandafter\def\expandafter\xiipt\expandafter{\xiipt |
||
| 107 | \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf} |
||
| 108 | \expandafter\def\expandafter\xivpt\expandafter{\xivpt |
||
| 109 | \scriptfont\bffam\tenbf \scriptscriptfont\bffam\sevbf} |
||
| 110 | \else % |
||
| 111 | \@revmess{message}{NFSS detected! Assuming NFSS.} |
||
| 112 | \def\text#1{% |
||
| 113 | \relax\ifmmode |
||
| 114 | \mathchoice |
||
| 115 | {\hbox{{\everymath{\displaystyle}#1}}}% |
||
| 116 | {\hbox{{\everymath{\textstyle}#1}}}% |
||
| 117 | {\hbox{{\everymath{\scriptstyle}\let\f@size\sf@size\selectfont#1}}}% |
||
| 118 | {\hbox{{\everymath{\scriptscriptstyle}\let\f@size\ssf@size\selectfont#1}}}% |
||
| 119 | \glb@settings |
||
| 120 | \else |
||
| 121 | \mbox{#1}% |
||
| 122 | \fi |
||
| 123 | } |
||
| 124 | \def\bbox#1{% |
||
| 125 | \relax\ifmmode |
||
| 126 | \mathchoice |
||
| 127 | {{\hbox{\boldmath$\displaystyle#1$}}}% |
||
| 128 | {{\hbox{\boldmath$\textstyle#1$}}}% |
||
| 129 | {{\hbox{\boldmath$\scriptstyle#1$}}}% |
||
| 130 | {{\hbox{\boldmath$\scriptscriptstyle#1$}}}% |
||
| 131 | \glb@settings |
||
| 132 | \else |
||
| 133 | \mbox{#1}% |
||
| 134 | \fi |
||
| 135 | } |
||
| 136 | \def\mathhexbox{\protect\mathhexbox@} |
||
| 137 | \def\mathhexbox@#1#2#3{\relax |
||
| 138 | \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}% |
||
| 139 | \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi} |
||
| 140 | \fi |
||
| 141 | |||
| 142 | %%%% |
||
| 143 | |||
| 144 | %from aps10.sty\relax |
||
| 145 | %%%%% |
||
| 146 | |||
| 147 | % ****** Start of file aps10.sty (part of it) ****** |
||
| 148 | % |
||
| 149 | \lineskip 1pt |
||
| 150 | \normallineskip 1pt |
||
| 151 | \def\baselinestretch{1} |
||
| 152 | |||
| 153 | %%% |
||
| 154 | |||
| 155 | \let\@normalsize\normalsize |
||
| 156 | %%%% |
||
| 157 | \def\normalsize{\@setsize\normalsize{14pt}\xiipt\@xiipt |
||
| 158 | \abovedisplayskip 12\p@ plus3\p@ minus7\p@ |
||
| 159 | \belowdisplayskip \abovedisplayskip |
||
| 160 | \abovedisplayshortskip \z@ plus3\p@ |
||
| 161 | \belowdisplayshortskip 6.5\p@ plus3.5\p@ minus3\p@ |
||
| 162 | \let\@listi\@listI} % Setting of \@listi added 9 Jun 87 |
||
| 163 | |||
| 164 | \def\small{\@setsize\small{13.6pt}\xipt\@xipt |
||
| 165 | \abovedisplayskip 11\p@ plus3\p@ minus6\p@ |
||
| 166 | \belowdisplayskip \abovedisplayskip |
||
| 167 | \abovedisplayshortskip \z@ plus3\p@ |
||
| 168 | \belowdisplayshortskip 6.5\p@ plus3.5\p@ minus3\p@ |
||
| 169 | \def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87 |
||
| 170 | \parsep 4.5\p@ plus2\p@ minus\p@ \itemsep \parsep |
||
| 171 | \topsep 9\p@ plus3\p@ minus5\p@}} |
||
| 172 | |||
| 173 | \def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt |
||
| 174 | \abovedisplayskip 10\p@ plus2\p@ minus5\p@ |
||
| 175 | \belowdisplayskip \abovedisplayskip |
||
| 176 | \abovedisplayshortskip \z@ plus3\p@ |
||
| 177 | \belowdisplayshortskip 6\p@ plus3\p@ minus3\p@ |
||
| 178 | \def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87 |
||
| 179 | \topsep 6\p@ plus2\p@ minus2\p@\parsep 3\p@ plus2\p@ minus\p@ |
||
| 180 | \itemsep \parsep}} |
||
| 181 | |||
| 182 | \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt} |
||
| 183 | \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt} |
||
| 184 | \def\large{\@setsize\large{18pt}\xivpt\@xivpt} |
||
| 185 | \def\Large{\@setsize\Large{22pt}\xviipt\@xviipt} |
||
| 186 | \def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt} |
||
| 187 | \def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt} |
||
| 188 | \let\Huge=\huge |
||
| 189 | \normalsize |
||
| 190 | |||
| 191 | \marginparsep 6pt |
||
| 192 | |||
| 193 | \topmargin -61pt |
||
| 194 | |||
| 195 | \columnsep 1.5pc |
||
| 196 | \columnseprule 0pt |
||
| 197 | |||
| 198 | \footnotesep 9.25pt |
||
| 199 | %\skip\footins 39pt plus 4pt minus 2pt |
||
| 200 | |||
| 201 | \floatsep 12pt plus 2pt minus 2pt |
||
| 202 | |||
| 203 | \textfloatsep 20pt plus 2pt minus 4pt |
||
| 204 | |||
| 205 | \intextsep 12pt plus 2pt minus 2pt |
||
| 206 | |||
| 207 | \@maxsep 20pt |
||
| 208 | |||
| 209 | \dblfloatsep 12pt plus 2pt minus 2pt |
||
| 210 | |||
| 211 | \dbltextfloatsep 20pt plus 2pt minus 4pt |
||
| 212 | |||
| 213 | \@dblmaxsep 20pt |
||
| 214 | |||
| 215 | \@fptop 0pt plus 1fil |
||
| 216 | |||
| 217 | \@fpsep 8pt plus 2fil |
||
| 218 | \@fpbot 0pt plus 1fil |
||
| 219 | |||
| 220 | \@dblfptop 0pt plus 1fil |
||
| 221 | |||
| 222 | \@dblfpsep 8pt plus 2fil |
||
| 223 | \@dblfpbot 0pt plus 1fil |
||
| 224 | |||
| 225 | \marginparpush 5pt |
||
| 226 | |||
| 227 | \parskip 0pt plus 1pt |
||
| 228 | |||
| 229 | \parindent 1em |
||
| 230 | |||
| 231 | \partopsep 2pt plus 1pt minus 1pt |
||
| 232 | |||
| 233 | \@lowpenalty 51 |
||
| 234 | \@medpenalty 151 |
||
| 235 | \@highpenalty 301 |
||
| 236 | |||
| 237 | \@beginparpenalty -\@lowpenalty |
||
| 238 | |||
| 239 | \@endparpenalty -\@lowpenalty |
||
| 240 | |||
| 241 | \@itempenalty -\@lowpenalty |
||
| 242 | |||
| 243 | \newif\if@mainhead |
||
| 244 | |||
| 245 | \setcounter{secnumdepth}{4} |
||
| 246 | |||
| 247 | \newif\ifappendixon \global\appendixonfalse |
||
| 248 | \def\appendix{\par\global\appendixontrue |
||
| 249 | \setcounter{section}{0} |
||
| 250 | \setcounter{subsection}{0} |
||
| 251 | \setcounter{subsubsection}{0} |
||
| 252 | \def\thesection{\Alph{section}} |
||
| 253 | \def\thesubsection{\arabic{subsection}} |
||
| 254 | \def\thesubsubsection{\alph{subsubsection}} |
||
| 255 | \def\theequation@prefix{\thesection} |
||
| 256 | \@addtoreset{equation}{section} |
||
| 257 | \addcontentsline{toc}{section}{\protect\numberline{APPENDIXES\hskip |
||
| 258 | 0pt plus1fill minus1fill\relax}{}} |
||
| 259 | } |
||
| 260 | |||
| 261 | \leftmargini 25pt |
||
| 262 | \leftmarginii 22pt |
||
| 263 | \leftmarginiii 18.7pt |
||
| 264 | \leftmarginiv 17pt |
||
| 265 | \leftmarginv 10pt |
||
| 266 | \leftmarginvi 10pt |
||
| 267 | |||
| 268 | \leftmargin\leftmargini |
||
| 269 | \labelsep 4pt |
||
| 270 | \labelwidth\leftmargini\advance\labelwidth-\labelsep |
||
| 271 | |||
| 272 | \def\@listI{\leftmargin\leftmargini \parsep 4\p@ plus2\p@ minus\p@ |
||
| 273 | \topsep 8\p@ plus2\p@ minus4\p@ |
||
| 274 | \itemsep 4\p@ plus2\p@ minus\p@} |
||
| 275 | |||
| 276 | \let\@listi\@listI |
||
| 277 | \@listi |
||
| 278 | |||
| 279 | \def\@listii{\leftmargin\leftmarginii |
||
| 280 | \labelwidth\leftmarginii\advance\labelwidth-\labelsep |
||
| 281 | \topsep 4\p@ plus2\p@ minus\p@ |
||
| 282 | \parsep 2\p@ plus\p@ minus\p@ |
||
| 283 | \itemsep \parsep} |
||
| 284 | |||
| 285 | \def\@listiii{\leftmargin\leftmarginiii |
||
| 286 | \labelwidth\leftmarginiii\advance\labelwidth-\labelsep |
||
| 287 | \topsep 2\p@ plus\p@ minus\p@ |
||
| 288 | \parsep \z@ \partopsep \p@ plus\z@ minus\p@ |
||
| 289 | \itemsep \topsep} |
||
| 290 | |||
| 291 | \def\@listiv{\leftmargin\leftmarginiv |
||
| 292 | \labelwidth\leftmarginiv\advance\labelwidth-\labelsep} |
||
| 293 | |||
| 294 | \def\@listv{\leftmargin\leftmarginv |
||
| 295 | \labelwidth\leftmarginv\advance\labelwidth-\labelsep} |
||
| 296 | |||
| 297 | \def\@listvi{\leftmargin\leftmarginvi |
||
| 298 | \labelwidth\leftmarginvi\advance\labelwidth-\labelsep} |
||
| 299 | |||
| 300 | \def\case{\protect\@case} |
||
| 301 | |||
| 302 | \def\@case#1#2{% |
||
| 303 | \def\@tempa{#2}\def\@tempb{/}% |
||
| 304 | \ifx\@tempa\@tempb % |
||
| 305 | \def\@tempa{\@@case{#1}}% |
||
| 306 | \else % |
||
| 307 | \def\@tempa{\@@case{#1}{#2}}% |
||
| 308 | \fi |
||
| 309 | \@tempa |
||
| 310 | } |
||
| 311 | |||
| 312 | \def\@@case#1#2{{\textstyle{#1\over#2}}} |
||
| 313 | |||
| 314 | %\@namedef{tabular*}{\tabular} |
||
| 315 | \expandafter \def\csname tabular*\endcsname #1{\def\@halignto{to#1}\@tabular} |
||
| 316 | |||
| 317 | \@namedef{endtabular*}{\endtabular} |
||
| 318 | |||
| 319 | |||
| 320 | %%%% beginninf of the AAS symbols block |
||
| 321 | %%%% this block is from aasms.sty --- except we use |
||
| 322 | %%%% sslantfrac instead of slantfrac |
||
| 323 | \def\sun{\hbox{$\odot$}} |
||
| 324 | \def\earth{\hbox{$\oplus$}} |
||
| 325 | %\def\lesssim{\mathrel{\hbox{\rlap{\hbox{\lower4pt\hbox{$\sim$}}}\hbox{$<$}}}} |
||
| 326 | %\def\gtrsim{\mathrel{\hbox{\rlap{\hbox{\lower4pt\hbox{$\sim$}}}\hbox{$>$}}}} |
||
| 327 | \def\sq{\hbox{\rlap{$\sqcap$}$\sqcup$}} |
||
| 328 | \def\arcdeg{\hbox{$^\circ$}} |
||
| 329 | \def\arcmin{\hbox{$^\prime$}} |
||
| 330 | \def\arcsec{\hbox{$^{\prime\prime}$}} |
||
| 331 | \def\fd{\hbox{$.\!\!^{\rm d}$}} |
||
| 332 | \def\fh{\hbox{$.\!\!^{\rm h}$}} |
||
| 333 | \def\fm{\hbox{$.\!\!^{\rm m}$}} |
||
| 334 | \def\fs{\hbox{$.\!\!^{\rm s}$}} |
||
| 335 | \def\fdg{\hbox{$.\!\!^\circ$}} |
||
| 336 | \def\farcm{\hbox{$.\mkern-4mu^\prime$}} |
||
| 337 | \def\farcs{\hbox{$.\!\!^{\prime\prime}$}} |
||
| 338 | \def\fp{\hbox{$.\!\!^{\scriptscriptstyle\rm p}$}} |
||
| 339 | \def\micron{\hbox{$\mu$m}} |
||
| 340 | %\let\la=\lesssim |
||
| 341 | %\let\ga=\gtrsim |
||
| 342 | \def\case#1#2{\hbox{$\frac{#1}{#2}$}} |
||
| 343 | \def\sslantfrac#1#2{\hbox{$\,^#1\!/_#2$}} |
||
| 344 | \def\onehalf{\sslantfrac{1}{2}} |
||
| 345 | \def\onethird{\sslantfrac{1}{3}} |
||
| 346 | \def\twothirds{\sslantfrac{2}{3}} |
||
| 347 | \def\onequarter{\sslantfrac{1}{4}} |
||
| 348 | \def\threequarters{\sslantfrac{3}{4}} |
||
| 349 | \def\ubvr{\hbox{$U\!BV\!R$}} |
||
| 350 | \def\ub{\hbox{$U\!-\!B$}} |
||
| 351 | \def\bv{\hbox{$B\!-\!V$}} |
||
| 352 | \def\vr{\hbox{$V\!-\!R$}} |
||
| 353 | \def\ur{\hbox{$U\!-\!R$}} |
||
| 354 | %%%% |
||
| 355 | %%%% end of the AAS symbols block |
||
| 356 | |||
| 357 | \if@amssymbols % |
||
| 358 | \def\@tempa{% |
||
| 359 | \let\gtrsim\undefined \let\lesssim\undefined |
||
| 360 | \let\precsim\undefined \let\succsim\undefined |
||
| 361 | \def\corresponds{\triangleq}% |
||
| 362 | \@ifundefined{selectfont}{\input{amssym.def}\input{amssym.tex}}% |
||
| 363 | %\@ifundefined{selectfont}{\input{hack.sty}}% |
||
| 364 | {\input{amssymb.sty}% |
||
| 365 | \let\Finv\undefined \newsymbol\Finv 2060 |
||
| 366 | \let\Game\undefined \newsymbol\Game 2061 |
||
| 367 | \let\Bbbk\undefined \newsymbol\Bbbk 207C |
||
| 368 | \let\diagup\undefined \newsymbol\diagup 231E |
||
| 369 | \let\diagdown\undefined \newsymbol\diagdown 231F |
||
| 370 | }% |
||
| 371 | } |
||
| 372 | \else % |
||
| 373 | \if@amsfonts % |
||
| 374 | \def\@tempa{\@ifundefined{selectfont}{\input{amssym.def}\input{amssym.tex}}% |
||
| 375 | {\input{amsfonts.sty}}} |
||
| 376 | \else % |
||
| 377 | \def\@tempa{% |
||
| 378 | \def\corresponds{{\lower.2ex\hbox{=}}{\rm\kern-.72em^\triangle}} |
||
| 379 | \let\triangleq\corresponds |
||
| 380 | \def\gtrsim{\mathrel{\mathpalette\vereq>}} |
||
| 381 | \def\lesssim{\mathrel{\mathpalette\vereq<}} |
||
| 382 | \def\succsim{\succ\kern-.9em_\sim\kern.3em} |
||
| 383 | \def\precsim{\prec\kern-1em_\sim\kern.3em} |
||
| 384 | \def\vereq##1##2{\lower3pt\vbox{\baselineskip1.5pt \lineskip1.5pt |
||
| 385 | \ialign{$\m@th##1\hfill####\hfil$\crcr##2\crcr\sim\crcr}}}% |
||
| 386 | } |
||
| 387 | \fi |
||
| 388 | \fi |
||
| 389 | \@tempa |
||
| 390 | |||
| 391 | \def\tensor#1{\protect\@ontopof{#1}{\leftrightarrow}{1.15}\mathord{\box2}} |
||
| 392 | \def\overstar#1{\protect\@ontopof{#1}{\ast}{1.15}\mathord{\box2}} |
||
| 393 | \def\overdots#1{\protect\@ontopof{#1}{\cdots}{1.0}\mathord{\box2}} |
||
| 394 | \def\overcirc#1{\protect\@ontopof{#1}{\circ}{1.2}\mathord{\box2}} |
||
| 395 | \def\loarrow#1{\protect\@ontopof{#1}{\leftarrow}{1.15}\mathord{\box2}} |
||
| 396 | \def\roarrow#1{\protect\@ontopof{#1}{\rightarrow}{1.15}\mathord{\box2}} |
||
| 397 | |||
| 398 | \def\@ontopof#1#2#3{% |
||
| 399 | {\mathchoice |
||
| 400 | {\@@ontopof{#1}{#2}{#3}\displaystyle\scriptstyle}% |
||
| 401 | {\@@ontopof{#1}{#2}{#3}\textstyle\scriptstyle}% |
||
| 402 | {\@@ontopof{#1}{#2}{#3}\scriptstyle\scriptscriptstyle}% |
||
| 403 | {\@@ontopof{#1}{#2}{#3}\scriptscriptstyle\scriptscriptstyle}% |
||
| 404 | }% |
||
| 405 | } |
||
| 406 | |||
| 407 | \def\@@ontopof#1#2#3#4#5{% |
||
| 408 | \setbox0=\hbox{$#4#1$}% |
||
| 409 | \setbox1=\hbox{$#5#2$}% |
||
| 410 | \setbox2=\hbox{}\ht2=\ht0 \dp2=\dp0 % |
||
| 411 | \ifdim\wd0>\wd1 % |
||
| 412 | \setbox1=\hbox to\wd0{\hss\box1\hss}% |
||
| 413 | \mathord{\rlap{\raise#3\ht0\box1}\box0}% |
||
| 414 | \else % |
||
| 415 | \setbox1=\hbox to.9\wd1{\hss\box1\hss}% |
||
| 416 | \setbox0=\hbox to\wd1{\hss$#4\relax#1$\hss}% |
||
| 417 | \mathord{\rlap{\copy0}\raise#3\ht0\box1}% |
||
| 418 | \fi |
||
| 419 | }% |
||
| 420 | \def\lambdabar{\protect\@lambdabar} |
||
| 421 | \def\@lambdabar{% |
||
| 422 | \relax |
||
| 423 | \bgroup |
||
| 424 | \def\@tempc{\hbox{\raise.73\ht0 |
||
| 425 | \hbox to0pt{\kern.25\wd0\vrule width.5\wd0 |
||
| 426 | height.1pt depth.1pt\hss}\box0}}% |
||
| 427 | \mathchoice{\setbox0\hbox{$\displaystyle\lambda$}\@tempc}% |
||
| 428 | {\setbox0\hbox{$\textstyle\lambda$}\@tempc}% |
||
| 429 | {\setbox0\hbox{$\scriptstyle\lambda$}\@tempc}% |
||
| 430 | {\setbox0\hbox{$\scriptscriptstyle\lambda$}\@tempc}% |
||
| 431 | \egroup |
||
| 432 | } |
||
| 433 | \relax |
||
| 434 | |||
| 435 | \def\@chuckoptarg[#1]{} |
||
| 436 | |||
| 437 | \let\slantfrac\frac |
||
| 438 | |||
| 439 | \def\labelenumi{\theenumi.} |
||
| 440 | \def\theenumi{\arabic{enumi}} |
||
| 441 | |||
| 442 | \def\labelenumii{(\theenumii)} |
||
| 443 | \def\theenumii{\alph{enumii}} |
||
| 444 | \def\p@enumii{\theenumi} |
||
| 445 | |||
| 446 | \def\labelenumiii{\theenumiii.} |
||
| 447 | \def\theenumiii{\roman{enumiii}} |
||
| 448 | \def\p@enumiii{\theenumi(\theenumii)} |
||
| 449 | |||
| 450 | \def\labelenumiv{\theenumiv.} |
||
| 451 | \def\theenumiv{\Alph{enumiv}} |
||
| 452 | \def\p@enumiv{\p@enumiii\theenumiii} |
||
| 453 | |||
| 454 | \def\labelitemi{$\m@th\bullet$} |
||
| 455 | \def\labelitemii{\bf --} |
||
| 456 | \def\labelitemiii{$\m@th\ast$} |
||
| 457 | \def\labelitemiv{$\m@th\cdot$} |
||
| 458 | |||
| 459 | % VERSE |
||
| 460 | % |
||
| 461 | \def\verse{\let\\=\@centercr |
||
| 462 | \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent |
||
| 463 | \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]} |
||
| 464 | \let\endverse\endlist |
||
| 465 | |||
| 466 | % QUOTATION |
||
| 467 | % Fills lines |
||
| 468 | % Indents paragraph |
||
| 469 | % |
||
| 470 | \def\quotation{\list{}{\listparindent 1.5em |
||
| 471 | \itemindent\listparindent |
||
| 472 | \rightmargin\leftmargin\parsep \z@ plus\p@}\item[]} |
||
| 473 | \let\endquotation=\endlist |
||
| 474 | |||
| 475 | % QUOTE -- same as quotation except no paragraph indentation, |
||
| 476 | % |
||
| 477 | \def\quote{\list{}{\rightmargin\leftmargin}\item[]} |
||
| 478 | \let\endquote=\endlist |
||
| 479 | |||
| 480 | % DESCRIPTION |
||
| 481 | % |
||
| 482 | % To change the formatting of the label, you must redefine |
||
| 483 | % \descriptionlabel. |
||
| 484 | |||
| 485 | \def\descriptionlabel#1{\hspace\labelsep \bf #1 } |
||
| 486 | \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin |
||
| 487 | \let\makelabel\descriptionlabel}} |
||
| 488 | |||
| 489 | \let\enddescription\endlist |
||
| 490 | |||
| 491 | \newdimen\descriptionmargin |
||
| 492 | \descriptionmargin=3em |
||
| 493 | |||
| 494 | |||
| 495 | \arraycolsep 5pt % |
||
| 496 | \tabcolsep 6pt % |
||
| 497 | \arrayrulewidth .4pt % |
||
| 498 | \doublerulesep 2pt % |
||
| 499 | |||
| 500 | \tabbingsep \labelsep % |
||
| 501 | |||
| 502 | \skip\@mpfootins = \skip\footins |
||
| 503 | |||
| 504 | \fboxsep = 3pt % |
||
| 505 | \fboxrule = .4pt % |
||
| 506 | |||
| 507 | \newcounter{part} |
||
| 508 | \newcounter{section} |
||
| 509 | \newcounter{subsection}[section] |
||
| 510 | \newcounter{subsubsection}[subsection] |
||
| 511 | \newcounter{paragraph}[subsubsection] |
||
| 512 | \newcounter{subparagraph}[paragraph] |
||
| 513 | |||
| 514 | \def\thepart {\Roman{part}} % |
||
| 515 | \def\thesection {\Roman{section}} |
||
| 516 | \def\p@section {} |
||
| 517 | \def\thesubsection {\Alph{subsection}} |
||
| 518 | \def\p@subsection {\thesection\,} |
||
| 519 | \def\thesubsubsection {\arabic{subsubsection}} |
||
| 520 | \def\p@subsubsection {\thesection\,\thesubsection\,} |
||
| 521 | \def\theparagraph {\alph{paragraph}} |
||
| 522 | \def\thesubparagraph {\theparagraph.\arabic{subparagraph}} |
||
| 523 | |||
| 524 | \newcount\@indentflag \global\@indentflag=1 % |
||
| 525 | \newdimen\@eqtoeqnum \@eqtoeqnum=6pt % |
||
| 526 | \def\@indentamount{% |
||
| 527 | \ifcase\@indentflag 0pt\or\@centering\or0pt plus1fil\fi\relax |
||
| 528 | } |
||
| 529 | \def\FL{\global\@indentflag=0 } |
||
| 530 | \def\FR{\global\@indentflag=2 } |
||
| 531 | |||
| 532 | \newcounter{eqletter} \setcounter{eqletter}{0} |
||
| 533 | |||
| 534 | \def\@eqnnum{\hbox{\reset@font\rm(\theequation)}} |
||
| 535 | \let\make@eqnnum=\@eqnnum % |
||
| 536 | \def\eqnum#1{\dec@eqnnum \global\def\make@eqnnum{\reset@font\rm(#1)}% |
||
| 537 | \def\@currentlabel{#1}% |
||
| 538 | } |
||
| 539 | \def\inc@eqnnum{\addtocounter{equation}{1}} |
||
| 540 | \def\dec@eqnnum{\addtocounter{equation}{-1}} |
||
| 541 | \@definecounter{equation}% |
||
| 542 | \def\theequation@prefix{} |
||
| 543 | |||
| 544 | \def\theequation{\theequation@prefix\arabic{equation}}% |
||
| 545 | |||
| 546 | \def\mathletters{% |
||
| 547 | \inc@eqnnum \setcounter{eqletter}{0}% |
||
| 548 | \edef\@currentlabel{\theequation}% |
||
| 549 | \def\theequation{\theequation@prefix\arabic{equation}\alph{eqletter}}% |
||
| 550 | \def\inc@eqnnum{\addtocounter{eqletter}{1}}% |
||
| 551 | \def\dec@eqnnum{\addtocounter{eqletter}{-1}}% |
||
| 552 | } |
||
| 553 | |||
| 554 | \let\endmathletters\relax |
||
| 555 | |||
| 556 | \newbox\@testboxa |
||
| 557 | \newbox\@testboxb |
||
| 558 | |||
| 559 | \def\equation{\par\vskip-\lastskip\vskip\abovedisplayskip |
||
| 560 | \inc@eqnnum\let\@currentlabel=\theequation |
||
| 561 | \setbox\@testboxa=\hbox\bgroup\hskip\@totalleftmargin\hskip\@indentamount |
||
| 562 | \hbox\bgroup$\displaystyle |
||
| 563 | } |
||
| 564 | |||
| 565 | \def\endequation{$\egroup\hskip\@centering\egroup % |
||
| 566 | \setbox\@testboxb=\hbox{\make@eqnnum}% |
||
| 567 | \bgroup |
||
| 568 | \@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb |
||
| 569 | \ifcase\@indentflag |
||
| 570 | \advance\@tempdima by\@eqtoeqnum |
||
| 571 | \ifdim\@tempdima<\hsize % |
||
| 572 | \def\@tempa{0}% |
||
| 573 | \else |
||
| 574 | \def\@tempa{1}% |
||
| 575 | \fi |
||
| 576 | \or |
||
| 577 | \advance\@tempdima by2\@eqtoeqnum |
||
| 578 | \ifdim\@tempdima<\hsize % |
||
| 579 | \def\@tempa{0}% |
||
| 580 | \else % |
||
| 581 | \@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb |
||
| 582 | \advance\@tempdima by\@eqtoeqnum |
||
| 583 | \ifdim\@tempdima<\hsize % |
||
| 584 | \def\@tempa{0}% |
||
| 585 | \setbox\@testboxa\hbox{\hfill\box\@testboxa\kern\@eqtoeqnum}% |
||
| 586 | \else |
||
| 587 | \def\@tempa{1}% |
||
| 588 | \fi |
||
| 589 | \fi |
||
| 590 | \or |
||
| 591 | \advance\@tempdima by2\@eqtoeqnum |
||
| 592 | \ifdim\@tempdima<\hsize % |
||
| 593 | \def\@tempa{0}% |
||
| 594 | \setbox\@testboxb=\hbox{\kern\@eqtoeqnum\make@eqnnum}% |
||
| 595 | \else |
||
| 596 | \def\@tempa{1}% |
||
| 597 | \fi |
||
| 598 | \fi |
||
| 599 | \ifnum\@tempa=0 % |
||
| 600 | \hbox to\hsize{\unhbox\@testboxa\box\@testboxb}% |
||
| 601 | \else % |
||
| 602 | \vbox{\hbox to\hsize{\unhbox\@testboxa}% |
||
| 603 | \vskip6pt % |
||
| 604 | \hbox to\hsize{\hfil\box\@testboxb}}% |
||
| 605 | \fi |
||
| 606 | \egroup |
||
| 607 | \global\let\make@eqnnum\@eqnnum % |
||
| 608 | \vskip\belowdisplayskip\noindent\global\@indentflag=1 \global\@ignoretrue |
||
| 609 | } |
||
| 610 | |||
| 611 | \def\eqnarray{\par\vskip-\lastskip\vskip\abovedisplayskip |
||
| 612 | \inc@eqnnum\let\@currentlabel=\theequation |
||
| 613 | \global\@eqnswtrue\m@th |
||
| 614 | \global\@eqcnt\z@ |
||
| 615 | \tabskip\@totalleftmargin\advance\tabskip by\@indentamount\let\\\@eqncr |
||
| 616 | \halign to\hsize\bgroup\hskip\@centering |
||
| 617 | $\displaystyle\tabskip\z@{##{}}$&\global\@eqcnt\@ne |
||
| 618 | \hfil${{}##{}}$\hfil |
||
| 619 | &\global\@eqcnt\tw@ $\displaystyle\tabskip\z@{##}$\hfil |
||
| 620 | \tabskip\@centering \if@eqnsw\phantom{\make@eqnnum\kern\@eqtoeqnum}\fi |
||
| 621 | &\llap{##}\tabskip\z@\cr} |
||
| 622 | |||
| 623 | \def\endeqnarray{% |
||
| 624 | \@@eqncr\egroup |
||
| 625 | \vskip\belowdisplayskip\noindent |
||
| 626 | \dec@eqnnum\global\@indentflag=1 |
||
| 627 | \global\let\make@eqnnum\@eqnnum % |
||
| 628 | \global\@ignoretrue |
||
| 629 | } |
||
| 630 | |||
| 631 | \def\nonumber{\global\@eqnswfalse |
||
| 632 | \def\label##1{\@revmess{error}{\string\label{##1} used |
||
| 633 | with \string\nonumber\space before (\theequation)}}% |
||
| 634 | } |
||
| 635 | |||
| 636 | \def\@@eqncr{\let\@tempa\relax |
||
| 637 | \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}% |
||
| 638 | \else \def\@tempa{&}\fi |
||
| 639 | \@tempa \if@eqnsw\make@eqnnum\inc@eqnnum\fi |
||
| 640 | \global\@eqnswtrue\global\@eqcnt\z@\global\let\make@eqnnum=\@eqnnum\cr |
||
| 641 | } |
||
| 642 | |||
| 643 | \@namedef{eqnarray*}{\def\@eqncr{\nonumber\@seqncr}% |
||
| 644 | \def\label##1{\@revmess{warning}{\string\label{##1} used |
||
| 645 | in eqnarray* environment before (\theequation)}}% |
||
| 646 | \eqnarray} |
||
| 647 | |||
| 648 | \def\@pnumwidth{1.55em} |
||
| 649 | \def\@tocrmarg {2.55em} |
||
| 650 | \def\@dotsep{4.5} |
||
| 651 | \setcounter{tocdepth}{3} |
||
| 652 | |||
| 653 | |||
| 654 | \def\l@section#1#2{\addpenalty{\@secpenalty}% |
||
| 655 | \addvspace{1.0em plus\p@}% |
||
| 656 | \@tempdima 3.0em % |
||
| 657 | \begingroup |
||
| 658 | \parindent \z@ \rightskip \@pnumwidth |
||
| 659 | \parfillskip -\@pnumwidth |
||
| 660 | \bf % |
||
| 661 | \leavevmode % |
||
| 662 | \advance\leftskip\@tempdima % |
||
| 663 | \hskip -\leftskip % |
||
| 664 | #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par |
||
| 665 | \endgroup} |
||
| 666 | |||
| 667 | \def\l@subsection{\@dottedtocline{2}{3.0em}{2.0em}} |
||
| 668 | \def\l@subsubsection{\@dottedtocline{3}{5.0em}{1.5em}} |
||
| 669 | \def\l@paragraph{\@dottedtocline{4}{6.5em}{1.5em}} |
||
| 670 | \def\l@subparagraph{\@dottedtocline{5}{8.0em}{1.5em}} |
||
| 671 | |||
| 672 | \def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}} |
||
| 673 | |||
| 674 | |||
| 675 | % ****** Start of file prabib.sty (part of it) ****** |
||
| 676 | |||
| 677 | \def\@bibitem#1{\item\if@filesw \immediate\write\@auxout |
||
| 678 | {\string\bibcite{#1}{\the\value{\@listctr}}}\fi\ignorespaces} |
||
| 679 | |||
| 680 | \newdimen\WidestRefLabelThusFar |
||
| 681 | |||
| 682 | \global\WidestRefLabelThusFar\z@ |
||
| 683 | |||
| 684 | \def\bibcite#1#2{\global\@namedef{b@#1}{#2}\@SetMaxRefLabel{#1}{#2}} |
||
| 685 | |||
| 686 | \def\@SetMaxRefLabel#1#2{% |
||
| 687 | {% |
||
| 688 | \if\@ExpandsToRefNumber{#1}{#2}% |
||
| 689 | \setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi |
||
| 690 | \rm[\csname b@#1\endcsname]}% |
||
| 691 | \else % |
||
| 692 | \setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi |
||
| 693 | $\scriptstyle\m@th{\csname b@#1\endcsname}$}% |
||
| 694 | \fi |
||
| 695 | \ifdim\wd0>\WidestRefLabelThusFar |
||
| 696 | \global\WidestRefLabelThusFar=\wd0 |
||
| 697 | \fi |
||
| 698 | }% |
||
| 699 | } |
||
| 700 | |||
| 701 | \def\@ExpandsToRefNumber #1#2{% |
||
| 702 | TT\fi % |
||
| 703 | \@ifundefined{b@#1}% |
||
| 704 | {\@tempcntb=1 |
||
| 705 | }% |
||
| 706 | {\def\@tempb{#2}% |
||
| 707 | \def\@tempa{\@temptokena=\bgroup}% |
||
| 708 | \if0A { \else \fi % |
||
| 709 | \afterassignment\@tempa |
||
| 710 | \@tempcntb=0\@tempb}% |
||
| 711 | }% |
||
| 712 | \ifnum\@tempcntb>0 % |
||
| 713 | }% |
||
| 714 | |||
| 715 | \def\cite{\@ifnextchar[{\@tempswatrue\@citex}{\@tempswafalse\@citex[]}} |
||
| 716 | \let\CITE\cite |
||
| 717 | \let\onlinecite\cite |
||
| 718 | |||
| 719 | \def\@citex[#1]#2{% |
||
| 720 | \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi |
||
| 721 | \leavevmode\unskip\ \@cite{\@collapse{#2}}{#1}} |
||
| 722 | |||
| 723 | \def\@bylinecite{% |
||
| 724 | \@ifnextchar[{\@tempswatrue\@CITEX}{\@tempswafalse\@CITEX[]}% |
||
| 725 | } |
||
| 726 | |||
| 727 | \def\@CITEX[#1]#2{% |
||
| 728 | \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi |
||
| 729 | \leavevmode\unskip$^{\scriptstyle\@CITE{\@collapse{#2}}{#1}}$} |
||
| 730 | |||
| 731 | \def\@cite#1#2{[{#1\if@tempswa , #2\fi}]} % |
||
| 732 | \def\@CITE#1#2{{#1\if@tempswa , #2\fi}} % |
||
| 733 | |||
| 734 | \def\@lbibitem[#1]#2{\item[\@BIBLABEL{#1}]\if@filesw |
||
| 735 | {\def\protect##1{\string ##1\space}\immediate |
||
| 736 | \write\@auxout{\string\bibcite{#2}{#1}}}\fi\ignorespaces} |
||
| 737 | |||
| 738 | \def\@biblabel#1{{[#1]}} % |
||
| 739 | \def\@BIBLABEL#1{$^{#1}\m@th$} % |
||
| 740 | |||
| 741 | \def\thebibliography#1{\references} |
||
| 742 | |||
| 743 | \def\endthebibliography{\endreferences} |
||
| 744 | |||
| 745 | \def\@collapse#1{% |
||
| 746 | {% |
||
| 747 | \let\@temp\relax |
||
| 748 | \@tempcntb\@MM |
||
| 749 | \def\@citea{}% |
||
| 750 | \@for \@citeb:=#1\do{% |
||
| 751 | \@ifundefined{b@\@citeb}% |
||
| 752 | {\@temp\@citea{\bf ?}% |
||
| 753 | \@tempcntb\@MM\let\@temp\relax |
||
| 754 | \@warning{Citation `\@citeb ' on page \thepage\space undefined}% |
||
| 755 | }% |
||
| 756 | {\@tempcnta\@tempcntb \advance\@tempcnta\@ne |
||
| 757 | \edef\MyTemp{\csname b@\@citeb\endcsname}% |
||
| 758 | \def\@tempa{\@temptokena=\bgroup}% |
||
| 759 | \if0A{\fi% |
||
| 760 | \afterassignment\@tempa % |
||
| 761 | \@tempcntb=0\MyTemp\relax}% |
||
| 762 | \ifnum\@tempcntb=0\relax% |
||
| 763 | \@tempcntb=\@MM |
||
| 764 | \@citea\MyTemp |
||
| 765 | \let\@temp = \relax |
||
| 766 | \else % |
||
| 767 | \edef\@tempd{\number\@tempcntb}% |
||
| 768 | \ifnum\@tempcnta=\@tempcntb % |
||
| 769 | \ifx\@temp\relax % |
||
| 770 | \edef\@temp{\@citea\@tempd}% |
||
| 771 | \else |
||
| 772 | \edef\@temp{\hbox{--}\@tempd}% |
||
| 773 | \fi |
||
| 774 | \else % |
||
| 775 | \@temp\@citea\@tempd |
||
| 776 | \let\@temp\relax |
||
| 777 | \fi |
||
| 778 | \fi |
||
| 779 | }% |
||
| 780 | \def\@citea{,}% |
||
| 781 | }% |
||
| 782 | \@temp % |
||
| 783 | }% |
||
| 784 | }% |
||
| 785 | % |
||
| 786 | |||
| 787 | %%%% |
||
| 788 | |||
| 789 | \newif\if@restonecol |
||
| 790 | |||
| 791 | \setcounter{topnumber}{2} |
||
| 792 | \def\topfraction{.7} |
||
| 793 | \def\textfraction{.2} |
||
| 794 | \setcounter{bottomnumber}{1} |
||
| 795 | \def\bottomfraction{.7} |
||
| 796 | \setcounter{totalnumber}{3} |
||
| 797 | \setcounter{dbltopnumber}{2} |
||
| 798 | \def\dbltopfraction{.7} |
||
| 799 | \def\floatpagefraction{.5} |
||
| 800 | \def\dblfloatpagefraction{.5} |
||
| 801 | |||
| 802 | |||
| 803 | \newcounter{figure} |
||
| 804 | \def\thefigure{\@arabic\c@figure} |
||
| 805 | |||
| 806 | \def\fps@figure{tbp} |
||
| 807 | \def\ftype@figure{1} |
||
| 808 | \def\ext@figure{lof} |
||
| 809 | \def\fnum@figure{\figurename\penalty10000\hskip.3em plus .1em\relax\thefigure.} |
||
| 810 | \if@floats |
||
| 811 | % set \if@fig TRUE at the begining of a figure. 1/17/96 |
||
| 812 | \def\figure{\@figtrue\let\@capwidth\columnwidth\@float{figure}} |
||
| 813 | \let\endfigure\end@float |
||
| 814 | \@namedef{figure*}{\figure}% |
||
| 815 | \@namedef{endfigure*}{\endfigure}% |
||
| 816 | \else |
||
| 817 | \def\figure{% |
||
| 818 | \let\@capwidth\columnwidth |
||
| 819 | \vskip1pc |
||
| 820 | \def\@captype{figure}% |
||
| 821 | \interlinepenalty10000 % |
||
| 822 | \@ifnextchar[{\@chuckoptarg}{}% |
||
| 823 | }% |
||
| 824 | \def\endfigure{\goodbreak\vskip1pc\@figfalse}%reset \if@fig to FALSE. 1/17/96. |
||
| 825 | \@namedef{figure*}{\figure}% |
||
| 826 | \@namedef{endfigure*}{\endfigure}% |
||
| 827 | \fi |
||
| 828 | |||
| 829 | \ifx\c@table\undefined |
||
| 830 | \newcounter{table} |
||
| 831 | \fi |
||
| 832 | |||
| 833 | {\catcode`\.=13 % |
||
| 834 | \gdef.{\relax\egroup\def\@flag{1}\setbox1\hbox\bgroup}% |
||
| 835 | }% |
||
| 836 | |||
| 837 | \gdef\@widthforLT{\textwidth} |
||
| 838 | |||
| 839 | \def\fps@table{tbp} |
||
| 840 | \def\ftype@table{2} |
||
| 841 | \def\ext@table{lot} |
||
| 842 | \def\fnum@table{\tablename\penalty10000\hskip.3em plus .1em\relax\thetable.} |
||
| 843 | |||
| 844 | \newdimen\treflabwidth |
||
| 845 | \newdimen\tablenotetabwidth |
||
| 846 | \newdimen\tablewidth |
||
| 847 | \setbox0\hbox{m} |
||
| 848 | \global\tablenotetabwidth\wd0 |
||
| 849 | |||
| 850 | \newif\ifknewtblwidth \global\knewtblwidthfalse |
||
| 851 | \def\comptblwd#1#2{% |
||
| 852 | \expandafter\gdef\csname tref@#1\endcsname{#2}% |
||
| 853 | } |
||
| 854 | |||
| 855 | \if@floats |
||
| 856 | \def\table{% |
||
| 857 | \advance\c@table by 1\relax% |
||
| 858 | \expandafter\ifx\csname tref@\thetable\endcsname\relax% |
||
| 859 | \knewtblwidthfalse% |
||
| 860 | \else\knewtblwidthtrue\fi |
||
| 861 | \ifknewtblwidth% |
||
| 862 | \gdef\@capwidth{\expandafter\csname tref@\thetable\endcsname}% |
||
| 863 | \gdef\@widthforLT{\expandafter\csname tref@\thetable\endcsname}% |
||
| 864 | \else |
||
| 865 | \gdef\@widthforLT{\textwidth}\relax |
||
| 866 | \gdef\@capwidth{\textwidth}\relax% |
||
| 867 | \fi |
||
| 868 | \global\treflabwidth=\hsize % reflabwidth is a handy temp |
||
| 869 | \global \advance\treflabwidth by-\@widthforLT |
||
| 870 | \global \divide\treflabwidth by2 |
||
| 871 | \def\@tablenotes{}% |
||
| 872 | \global\tableontrue |
||
| 873 | \bgroup\parindent=0pt |
||
| 874 | \outertabtrue |
||
| 875 | \setcounter{tablenote}{0}% |
||
| 876 | \advance\c@table by -1% |
||
| 877 | \@float{table}} |
||
| 878 | |||
| 879 | \def\endtable{% |
||
| 880 | \global\tableonfalse\global\outertabfalse |
||
| 881 | {\let\protect\relax\footnotesize% |
||
| 882 | \if@filesw\immediate\write\@auxout{\noexpand\comptblwd{\thetable}% |
||
| 883 | {\the\tablewidth}}\fi% |
||
| 884 | \leftskip \treflabwidth |
||
| 885 | \rightskip\leftskip |
||
| 886 | \@tablenotes\par}\xdef\@tablenotes{}% |
||
| 887 | \end@float\egroup |
||
| 888 | }% |
||
| 889 | \@namedef{table*}{\table} |
||
| 890 | \@namedef{endtable*}{\endtable} |
||
| 891 | % |
||
| 892 | \else % |
||
| 893 | \def\table{% |
||
| 894 | \let\@capwidth\columnwidth \def\@tablenotes{}% |
||
| 895 | \iffirsttab |
||
| 896 | \global\firsttabfalse |
||
| 897 | \fi |
||
| 898 | \vskip1pc |
||
| 899 | \global\tableontrue |
||
| 900 | \bgroup\parindent=0pt |
||
| 901 | \outertabtrue |
||
| 902 | \setcounter{tablenote}{0}% |
||
| 903 | \def\@captype{table}% |
||
| 904 | \@ifnextchar[{\@chuckoptarg}{}% |
||
| 905 | }% |
||
| 906 | \def\endtable{% |
||
| 907 | \global\tableonfalse\global\outertabfalse |
||
| 908 | {\let\protect\relax\small\vskip2pt\@tablenotes\par}\xdef\@tablenotes{}% |
||
| 909 | \egroup |
||
| 910 | \vskip1pc plus 1filll \penalty-200 \vskip0pt plus -1filll |
||
| 911 | }% |
||
| 912 | \@namedef{table*}{\table} |
||
| 913 | \@namedef{endtable*}{\endtable} |
||
| 914 | \fi |
||
| 915 | |||
| 916 | \@definecounter{tablenote} |
||
| 917 | \def\thetablenote{\alph{tablenote}} |
||
| 918 | \def\@tablenotes{} |
||
| 919 | |||
| 920 | \def\@maketnmark{\leavevmode\hbox{$^{\reset@font\rm\@thetnmark}\m@th$}} |
||
| 921 | |||
| 922 | \def\tablenote{\@ifnextchar[{\@xtablenote}{\stepcounter{tablenote}% |
||
| 923 | \begingroup \def\protect{\noexpand\protect\noexpand}% |
||
| 924 | \xdef\@thetnmark{\thetablenote}\endgroup% |
||
| 925 | \@tablenotemark\@tablenotetext}} |
||
| 926 | |||
| 927 | \def\@xtablenote[#1]{\begingroup \c@tablenote #1\relax |
||
| 928 | \def\protect{\noexpand\protect\noexpand}% |
||
| 929 | \xdef\@thetnmark{\thetablenote}\endgroup |
||
| 930 | \@tablenotemark\@tablenotetext} |
||
| 931 | |||
| 932 | \long\def\@tablenotetext#1{% |
||
| 933 | \bgroup |
||
| 934 | \iftableon\else |
||
| 935 | \@revmess{error}{tablenotes used outside a table environment,}% |
||
| 936 | \typeout{\space\space\space\space\space THEY ARE ARE BEING LOST!}% |
||
| 937 | \fi |
||
| 938 | \def\protect{\noexpand\protect\noexpand}% |
||
| 939 | \edef\@tempa{\hangindent\tablenotetabwidth\hangafter0\noindent% |
||
| 940 | \llap{\@maketnmark\hspace{0.2em}}}% |
||
| 941 | \expandafter\expandafter\expandafter |
||
| 942 | \gdef |
||
| 943 | \expandafter\expandafter\expandafter |
||
| 944 | \@tablenotes |
||
| 945 | \expandafter\expandafter\expandafter |
||
| 946 | {\expandafter\@tablenotes\expandafter\par\@tempa#1}% |
||
| 947 | \egroup |
||
| 948 | } |
||
| 949 | |||
| 950 | \def\tablenotemark{% |
||
| 951 | \@ifnextchar[{\@xtablenotemark}{\stepcounter{tablenote}% |
||
| 952 | \begingroup\def\protect{\noexpand\protect\noexpand}% |
||
| 953 | \xdef\@thetnmark{\thetablenote}\endgroup |
||
| 954 | \@tablenotemark}} |
||
| 955 | |||
| 956 | \def\@xtablenotemark[#1]{\begingroup \c@tablenote #1\relax |
||
| 957 | \def\protect{\noexpand\protect\noexpand}% |
||
| 958 | \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotemark} |
||
| 959 | |||
| 960 | \def\@tablenotemark{\leavevmode\ifhmode |
||
| 961 | \edef\@x@sf{\the\spacefactor}\fi \@maketnmark |
||
| 962 | \ifhmode\spacefactor\@x@sf\fi\relax} |
||
| 963 | |||
| 964 | \def\tablenotetext{\@ifnextchar [{\@xtablenotetext}% |
||
| 965 | {\begingroup |
||
| 966 | \def\protect{\noexpand\protect\noexpand}% |
||
| 967 | \xdef\@thetnmark{\thetablenote}\endgroup |
||
| 968 | \@tablenotetext}} |
||
| 969 | |||
| 970 | \def\@xtablenotetext[#1]{\begingroup \c@tablenote #1\relax |
||
| 971 | \def\protect{\noexpand\protect\noexpand}% |
||
| 972 | \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotetext} |
||
| 973 | |||
| 974 | %\let\tableline\hline |
||
| 975 | |||
| 976 | \newdimen\@Ldec \newdimen\@Rdec |
||
| 977 | |||
| 978 | \def\dec #1.#2 {\hbox to\@Ldec{\hss#1}\def\test{#2}% |
||
| 979 | \ifx\test\empty\hbox to\@Rdec{\hfill}\else\hbox to\@Rdec{.#2\hss}\fi |
||
| 980 | } |
||
| 981 | |||
| 982 | \def\setdec #1.#2 {\relax% |
||
| 983 | \bgroup |
||
| 984 | \setbox0\hbox{\kern1pt\relax#1}\setbox1\hbox{\kern1pt\relax#2}% |
||
| 985 | \global\@Ldec\wd0\global\@Rdec\wd1% |
||
| 986 | \egroup |
||
| 987 | } |
||
| 988 | |||
| 989 | \setdec 000.000 % |
||
| 990 | |||
| 991 | \@temptokena={\relax\egroup |
||
| 992 | \ifnum\@flag=1 |
||
| 993 | \setbox0\hbox{\unhbox0.\unhbox1}% |
||
| 994 | \fi |
||
| 995 | \gdef\@flag{1}\setbox1\hbox\bgroup |
||
| 996 | }% |
||
| 997 | {\catcode`\.=13\let.\relax |
||
| 998 | \xdef\@defdot{\def.{\the\@temptokena}} |
||
| 999 | } |
||
| 1000 | |||
| 1001 | \@temptokena={.} |
||
| 1002 | {\catcode`\.=13 |
||
| 1003 | \ifx.\undefined % |
||
| 1004 | \xdef.{\the\@temptokena} |
||
| 1005 | \fi |
||
| 1006 | } |
||
| 1007 | |||
| 1008 | %\newif\ifactivatedots \global\activatedotsfalse |
||
| 1009 | |||
| 1010 | \def\@activatedots{% |
||
| 1011 | \def\@startcenterdot{\begingroup |
||
| 1012 | \relax\gdef\@flag{0 } |
||
| 1013 | \catcode`\.=13\@defdot |
||
| 1014 | \setbox0\hbox\bgroup\ignorespaces}% |
||
| 1015 | \def\@endcenterdot{\unskip\egroup\catcode`\.=12 |
||
| 1016 | %\global\activatedotstrue |
||
| 1017 | \ifnum\@flag=0 % |
||
| 1018 | \box0 |
||
| 1019 | \else % |
||
| 1020 | \ifdim\wd0=0pt % |
||
| 1021 | .\box1 |
||
| 1022 | \else |
||
| 1023 | \ifdim\wd1=0pt % |
||
| 1024 | \setbox1=\hbox{\phantom{.\copy0}}\box0\box1 |
||
| 1025 | \else % |
||
| 1026 | \ifdim\wd0>\wd1 |
||
| 1027 | \setbox1\hbox to\wd0{\box1\hfil}% |
||
| 1028 | \else |
||
| 1029 | \setbox0\hbox to\wd1{\hfil\box0}% |
||
| 1030 | \fi |
||
| 1031 | \box0.\box1 |
||
| 1032 | \fi |
||
| 1033 | \fi |
||
| 1034 | \fi |
||
| 1035 | \endgroup}% |
||
| 1036 | } |
||
| 1037 | |||
| 1038 | \let\tabbodyfont\footnotesize |
||
| 1039 | \def\squeezetable{\let\tabbodyfont\scriptsize} |
||
| 1040 | |||
| 1041 | \def\tabular{\def\@halignto{} |
||
| 1042 | \@tabular}% |
||
| 1043 | |||
| 1044 | \newbox\TableBox |
||
| 1045 | \def\@tabular{% |
||
| 1046 | \ifoutertab |
||
| 1047 | \gdef\mktblrule{\vskip-1pt\hrule height.7pt depth0pt% |
||
| 1048 | \expandafter\ifx\csname tref@\thetable\endcsname\relax width10pc% |
||
| 1049 | \else \relax \fi\vskip8pt} |
||
| 1050 | \tabbodyfont\noindent\leftskip\treflabwidth\relax\setbox\TableBox=\vbox\bgroup |
||
| 1051 | \else |
||
| 1052 | \leavevmode\hbox\bgroup$% |
||
| 1053 | \fi |
||
| 1054 | \let\@acol\@tabacol |
||
| 1055 | \let\@classz\@tabclassz |
||
| 1056 | \let\@classiv\@tabclassiv \let\\\@tabularcr |
||
| 1057 | \ifoutertab |
||
| 1058 | \mktblrule |
||
| 1059 | \expandafter\apstable@tabarray |
||
| 1060 | \else |
||
| 1061 | \expandafter\@tabarray |
||
| 1062 | \fi |
||
| 1063 | } |
||
| 1064 | |||
| 1065 | \def\endtabular{\crcr\egroup\egroup |
||
| 1066 | \ifoutertab |
||
| 1067 | \mktblrule |
||
| 1068 | \vskip-\lastskip\vskip4pt\nointerlineskip |
||
| 1069 | \else |
||
| 1070 | $% |
||
| 1071 | \fi \egroup\global\tablewidth\wd\TableBox\box\TableBox\par \nointerlineskip |
||
| 1072 | } |
||
| 1073 | |||
| 1074 | \newif\ifoutertab |
||
| 1075 | \global\outertabfalse |
||
| 1076 | |||
| 1077 | \def\apstable@tabarray{% |
||
| 1078 | \m@th\@ifnextchar[{\apstable@array}{\apstable@array[c]}% |
||
| 1079 | } |
||
| 1080 | |||
| 1081 | \def\apstable@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule |
||
| 1082 | height\arraystretch \ht\strutbox |
||
| 1083 | depth\arraystretch \dp\strutbox |
||
| 1084 | width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto |
||
| 1085 | \bgroup \tabskip\z@ \@arstrut |
||
| 1086 | %\bgroup \tabskip\z@ plus1fill \@arstrut |
||
| 1087 | \@preamble\tabskip\z@ |
||
| 1088 | %\@preamble\hskip-\tabcolsep \tabskip\z@ |
||
| 1089 | \cr}% |
||
| 1090 | \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox% |
||
| 1091 | \bgroup\let\par\relax\outertabfalse% |
||
| 1092 | \let\@sharp##\let\protect\relax |
||
| 1093 | \@activatedots |
||
| 1094 | \lineskip\z@\baselineskip\z@\@preamble} |
||
| 1095 | |||
| 1096 | \def\@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule |
||
| 1097 | height\arraystretch \ht\strutbox |
||
| 1098 | depth\arraystretch \dp\strutbox |
||
| 1099 | width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto |
||
| 1100 | \bgroup\tabskip\z@\@arstrut\@preamble |
||
| 1101 | \tabskip\z@\cr}% |
||
| 1102 | \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox% |
||
| 1103 | \if #1t\vtop \else \if#1b\vbox \else \vcenter \fi\fi% |
||
| 1104 | \bgroup\let\par\relax% |
||
| 1105 | \let\@sharp##\let\protect\relax |
||
| 1106 | \@activatedots |
||
| 1107 | \lineskip\z@\baselineskip\z@\@preamble} |
||
| 1108 | |||
| 1109 | \def\@arrayclassz{\ifcase \@lastchclass \@acolampacol \or \@ampacol \or |
||
| 1110 | \or \or \@addamp \or |
||
| 1111 | \@acolampacol \or \@firstampfalse \@acol \fi |
||
| 1112 | \edef\@preamble{\@preamble |
||
| 1113 | \ifcase \@chnum |
||
| 1114 | \hfil$\relax\@sharp$\hfil \or $\relax\@sharp$\hfil |
||
| 1115 | \or \hfil$\relax\@sharp$\or |
||
| 1116 | \hfil$\relax\@sharp$\hfil \fi}} |
||
| 1117 | |||
| 1118 | \def\@tabclassz{\ifcase \@lastchclass\@acolampacol |
||
| 1119 | \or \@ampacol \or \or \or \@addamp \or \@acolampacol\or |
||
| 1120 | \@firstampfalse \new@tabacol \fi |
||
| 1121 | \edef\@preamble{\@preamble{% |
||
| 1122 | \ifcase \@chnum |
||
| 1123 | \hfil\ignorespaces\@sharp\unskip\hfil |
||
| 1124 | \or \ignorespaces\@sharp\unskip\hfil |
||
| 1125 | \or \hfil\hskip\z@ \ignorespaces\@sharp\unskip |
||
| 1126 | \or\hfil\@startcenterdot\@sharp\@endcenterdot\hfil |
||
| 1127 | \fi}}} |
||
| 1128 | |||
| 1129 | \def\@tabclassiv{\@addtopreamble\@nextchar} |
||
| 1130 | |||
| 1131 | |||
| 1132 | \def\new@tabacol{\edef\@preamble{\@preamble \hskip0pt% |
||
| 1133 | }} |
||
| 1134 | |||
| 1135 | \newif\iftableon |
||
| 1136 | |||
| 1137 | \def\@mkpream#1{\@firstamptrue\@lastchclass6 |
||
| 1138 | \def\@preamble{}% |
||
| 1139 | \def\protect{\noexpand\protect\noexpand}\let\@sharp\relax |
||
| 1140 | \let\@startpbox\relax\let\@endpbox\relax |
||
| 1141 | \let\@startcenterdot\relax \let\@endcenterdot\relax |
||
| 1142 | \@expast{#1}\expandafter\@tfor \expandafter |
||
| 1143 | \@nextchar \expandafter:\expandafter=\@tempa\do{\@testpach\@nextchar |
||
| 1144 | \ifcase \@chclass \@classz \or \@classi \or \@classii \or \@classiii |
||
| 1145 | \or \@classiv \or\@classv \fi% |
||
| 1146 | \iftableon\ifoutertab % |
||
| 1147 | \ifnum\@chclass=4 |
||
| 1148 | \@addtopreamble{\tabskip\z@}% |
||
| 1149 | \else |
||
| 1150 | \ifnum\@lastchclass=4 |
||
| 1151 | \@addtopreamble{\tabskip\z@ plus1fill}% |
||
| 1152 | \fi |
||
| 1153 | \fi |
||
| 1154 | \fi\fi |
||
| 1155 | \@lastchclass\@chclass}% |
||
| 1156 | \ifcase \@lastchclass \@acol |
||
| 1157 | \or \or \@preamerr \@ne\or \@preamerr \tw@\or \or \@acol \fi} |
||
| 1158 | |||
| 1159 | \def\@testpach#1{\@chclass \ifnum \@lastchclass=\tw@ 4 \else |
||
| 1160 | \ifnum \@lastchclass=3 5 \else |
||
| 1161 | \z@ \if #1c\@chnum \z@ \else |
||
| 1162 | \if #1l\@chnum \@ne \else |
||
| 1163 | \if #1r\@chnum \tw@ \else |
||
| 1164 | \if #1d\@chnum 3 \else % |
||
| 1165 | \@chclass \if #1|\@ne \else |
||
| 1166 | \if #1@\tw@ \else |
||
| 1167 | \if #1p3 \else \z@ \@preamerr 0\fi |
||
| 1168 | \fi \fi \fi \fi \fi \fi \fi % |
||
| 1169 | \fi} |
||
| 1170 | |||
| 1171 | |||
| 1172 | \def\@authoraddress{} \def\@title{} \def\@date{} \def\@preprint{} |
||
| 1173 | \def\and{\unskip, } |
||
| 1174 | % |
||
| 1175 | %\def\title#1{\gdef\@title{{\large\bf\centering\ignorespaces#1\vskip2.5pt}}} |
||
| 1176 | % |
||
| 1177 | %\def\date#1{\gdef\@date{{\small\rm\centering(\ignorespaces#1\unskip)\par}}} |
||
| 1178 | % |
||
| 1179 | % |
||
| 1180 | %\def\keywords#1{% |
||
| 1181 | %\@revmess{warning}{APS doesn't use keywords. I'll ignore them.}% |
||
| 1182 | %} |
||
| 1183 | % |
||
| 1184 | \mark{{}{}} % |
||
| 1185 | |||
| 1186 | \if@twoside % |
||
| 1187 | \def\ps@headings{\let\@mkboth\markboth |
||
| 1188 | \def\@oddfoot{}\def\@evenfoot{}% |
||
| 1189 | \def\@evenhead{\rm \hfil \sl \leftmark}% |
||
| 1190 | \def\@oddhead{{\sl \rightmark}\hfil \rm}% |
||
| 1191 | \def\sectionmark##1{\markboth {\uppercase{\ifnum \c@secnumdepth >\z@ |
||
| 1192 | \thesection\hskip 1em\relax \fi ##1}}{}}% |
||
| 1193 | \def\subsectionmark##1{\markright {\ifnum \c@secnumdepth >\@ne |
||
| 1194 | \thesubsection\hskip 1em\relax \fi ##1}}} |
||
| 1195 | \else % |
||
| 1196 | \def\ps@headings{\let\@mkboth\markboth |
||
| 1197 | \def\@oddfoot{}\def\@evenfoot{}% |
||
| 1198 | \def\@oddhead{{\sl \rightmark}\hfil \rm}% |
||
| 1199 | \def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\z@ |
||
| 1200 | \thesection\hskip 1em\relax \fi ##1}}}} |
||
| 1201 | \fi |
||
| 1202 | |||
| 1203 | \def\ps@myheadings{\let\@mkboth\@gobbletwo |
||
| 1204 | \def\@oddhead{{\sl\rightmark}\hfil \rm}% |
||
| 1205 | \def\@oddfoot{}\def\@evenhead{\rm \hfil\sl\leftmark}% |
||
| 1206 | \def\@evenfoot{}\def\sectionmark##1{}\def\subsectionmark##1{}} |
||
| 1207 | |||
| 1208 | \def\today{\ifcase\month\or |
||
| 1209 | January\or February\or March\or April\or May\or June\or |
||
| 1210 | July\or August\or September\or October\or November\or December\fi |
||
| 1211 | \space\number\day, \number\year} |
||
| 1212 | |||
| 1213 | \ps@plain % |
||
| 1214 | \pagenumbering{arabic} % |
||
| 1215 | \if@twoside\else\raggedbottom\fi % |
||
| 1216 | \if@twocolumn % |
||
| 1217 | \typeout{********** The AIPCP style is not meant to work with the |
||
| 1218 | twocolumn option. ^^J quitting ...} |
||
| 1219 | \@@end |
||
| 1220 | \else |
||
| 1221 | \sloppy |
||
| 1222 | \onecolumn % |
||
| 1223 | \raggedbottom % |
||
| 1224 | \fi |
||
| 1225 | |||
| 1226 | \let\@tempa\relax |
||
| 1227 | |||
| 1228 | |||
| 1229 | \pagestyle{headings} |
||
| 1230 | |||
| 1231 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1232 | % page-layout stuff |
||
| 1233 | % the next two lines are added on 9/1/95 --- HW |
||
| 1234 | \hoffset=0.6in |
||
| 1235 | \voffset=0.4in |
||
| 1236 | |||
| 1237 | \headheight=14pt |
||
| 1238 | \headsep=25pt |
||
| 1239 | \topskip=10pt |
||
| 1240 | \textheight=51pc |
||
| 1241 | \footskip1.5pc |
||
| 1242 | |||
| 1243 | \textwidth=422pt |
||
| 1244 | %\textwidth=33pc |
||
| 1245 | \oddsidemargin=-.4in |
||
| 1246 | \evensidemargin\oddsidemargin |
||
| 1247 | |||
| 1248 | \flushbottom % we want to try for this as a default |
||
| 1249 | |||
| 1250 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1251 | % footnote stuff |
||
| 1252 | |||
| 1253 | \skip\footins 12pt plus 5pt minus 3pt |
||
| 1254 | |||
| 1255 | \def\footnoterule{\kern-2pt\hrule width 2in\kern1.6pt\vspace*{4pt}} |
||
| 1256 | %\def\footnoterule{\kern-2pt\hrule width 2in\kern1.6pt} |
||
| 1257 | |||
| 1258 | \def\thefootnote{\arabic{footnote}}% |
||
| 1259 | |||
| 1260 | \long\def\@makefntext#1{\parindent 0pt\hsize\columnwidth\parskip0pt\relax |
||
| 1261 | \footnotesize\baselineskip12pt\def\strut{\vrule width0pt height0pt depth1.75pt\relax}% |
||
| 1262 | \mbox{$\m@th^{\@thefnmark)}$\hspace*{6pt}}#1} |
||
| 1263 | %$\m@th^{\@thefnmark)}$#1} |
||
| 1264 | |||
| 1265 | |||
| 1266 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1267 | %% here we set 12/14 as .... |
||
| 1268 | % section stuff |
||
| 1269 | |||
| 1270 | % iff a \section command is the first stuff after an abstract, |
||
| 1271 | % preemptively vskip back by heading's skip, so that first stuff |
||
| 1272 | % after abstract, whether text or heading, will be a constant distance. |
||
| 1273 | \def\section{\if@firststuff\vskip-18pt\hrule height0pt depth0pt\relax\fi |
||
| 1274 | % hrule above protects the preceding vskip from \@startsection, |
||
| 1275 | % which will try to undo it |
||
| 1276 | \@mainheadtrue \@startsection {section}{1}{\z@}{19pt plus1ex minus |
||
| 1277 | .2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}} |
||
| 1278 | %%% .2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}} |
||
| 1279 | \def\subsection{\@mainheadfalse |
||
| 1280 | \@startsection{subsection}{2}{\z@}{19pt plus1ex minus |
||
| 1281 | .2ex}{12pt plus1ex minus.2ex}{\reset@font\large\bf\centering}} |
||
| 1282 | \def\subsubsection{\@mainheadfalse |
||
| 1283 | \@startsection{subsubsection}{3}{\z@}{19pt plus1ex minus |
||
| 1284 | .2ex}{12pt plus1ex minus.2ex}{\reset@font\large\it\centering}} |
||
| 1285 | \def\paragraph{\@mainheadfalse |
||
| 1286 | \@startsection{paragraph}{4}{\parindent}{\z@}{-1ex}{\reset@font |
||
| 1287 | \large\it}} |
||
| 1288 | \def\subparagraph{\@mainheadfalse |
||
| 1289 | \@startsection{subparagraph}{4}{\parindent}{3.25ex plus1ex minus |
||
| 1290 | .2ex}{-1em}{\reset@font\large\bf}} |
||
| 1291 | |||
| 1292 | %% redefine \@ssect and \@sect s.t. \section{#1} and \section*{#1} will set |
||
| 1293 | %% #1 in uppercase! |
||
| 1294 | \def\@ssect#1#2#3#4#5{\@tempskipa #3\relax |
||
| 1295 | \ifdim \@tempskipa>\z@ |
||
| 1296 | \begingroup #4\@hangfrom{\hskip #1}{\interlinepenalty \@M |
||
| 1297 | \if@mainhead\uppercase{#5}\else #5\fi\par}\endgroup |
||
| 1298 | \else \def\@svsechd{#4\hskip #1\relax #5}\fi |
||
| 1299 | \@xsect{#3}} |
||
| 1300 | \def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth |
||
| 1301 | \let\@svsec\@empty\else |
||
| 1302 | \refstepcounter{#1}\edef\@svsec{\csname the#1\endcsname\hskip 1em}\fi |
||
| 1303 | \@tempskipa #5\relax |
||
| 1304 | \ifdim \@tempskipa>\z@ |
||
| 1305 | \begingroup #6\relax |
||
| 1306 | \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty \@M |
||
| 1307 | \if@mainhead\uppercase{#8}\else #8\fi\par}% |
||
| 1308 | \endgroup |
||
| 1309 | \csname #1mark\endcsname{#7}\addcontentsline |
||
| 1310 | {toc}{#1}{\ifnum #2>\c@secnumdepth \else |
||
| 1311 | \protect\numberline{\csname the#1\endcsname}\fi |
||
| 1312 | #7}\else |
||
| 1313 | \def\@svsechd{#6\hskip #3\relax %% \relax added 2 May 90 |
||
| 1314 | \@svsec \if@mainhead\uppercase{#8}\else #8\fi |
||
| 1315 | \csname #1mark\endcsname |
||
| 1316 | {#7}\addcontentsline |
||
| 1317 | {toc}{#1}{\ifnum #2>\c@secnumdepth \else |
||
| 1318 | \protect\numberline{\csname the#1\endcsname}\fi |
||
| 1319 | #7}}\fi |
||
| 1320 | \@xsect{#5}} |
||
| 1321 | |||
| 1322 | |||
| 1323 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1324 | % frontmatter stuff |
||
| 1325 | |||
| 1326 | \def\title#1{\gdef\@title{{\par\vskip-10pt\LARGE\bf |
||
| 1327 | \baselineskip20pt\centering\ignorespaces#1\vskip6pt}}% |
||
| 1328 | \setcounter{part}{0} |
||
| 1329 | \setcounter{table}{0} |
||
| 1330 | \setcounter{figure}{0} |
||
| 1331 | \setcounter{equation}{0} |
||
| 1332 | \setcounter{section}{0} |
||
| 1333 | \setcounter{subsection}{0} |
||
| 1334 | \setcounter{subsubsection}{0} |
||
| 1335 | \setcounter{paragraph}{0} |
||
| 1336 | } |
||
| 1337 | |||
| 1338 | \def\author#1{\expandafter\def\expandafter\@authoraddress\expandafter |
||
| 1339 | {\@authoraddress % |
||
| 1340 | {\dimen0=-\prevdepth \advance\dimen0 by2\baselineskip |
||
| 1341 | \nointerlineskip \centering |
||
| 1342 | \vrule height\dimen0 width0pt\relax\ignorespaces\large\rm#1\par |
||
| 1343 | }% |
||
| 1344 | }% |
||
| 1345 | } |
||
| 1346 | |||
| 1347 | \def\address#1{\expandafter\def\expandafter\@authoraddress\expandafter |
||
| 1348 | {\@authoraddress{\nointerlineskip\vskip2pc |
||
| 1349 | \footnotesize\it\centering\ignorespaces#1\par}}} |
||
| 1350 | |||
| 1351 | \def\ps@aipbook{\let\@mkboth\@gobbletwo |
||
| 1352 | \def\@oddhead{}% |
||
| 1353 | %\def\@oddhead{% |
||
| 1354 | %\kern-.4pt \vrule height7.4pt depth0pt width.4pt |
||
| 1355 | %\vrule height7.4pt depth-7.0pt width7.4pt |
||
| 1356 | %\hfill |
||
| 1357 | %\vrule height7.4pt depth-7pt width7.4pt |
||
| 1358 | %\vrule height7.4pt depth0pt width.4pt \kern-.4pt |
||
| 1359 | %}% |
||
| 1360 | \def\@oddfoot{} |
||
| 1361 | \def\@evenhead{}\let\@evenfoot\@oddfoot} |
||
| 1362 | \def\@maketitle{% |
||
| 1363 | \vspace*{30pt} |
||
| 1364 | \@title |
||
| 1365 | \ifdim\prevdepth=-1000pt \prevdepth0pt\fi |
||
| 1366 | \@authoraddress |
||
| 1367 | \@date |
||
| 1368 | } |
||
| 1369 | |||
| 1370 | \def\maketitle{\par |
||
| 1371 | \begingroup |
||
| 1372 | \let\cite\@bylinecite |
||
| 1373 | \global\@topnum\z@ % |
||
| 1374 | \thispagestyle{aipbook} |
||
| 1375 | \@maketitle |
||
| 1376 | \@thanks |
||
| 1377 | \endgroup |
||
| 1378 | %\let\maketitle\relax \let\@maketitle\relax |
||
| 1379 | %\let\@thanks\relax \let\@authoraddress\relax \let\@title\relax |
||
| 1380 | %\let\@date\relax \let\thanks\relax |
||
| 1381 | \def\@thanks{}\def\@authoraddress{}\def\@title{}\def\@date{} |
||
| 1382 | } |
||
| 1383 | |||
| 1384 | \def\abstract{\par |
||
| 1385 | \bgroup |
||
| 1386 | \ifdim\prevdepth=-1000pt \prevdepth0pt\fi |
||
| 1387 | \hsize\columnwidth |
||
| 1388 | \leftskip=2em \rightskip\leftskip |
||
| 1389 | \dimen0=-\prevdepth \advance\dimen0 by2pc \nointerlineskip |
||
| 1390 | \noindent \vskip3\baselineskip |
||
| 1391 | \nointerlineskip |
||
| 1392 | \noindent\footnotesize{\bf Abstract.}\relax |
||
| 1393 | } |
||
| 1394 | |||
| 1395 | \newif\if@firststuff |
||
| 1396 | |||
| 1397 | \def\endabstract{\par |
||
| 1398 | \nointerlineskip \vskip0pt |
||
| 1399 | \noindent \par |
||
| 1400 | \egroup |
||
| 1401 | \vskip2\baselineskip |
||
| 1402 | % hrule below turns off interlineskip |
||
| 1403 | \hrule depth0pt width0pt |
||
| 1404 | \global\everypar{\global\@firststufffalse}\global\@firststufftrue |
||
| 1405 | } |
||
| 1406 | |||
| 1407 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1408 | % running head stuff |
||
| 1409 | \def\righthead#1{\gdef\@oddhead{\reset@font\it\hfil \uppercase{#1}\hfil |
||
| 1410 | \llap{}}} |
||
| 1411 | \def\lefthead#1{\gdef\@evenhead{\reset@font\it\rlap{}\hfil |
||
| 1412 | \uppercase{#1}\hfil}} |
||
| 1413 | |||
| 1414 | \global\@twosidetrue |
||
| 1415 | \gdef\@oddhead{\reset@font\it\hfil} |
||
| 1416 | \gdef\@evenhead{\reset@font\it\hfil} |
||
| 1417 | |||
| 1418 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1419 | % ref stuff |
||
| 1420 | |||
| 1421 | \def\@biblabel#1{{#1.}} % |
||
| 1422 | |||
| 1423 | \def\@cite#1#2{[{#1\if@tempswa , #2\fi}]} % |
||
| 1424 | |||
| 1425 | \def\acknowledgments{% |
||
| 1426 | \section*{ACKNOWLEDGMENTS} |
||
| 1427 | } |
||
| 1428 | |||
| 1429 | \def\endacknowledgments{\relax} |
||
| 1430 | |||
| 1431 | \def\references{% |
||
| 1432 | \section*{REFERENCES} |
||
| 1433 | \list{\@biblabel{\arabic{enumiv}}}% |
||
| 1434 | {\labelwidth\WidestRefLabelThusFar \labelsep1ex % |
||
| 1435 | \leftmargin\labelwidth % |
||
| 1436 | \advance\leftmargin\labelsep % |
||
| 1437 | \ifdim\baselinestretch pt>1 pt % |
||
| 1438 | \parsep 4pt\relax % |
||
| 1439 | \else % |
||
| 1440 | \parsep 0pt\relax % |
||
| 1441 | \fi |
||
| 1442 | \itemsep0pt % |
||
| 1443 | \usecounter{enumiv}% |
||
| 1444 | \let\p@enumiv\@empty |
||
| 1445 | \def\theenumiv{\arabic{enumiv}}% |
||
| 1446 | }% |
||
| 1447 | \bgroup |
||
| 1448 | \footnotesize |
||
| 1449 | \let\newblock\relax % |
||
| 1450 | \sloppy\clubpenalty4000\widowpenalty4000 |
||
| 1451 | \sfcode`\.=1000\relax |
||
| 1452 | \ifpreprintsty\else\small\fi |
||
| 1453 | } |
||
| 1454 | |||
| 1455 | \def\endreferences{% |
||
| 1456 | \def\@noitemerr{\@warning{Empty `thebibliography' environment}}% |
||
| 1457 | \endlist \let\@SetMaxRefLabel\@gobble \egroup% |
||
| 1458 | } |
||
| 1459 | |||
| 1460 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
||
| 1461 | % table and figure stuff |
||
| 1462 | \def\figurename{FIGURE} |
||
| 1463 | |||
| 1464 | \def\fnum@table{\tablename\penalty10000\hskip.3em plus .1em\relax\thetable.} |
||
| 1465 | \def\thetable{\arabic{table}} |
||
| 1466 | |||
| 1467 | \def\fnum@figure{\figurename\penalty10000\hskip.3em plus .1em\relax\thefigure.} |
||
| 1468 | \def\thefigure{\arabic{figure}} |
||
| 1469 | |||
| 1470 | \newif\if@fig % added on 1/17/96 to fix a bug with Figure caption. |
||
| 1471 | |||
| 1472 | |||
| 1473 | \def\hop#1\fi{\fi } |
||
| 1474 | |||
| 1475 | \def\tableline{\noalign{\vskip-.5pt |
||
| 1476 | \hrule height.7pt depth0pt\vskip2pt}} |
||
| 1477 | |||
| 1478 | %%\long\def\@makecaption#1#2{% |
||
| 1479 | %%\vspace*{2pt} |
||
| 1480 | %%\setbox\@testboxa\hbox{\outertabfalse % |
||
| 1481 | %%\reset@font\footnotesize\rm |
||
| 1482 | %%{\bf#1}\penalty10000\hskip.5em plus.2em\ignorespaces#2} |
||
| 1483 | %%\leftskip\treflabwidth |
||
| 1484 | %%\setbox\@testboxb\vbox{\hsize\@capwidth\advance\hsize by\leftskip% |
||
| 1485 | %%\ifdim\wd\@testboxa>\@capwidth% |
||
| 1486 | %%%\small\baselineskip10pt% |
||
| 1487 | %%\parindent0pt% |
||
| 1488 | %%\unhbox\@testboxa\par% |
||
| 1489 | %%\else% |
||
| 1490 | %%\edef\ta{\@captype}\def\tb{figure}\ifx\ta\tb |
||
| 1491 | %% {\hsize\textwidth \hbox to\hsize{\hfil\box\@testboxa\hfil}}% |
||
| 1492 | %% \else \unhbox\@testboxa \par% |
||
| 1493 | %% \fi% |
||
| 1494 | %%\fi |
||
| 1495 | %%\vskip2pt |
||
| 1496 | %%}% |
||
| 1497 | %%\box\@testboxb |
||
| 1498 | %%} % |
||
| 1499 | %% |
||
| 1500 | |||
| 1501 | \long\def\@makecaption#1#2{% |
||
| 1502 | \vspace*{2pt} |
||
| 1503 | \setbox\@testboxa\hbox{\outertabfalse % |
||
| 1504 | \reset@font\footnotesize\rm |
||
| 1505 | {\bf#1}\penalty10000\hskip.5em plus.2em\ignorespaces#2} |
||
| 1506 | % next line is added on 1/17/96 to fix a bug with Figure caption. |
||
| 1507 | % we ahve to reset treflabwidth to 0pt for Figures --- otherwise treflabwidth |
||
| 1508 | % takes the value from the previous table (IF THERE IS ONE) which is bad for |
||
| 1509 | % a figure. |
||
| 1510 | \if@fig \treflabwidth0pt \relax\fi |
||
| 1511 | \leftskip\treflabwidth |
||
| 1512 | \setbox\@testboxb\vbox{\hsize\@capwidth\advance\hsize by\leftskip% |
||
| 1513 | \ifdim\wd\@testboxa>\@capwidth% |
||
| 1514 | %\small\baselineskip10pt% |
||
| 1515 | \parindent0pt% |
||
| 1516 | \unhbox\@testboxa\par% |
||
| 1517 | \else% |
||
| 1518 | \if@fig |
||
| 1519 | {\hsize\textwidth \hbox to\hsize{\hfil\box\@testboxa\hfil}}% |
||
| 1520 | \else \unhbox\@testboxa \par% |
||
| 1521 | \fi% |
||
| 1522 | \fi |
||
| 1523 | \vskip2pt |
||
| 1524 | }% |
||
| 1525 | \box\@testboxb |
||
| 1526 | } % |
||
| 1527 | |||
| 1528 | |||
| 1529 | \newif\ifknewlongtblwidth \global\knewlongtblwidthfalse |
||
| 1530 | %%%%%%%%%%%%%%% longtable stuff %%%%%%%%%%%%% |
||
| 1531 | |||
| 1532 | % initialize |
||
| 1533 | \if@longtable% if longtable is chosen, then input longtable.sty and ... |
||
| 1534 | \input longtable.sty |
||
| 1535 | \gdef\@widthforLT{\textwidth} |
||
| 1536 | |||
| 1537 | \LTpre0pt |
||
| 1538 | \LTpost0pt |
||
| 1539 | |||
| 1540 | %\newif\ifknewlongtblwidth \global\knewlongtblwidthfalse |
||
| 1541 | |||
| 1542 | \def\aiptable{% |
||
| 1543 | \advance\c@LT@tables by 1\relax% |
||
| 1544 | \tabbodyfont |
||
| 1545 | \expandafter\ifx\csname LT@\number\c@LT@tables\endcsname\relax% |
||
| 1546 | \knewlongtblwidthfalse |
||
| 1547 | \else\knewlongtblwidthtrue\fi |
||
| 1548 | \par |
||
| 1549 | \vskip2pc plus2ex minus.4ex |
||
| 1550 | \def\@tablenotes{}% |
||
| 1551 | \let\tableline\hline |
||
| 1552 | \global\tableontrue |
||
| 1553 | \bgroup\parindent=0pt |
||
| 1554 | \outertabtrue |
||
| 1555 | \LTtbalewidth=0pt |
||
| 1556 | \csname LT@\number\c@LT@tables\endcsname% |
||
| 1557 | \setcounter{tablenote}{0}% |
||
| 1558 | \ifknewlongtblwidth |
||
| 1559 | \gdef\@widthforLT{\LTtbalewidth} |
||
| 1560 | \LTcapwidth\LTtbalewidth% |
||
| 1561 | \else |
||
| 1562 | \gdef\@widthforLT{\textwidth} |
||
| 1563 | \LTcapwidth\textwidth% |
||
| 1564 | \fi |
||
| 1565 | \advance\c@LT@tables by -1 |
||
| 1566 | } |
||
| 1567 | |||
| 1568 | \def\endaiptable{% |
||
| 1569 | \global\tableonfalse\global\outertabfalse |
||
| 1570 | {\let\protect\relax\footnotesize\vskip-3pt% |
||
| 1571 | \treflabwidth=\hsize % reflabwidth is a handy temp |
||
| 1572 | \advance\treflabwidth by-\LTtbalewidth |
||
| 1573 | \divide\treflabwidth by2 |
||
| 1574 | \leftskip\treflabwidth |
||
| 1575 | \rightskip\leftskip |
||
| 1576 | \vskip-\lastskip\vskip4pt\nointerlineskip\parskip=0pt\noindent{\parskip=0pt% |
||
| 1577 | \@tablenotes\par}}\xdef\@tablenotes{}% |
||
| 1578 | \egroup |
||
| 1579 | \vskip1.4pc plus1ex minus.4ex\nointerlineskip% |
||
| 1580 | } |
||
| 1581 | |||
| 1582 | \newdimen\treflabwidth |
||
| 1583 | \newdimen\LTtbalewidth |
||
| 1584 | \def\LT@def@row{\ifx\LT@save@row\end |
||
| 1585 | \xdef\LT@save@row{\omit\kern\the\wd\tw@}% |
||
| 1586 | \xdef\LT@save@width{\advance\LTtbalewidth by \the\wd\tw@}\else% |
||
| 1587 | \xdef\LT@save@row{\omit\kern\the\wd\tw@&\LT@save@row}% |
||
| 1588 | \xdef\LT@save@width{\advance\LTtbalewidth by \the\wd\tw@\LT@save@width}% |
||
| 1589 | \fi} |
||
| 1590 | |||
| 1591 | \def\LT@make@row{% |
||
| 1592 | \global\expandafter\let\expandafter\LT@save@row |
||
| 1593 | \csname LT@\romannumeral\c@LT@tables\endcsname |
||
| 1594 | \global\expandafter\edef\expandafter\LT@save@width |
||
| 1595 | {\csname LT@\number\c@LT@tables\endcsname} |
||
| 1596 | \ifx\LT@save@row\relax\LT@blank@row\fi} |
||
| 1597 | |||
| 1598 | \def\endlongtable{% |
||
| 1599 | \LT@echunk |
||
| 1600 | \LT@start |
||
| 1601 | \unvbox\z@ |
||
| 1602 | \LT@get@widths |
||
| 1603 | \if@filesw\immediate\write\@auxout |
||
| 1604 | {\gdef\string\LT@\romannumeral\c@LT@tables{\LT@save@row}}\fi |
||
| 1605 | \if@filesw\immediate\write\@auxout |
||
| 1606 | {\string\expandafter\gdef\string\csname\space LT@\number\c@LT@tables\string\endcsname{\LT@save@width}} |
||
| 1607 | \fi |
||
| 1608 | \LT@mcw@rn |
||
| 1609 | \ifx\LT@save@row\LT@@save@row\else |
||
| 1610 | \LT@warn{Column widths have changed\MessageBreak |
||
| 1611 | in table \thetable}\fi |
||
| 1612 | \endgraf\penalty -\LT@end@pen |
||
| 1613 | \endgroup |
||
| 1614 | \global\@mparbottom\z@ |
||
| 1615 | \pagegoal\vsize |
||
| 1616 | \endgraf\penalty\z@\addvspace\LTpost |
||
| 1617 | \ifvoid\footins\else\insert\footins{}\fi} |
||
| 1618 | |||
| 1619 | |||
| 1620 | %% caption for longtable |
||
| 1621 | |||
| 1622 | \def\aftercapline{\noalign{\vskip-8pt}\hline\noalign{\vskip8pt}} |
||
| 1623 | \def\afterheadline{\noalign{\vskip1pt}\hline\noalign{\vskip3pt}} |
||
| 1624 | |||
| 1625 | \def\LT@c@ption[#1]#2{% |
||
| 1626 | \LT@mkcaption{{\footnotesize{\bf\fnum@table\hskip.5em plus.2em\ignorespaces}{#2}}}% |
||
| 1627 | \def\@tempa{#1}\ifx\@tempa\empty\else |
||
| 1628 | {\let\\\space |
||
| 1629 | \addcontentsline{lot}{table}{\protect\numberline{\thetable}{#1}}}% |
||
| 1630 | \fi} |
||
| 1631 | \def\LT@@c@ption#1{% |
||
| 1632 | \LT@mkcaption{{\footnotesize{\bf\fnum@table\hskip.5em plus.2em\ignorespaces}{#1}}}% |
||
| 1633 | {\let\\\space |
||
| 1634 | \addcontentsline{lot}{table}{\protect\numberline{\thetable}{#1}}}} |
||
| 1635 | |||
| 1636 | \def\LT@mkcaption#1{% |
||
| 1637 | \LT@mc{\LT@cols}{l}{\hbox to \z@{\parbox[t]{\LTcapwidth}{\footnotesize% |
||
| 1638 | \setbox\@tempboxa\hbox{#1}% |
||
| 1639 | \ifdim \wd\@tempboxa >\hsize #1 |
||
| 1640 | \else \hbox to\hsize{\box\@tempboxa\hfil}\fi |
||
| 1641 | \endgraf\hbox{}}}}} |
||
| 1642 | |||
| 1643 | |||
| 1644 | \LTleft=0pt plus 1fill minus 1fill |
||
| 1645 | \LTright=0pt plus 1fill minus 1fill |
||
| 1646 | \fi |
||
| 1647 | |||
| 1648 | \endinput |
||
| 1649 | |||
| 1650 | %% |