1: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

2: %                                                                     %

3: %              Scientific Word   Wrap/Unwrap  Version 2.5             %

4: %              Scientific Word   Wrap/Unwrap  Version 3.0             %

5: %                                                                     %

6: % If you are separating the files in this message by hand, you will   %

7: % need to identify the file type and place it in the appropriate      %

8: % directory.  The possible types are: Document, DocAssoc, Other,      %

9: % Macro, Style, Graphic, PastedPict, and PlotPict. Extract files      %

10: % tagged as Document, DocAssoc, or Other into your TeX source file    %

11: % directory.  Macro files go into your TeX macros directory. Style    %

12: % files are used by Scientific Word and do not need to be extracted.  %

13: % Graphic, PastedPict, and PlotPict files should be placed in a       %

14: % graphics directory.                                                 %

15: %                                                                     %

16: % Graphic files need to be converted from the text format (this is    %

17: % done for e-mail compatability) to the original 8-bit binary format. %

18: %                                                                     %

19: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

20: %                                                                     %

21: % Files included:                                                     %

22: %                                                                     %

23: % "/document/Kr3l3.tex", Document, 30311, 3/7/2002, 14:13:10, ""      %

24: % "/document/RevTeX/revtex.sty", Macro, 5679, 10/8/1997, 19:00:48, "" %

25: % "/document/RevTeX/aps.sty", Macro, 29749, 10/8/1997, 19:00:46, ""   %

26: % "/document/RevTeX/osa.sty", Macro, 29332, 10/8/1997, 19:00:46, ""   %

27: % "/document/RevTeX/prbbib.sty", Macro, 3099, 10/8/1997, 19:00:46, "" %

28: % "/document/RevTeX/prabib.sty", Macro, 4264, 10/8/1997, 19:00:46, "" %

29: % "/document/RevTeX/osabib.sty", Macro, 3665, 10/8/1997, 19:00:46, "" %

30: %                                                                     %

31: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

32: 

33: %%%%%%%%%%%%%%%%%%%%%% Start /document/Kr3l3.tex %%%%%%%%%%%%%%%%%%%%%%

34: 

35: 

36: \documentstyle[manuscript,osa]{revtex}

37: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

38: %TCIDATA{OutputFilter=LATEX.DLL}

39: %TCIDATA{Created=Tue Jan 22 10:56:27 2002}

40: %TCIDATA{LastRevised=Thu Mar 07 15:13:08 2002}

41: %TCIDATA{<META NAME="GraphicsSave" CONTENT="32">}

42: %TCIDATA{<META NAME="DocumentShell" CONTENT="Journal Articles\REVTeX - OSA Article">}

43: %TCIDATA{CSTFile=revtxtci.cst}

44: 

45: \newtheorem{theorem}{Theorem}

46: \newtheorem{acknowledgement}[theorem]{Acknowledgement}

47: \newtheorem{algorithm}[theorem]{Algorithm}

48: \newtheorem{axiom}[theorem]{Axiom}

49: \newtheorem{claim}[theorem]{Claim}

50: \newtheorem{conclusion}[theorem]{Conclusion}

51: \newtheorem{condition}[theorem]{Condition}

52: \newtheorem{conjecture}[theorem]{Conjecture}

53: \newtheorem{corollary}[theorem]{Corollary}

54: \newtheorem{criterion}[theorem]{Criterion}

55: \newtheorem{definition}[theorem]{Definition}

56: \newtheorem{example}[theorem]{Example}

57: \newtheorem{exercise}[theorem]{Exercise}

58: \newtheorem{lemma}[theorem]{Lemma}

59: \newtheorem{notation}[theorem]{Notation}

60: \newtheorem{problem}[theorem]{Problem}

61: \newtheorem{proposition}[theorem]{Proposition}

62: \newtheorem{remark}[theorem]{Remark}

63: \newtheorem{solution}[theorem]{Solution}

64: \newtheorem{summary}[theorem]{Summary}

65: 

66: \begin{document}

67: \title{EFFECTS OF\ THREE-BODY INTERACTIONS\ ON\ THE\ STRUCTURE\ AND THERMODYNAMICS

68: OF LIQUID KRYPTON }

69: \author{N. Jakse, J.M. Bomont and J.L. Bretonnet}

70: \address{Laboratoire de Th\'{e}orie de la Mati\`{e}re Condens\'{e}e, \\

71: Universit\'{e} de Metz, 1, bd F. D. Arago, CP 87811, \\

72: 57078 Metz Cedex 3, France}

73: \maketitle

74: 

75: \begin{abstract}

76: Large-scale molecular dynamics simulations are performed to predict the

77: structural and thermodynamic properties of liquid krypton using a potential

78: energy function based on the two-body potential of Aziz and Slaman plus the

79: triple-dipole Axilrod-Teller (AT) potential. By varying the strength of the

80: AT potential we study the influence of three-body contribution beyond the

81: triple-dipole dispersion. It is seen that the AT potential gives an overall

82: good description of liquid Kr, though other contributions such as higher

83: order three-body dispersion and exchange terms cannot be ignored.

84: \end{abstract}

85: 

86: \baselineskip=20pt

87: 

88: The knowledge of interactions in noble gases remains a fundamental question

89: that is not completely solved. Despite the simplicity of their closed-shell

90: electronic structure, it is well-known that a simple pair potential, though

91: giving the essential features of the structural and thermodynamic

92: properties, is not sufficient for a quantitative description, and many-body

93: effects have to be taken into account \cite{Bar1976}. Significant advances

94: have been made when it has been demonstrated \cite{End1965,Rea1992} that the

95: static structure factor $S(k)$ at small wave-number, $k$, is directly

96: related to the long range part of the effective potential between pairs of

97: atoms. It was therefore recognized that precise measurements of $S(k)$ could

98: provide a direct observation of the details of the interactions. During the

99: past few years, high precision experiments \cite

100: {Mag1996,For1997,For1998,Ben1999,Gua2001}, performed in the range $0.5<k<4$

101: nm$^{-1}$ using small angle neutron scattering facilities, have confirmed

102: the presence of an additional interaction at large distance that can be

103: associated to a three-body contribution at least for Kr \cite{For1997} and

104: Xe \cite{For1998}.

105: 

106: Long range interactions in noble gases arising from induced dipoles are

107: known as the London dispersion forces \cite{Lon1930}, and are expected to

108: behave as $r^{-6}$, where $r$ is the interatomic distance. Quantum

109: electromagnetic effects acting at very large separations \cite{Pow2001},

110: called retardation effects, are described by the Casimir-Polder potential 

111: \cite{Cas1948}, which is expected to fall off as $r^{-7}$ and to have a

112: negligibly small influence \cite{Rea1992} on $S(k)$. It is not surprising

113: that a simple Lennard-Jones (12-6) potential is a satisfactory effective

114: pair potential at first sight since it can be seen as including mean effects

115: coming from the different dipole-dipole, multipole-multipole as well as

116: higher order terms. However, a better understanding of the interactions lies

117: in a careful examination of the various genuine contributions of the

118: multipole expansion, which contains two-body $dd$, $dq$, $qq$ terms, etc.,

119: as well as irreducible three-body contributions such as $ddd$, $ddq$, $dqq$, 

120: $qqq$, etc., where $d$ and $q$ denote the dipole and quadrupole moment,

121: respectively. According to Barker and Henderson \cite{Bar1976}, four --and

122: more--\ body terms are very small and can be neglected. The two-body

123: potential of noble gases is often taken in the very accurate

124: Hartree-Fock-dispersion form propounded by Aziz and Slaman \cite

125: {Azi1985,Azi1986}, while three-body dispersion effects are often represented

126: by the $ddd$ term in the form given by Axirod and Teller \cite{Axi1943} that

127: represents the major contribution. The other three-body contributions

128: mentioned above, which can be modelled by the expressions of Bell \cite

129: {Bel1970}, are known to have a small influence although it is not clear

130: whether the agreement with the experiment could be improved when these are

131: taken into account. At high densities, beside dispersion terms, three-body

132: overlap contributions such as exchange effects may come into play \cite

133: {Cop1968,Lou1988,Sad1996,Lot1997}.

134: 

135: It is tempting to consider an effective three-body potential of the

136: Axirod-Teller \cite{Axi1943} (AT) form 

137: \begin{equation}

138: u_{3}({\bf r}_{i},{\bf r}_{j},{\bf r}_{k})=\nu \frac{1+3\cos \theta _{i}\cos

139: \theta _{j}\cos \theta _{k}}{r_{ij}^{3}r_{ik}^{3}r_{jk}^{3}}  \label{EQAT}

140: \end{equation}

141: to take all these three-body contributions into account by modifying the

142: strength $\nu $ to include them empirically. In Eq. (\ref{EQAT}) $\theta

143: _{i} $, $\theta _{j}$ and $\theta _{k}$ denote, respectively, the angles at

144: vertex $i$, $j$ and $k$ of the triangle ($i,j,k$) with sides $r_{ij}=\left| 

145: {\bf r}_{j}-{\bf r}_{i}\right| $, $r_{ik}=\left| {\bf r}_{k}-{\bf r}%

146: _{i}\right| $ and $r_{jk}=\left| {\bf r}_{k}-{\bf r}_{j}\right| $. Usually,

147: the AT potential is designed to represent the $ddd$ contribution only with a

148: value $\nu \equiv \nu _{ddd}=2.204\times 10^{-26}$ J nm$^{9}$ as prescribed

149: by Leonard and Barker \cite{Leo1975}. Such an effective three-body potential

150: was recently used to study the liquid-vapor phase equilibria of argon \cite

151: {Miy1994} as well as the small-$k$ part of the static structure factor of

152: krypton in the dense liquid \cite{Gua2001}. For instance, to interpret

153: correctly their experimental data, Guarini {\it et al.} \cite{Gua2001} have

154: increased the strength $\nu $ by 65 \%, indicating that other three-body

155: contributions play an important role. Conversely, in a recent work \cite

156: {Bom2002}, we have shown that the missing contributions would have the

157: effect of slightly reducing the strength of the AT potential. Nevertheless,

158: these studies are not completely conclusive since calculations where carried

159: out within the integral equations theory, in which the three-body

160: contribution has to be treated as an approximate state-dependent effective

161: pair potential \cite{Cas1970}, which is not unique.

162: 

163: The purpose of this article is to analyze the influence of the three-body

164: interactions taken in the form of Eq. (\ref{EQAT}), to decide what is the

165: effective value of the strength $\nu $ for an accurate description of liquid

166: Kr. Three different situations are considered by varying $\nu $: a value of $%

167: \nu =0$ that corresponds to the pure two-body potential given by Aziz and

168: Slaman \cite{Azi1986}, a value of $\nu =\nu _{ddd}$ representing only the $%

169: ddd$ contribution, and a value $\nu _{eff}=1.65\nu _{ddd}$ which is believed

170: to reproduce the critical parameters of Kr within 1 \% \cite{Gua2001}.

171: Changing the strength of the AT potential is a convenient means to measure

172: of the departure from the $ddd$ term and, by comparison with the

173: experiments, could provide useful information on the contribution coming

174: from all other three-body terms that are omitted in the modelling of the

175: interaction between Kr atoms. This work represents an extension to the

176: liquid phase of our preceding studies on Kr in the gaseous phase \cite

177: {Bom1998,Jak2000b}. Thus, for a given interaction model, we carry out

178: molecular dynamics (MD) simulations to determine $S(k)$ as well as the

179: internal energy and the virial pressure. In this context, MD is a powerful

180: method \cite{All1989,Hai1992} since the three-body interactions can be

181: tackled without incurring the shortcomings of the approximate integral

182: equations. As a matter of fact, the treatment of the three-body potential (%

183: \ref{EQAT}) is not subject to arbitrariness since the resulting forces are

184: derived in an exact manner \cite{Hoh1981}, as for the two-body ones.

185: 

186: In order to extract a meaningful structure factor $S(k)$ from the MD

187: simulations, the pair correlation $g(r)$ is the key quantity that has to be

188: calculated as precisely as possible. Therefore, we have performed

189: large-scale MD in the sense that (i) a large enough simulation cell has been

190: considered so that $g(r)$ has a sufficient spatial extension to yield a

191: correct $S(k)$ by Fourier transform, especially at low $k$, and (ii) a

192: large\ number of time steps are produced in order to get a significant part

193: of the phase space trajectory, essential for the statistics. As three-body

194: forces are involved, this represents a huge amount of computer time, and we

195: have used a parallel algorithm described in some details in a previous work 

196: \cite{Jak2000}. Simulations with the different values of $\nu $ in the AT

197: potential have been performed in the microcanonical ($NVE$) ensemble with a

198: time step $\Delta t=5.67\cdot 10^{-15}$ s using $N=6912$ particles in a

199: cubic cell subject to the standard boundary conditions. The cutoff radius of

200: the interactions is $r_{c}=2.5r_{m}$, where $r_{m}=0.4008$ nm is the minimum

201: of the AS potential. For the three-body potential, this implies that

202: triplets of particles in which two or three distances of separations are

203: greater than $r_{c}$ are ignored in the calculation of the forces. In order

204: to investigate the influence of $r_{c}$ for the two-body potential, a value

205: of $4r_{m}$ is taken in specific cases. The typical duration of the runs is $%

206: 113$ ps from which $1300$ independent configurations are extracted for the

207: statistical analysis of the physical quantities. Six states of liquid Kr

208: from the vicinity of the critical point to that of the triple point have

209: been studied, which are those investigated by Guarini {\it et al.} \cite

210: {Gua2001} and by Barocchi {\it et al.} \cite{Bar1993}, respectively at low-

211: and large-$k$. These states correspond to temperature $T=199$ K and

212: densities $n=12.10$, $11.66$ and $11.31$ nm$^{-3}$, $T=169$ K with $n=14.57$

213: and $14.22$ nm$^{-3}$, and $T=130$ K \ with $n=16.83$ nm$^{-3}$.

214: 

215: In Fig. 1, we present the large $k$ behavior of $S(k)$ for the three

216: different temperatures and we compare the MD curves, calculated with the

217: three different values of $\nu $, \ to the experimental data of Barocchi 

218: {\it et al.} \cite{Bar1993}. As the temperature increases and density

219: decreases, the first sharp diffraction peak as well as the subsequent

220: oscillations become less pronounced. This is well predicted by the MD

221: results since a remarkable agreement with the experiments is found whatever

222: the values of $\nu $. It can be seen that the three-body contributions have

223: only a minor influence even if a more careful examination shows that, at low

224: temperature, the height of the first peak is better described without the AT

225: potential while, at high temperature, a closer agreement is obtained when it

226: is included. At low-$k$, the three potential energy functions give rise to

227: completely different behaviors of $S(k)$ and the best results seem to be

228: those obtained with the $ddd$ interaction.

229: 

230: Let us now focus on the low-$k$ part of $S(k)$ in more details. We compare

231: the MD curves to the recent small-angle scattering data of Guarini {\it et

232: al.} \cite{Gua2001} along the $T=199$ K and $T=169$ K isotherms in Fig. 2

233: (a) and (b), respectively. At the highest temperature, near the critical

234: isotherm, a good agreement is found with the experiment at the three

235: densities with the $ddd$ potential. Examining the influence of $\nu $ at

236: density $n=12.10$ nm$^{-3}$, it appears that the AS two-body potential alone

237: ($\nu =0$) is not able to predict the small-$k$ part of $S(k)$

238: satisfactorily, while the effective AT contribution ($\nu =\nu _{eff}$)

239: gives rise to a structure factor which is underestimated. The chain curve

240: corresponds to $S(k)$ obtained with the AS potential alone and a cutoff

241: radius $r_{c}=4r_{m}$. The influence of $r_{c}$ is seen only below $2.5$ nm$%

242: ^{-1}$ and the curvature is slightly changed. As a result, this would have

243: the effect of increasing the values of $S(k)$ in this region whatever the

244: potential used. Taking $r_{c}=4r_{m}$ when the three-body contribution is

245: considered is computationally too costly and could represent a challenge for

246: future developments of the present MD code. However, for the three-body

247: potential, it is worth noting that, even with $r_{c}=2.5r_{m}$,

248: configurations in which one pair of particles of a triplet is separated up

249: to $5r_{m}$ are taken into account in the calculation of the forces. In

250: addition, the AT potential given by Eq. (\ref{EQAT}) decays as $r^{-9}$

251: therefore taking a cutoff radius larger than $2.5r_{m}$ seems not to be

252: necessary. The same observation can be drawn along the $T=169$ K isotherm,

253: as shown in Fig 2 (b), and in this case a very good agreement with the

254: experimental curves is seen when the $ddd$ potential is taken into account.

255: Interesting enough, both experimental data sets of Guarini {\it et al}. \cite

256: {Gua2001} and Barocchi {\it et al.} \cite{Bar1993}, which connect to each

257: other very well around $4$ nm$^{-1}$, lie between the curves corresponding

258: to $\nu =\nu _{ddd}$ and $\nu =\nu _{eff}$, for $k$ values in the range

259: between $2.5$ and $6.5$ nm$^{-1}.$

260: 

261: At $T=130$ K the situation is less clear as it can be seen in Fig. 3. While

262: the AS potential is also not sufficient to predict the small-$k$ behavior of 

263: $S(k)$, this time the best concordance with the experiment is obtained by

264: using $\nu =\nu _{eff}$. Nevertheless, the latter effective AT contribution

265: would have a tendency to underestimate the $PVT$ data while the $ddd$

266: strength gives the best prediction. In this case, taking again a cutoff

267: radius of $4r_{m}$ for the two-body potential alone (chain curve) has only a

268: negligible influence on $S(k)$, therefore our results for the two- plus

269: three-body might be correct. It should be stressed that the amplitude of $%

270: S(k)$ is very small at such a low temperature and high density state, and

271: the relative difference between the MD curves with $\nu _{ddd}$ and $\nu

272: _{eff}$ is of the same order of magnitude than the dispersion of the

273: experimental data points, which is about 10 \%. At this stage, we refrain

274: from drawing any conclusion and it would be desirable to dispose of an

275: accurate small angle scattering experiment for this thermodynamic state.

276: 

277: We also examine the influence of the three-body potential on the internal

278: energy $E$ and the virial pressure $P$ gathered in Table 1. Long-range

279: corrections have been applied, due to the truncation of the AS and the AT

280: potentials during the simulation at $r_{c}=2.5r_{m}$. The corrections to the

281: two-body part of the energy and the pressure are respectively $%

282: -0.153nr_{m}^{3}$ and $-0.312\left( nr_{m}^{3}\right) ^{2}$. For the

283: three-body parts, the corrections are estimated numerically using the

284: integral equation method \cite{Jak2000b}. For the energy, we obtain $%

285: 0.007\left( nr_{m}^{3}\right) ^{2}$ for $\nu _{ddd}$ and $0.012\left(

286: nr_{m}^{3}\right) ^{2}$ for $\nu _{eff}$, while for the pressure we get $%

287: 0.031\left( nr_{m}^{3}\right) ^{3}$ for $\nu _{ddd}$ and $0.051\left(

288: nr_{m}^{3}\right) ^{3}$ for $\nu _{eff}$. These quantities are expressed in

289: the unit of the minimum of the AS potential $\varepsilon =2.777\cdot

290: 10^{-21} $ J. The influence of $\nu $ on the energy is moderate and does not

291: exceed $9 $ \% with respect to that of the two-body potential, even with $%

292: \nu _{eff}$. On the contrary, it has a large effect on the pressure. For the

293: two-body potential alone, the pressure is always negative, while by

294: including the three-body potential contribution, it becomes positive in the

295: majority of cases. In addition, $\nu _{eff}$ yields pressure values which

296: are too high, while the $ddd$ strength gives the best predictions, even if

297: it is always smaller compared to the experimental data. Again, the

298: calculated pressures with $\nu _{ddd}$ and $\nu _{eff}$ enclose the

299: experimental values.

300: 

301: Regarding the results presented above, it appears that the details of the

302: interaction model has no significant influence on $S(k)$ at large $k$, as

303: shown in Fig. 1. Even the AS two-body potential alone is able to reproduce

304: the structure factor with a good degree of accuracy. For the structure

305: factor at small scattering angle and the pressure, the three-body

306: interactions cannot be ignored in the liquid state. Moreover, it is seen

307: that the triple-dipole contribution gives the best agreement with the

308: experiments and therefore represents the main three-body effect. A more

309: precise examination shows that the structural and thermodynamic properties

310: depart substantially from the experiments even with the model combining the

311: AS two-body potential plus $ddd$ contribution. Indeed, discrepancies remain

312: (i) on the small $k$ part of $S(k)$ in the range between $2.5$ and $6.5$ nm$%

313: ^{-1}$, where the calculated values are higher that the experimental ones,

314: especially for isotherms $T=169$ K and $T=130$ K, and (ii) on the pressure

315: where the theoretical results are systematically below the measurements, and

316: even remain negative for two thermodynamic states. Since the pressure varies

317: linearly with $\nu $, as it can be seen in Table 1, better results should be

318: obtained by increasing the value of $\nu _{eff}$ between $1.20\nu _{ddd}$

319: and $1.25\nu _{ddd}$, whatever the temperature.

320: 

321: We are led to the same conclusion as Guarini {\it et al. }\cite{Gua2001}{\it %

322: \ }that the value of $\nu $ in Eq. (\ref{EQAT}) has to be increased with

323: respect to that of the triple-dipole $\nu _{ddd}$. However, by the light of

324: the present MD calculations, an effective strength $\nu _{eff}=1.65\nu

325: _{ddd} $ seems to be too important, and we estimate that the additional

326: three-body terms beyond the $ddd$ one should represent up to $25$ \% of it.

327: Now the question arises to know what is the nature of the missing

328: contributions that will take a non negligible part in the interaction model.

329: According to Copeland and Kestner \cite{Cop1968} who studied liquid argon,

330: two majors three-body potentials beyond the $ddd$ one play an important

331: role, namely the exchange overlap and the $ddq$ dispersion acting

332: respectively at short and long interatomic distances. Both potentials are

333: known to have significant influence \cite{Lou1988,Bom2001}, however, while

334: the $ddq$ potential has the same sign as the $ddd$ contribution, the

335: exchange one has an opposite sign. Therefore, it will be of primary

336: importance to investigate their interplay in liquid krypton and whether they

337: improve the description of the interactions in liquid Kr when added to the $%

338: ddd$ term. It has been recently shown by van der Hoef and Madden \cite

339: {Hoef1999} in their simulation study of liquid argon that the $ddq$

340: contribution on the pressure is small but not negligible and it would be

341: interesting to extend these results in the case of Kr, not only for the

342: pressure but also for the structure factor.

343: 

344: At very small wave-number, i.e. $k<2.5$ nm$^{-1}$, the MD results of $S(k)$

345: underestimate the experimental curves as well as the $PVT$ data, which is

346: particularly visible along the isotherm $T=199$ K displayed in Fig. 2 (a).

347: As MD simulations are concerned, we are unavoidably confronted to finite

348: size effects and this fact might be attributed mainly to two factors: the

349: truncation of the pair-correlation functions at the half of the box size,

350: and the use of a cutoff radius of the interactions. Therefore, the $S(k)$

351: calculated by Fourier transform are subject to large uncertainties and must

352: be taken cautiously. Moreover, near the critical region, the correlation

353: length can exceed the size of the simulation box and for this reason the

354: present MD simulations might be not able to catch the correct behavior of $%

355: S(k)$ at $T=199$ K. As a matter of fact, as pointed out by Wilding \cite

356: {Wil1997} and Rovere \cite{Rov1993}, in the thermodynamic limit, critical

357: phenomena, like the divergence of $S(0)$, are smeared out and shifted.

358: 

359: In conclusion, MD simulations have been carried out for Kr in the liquid

360: phase for which new small angle scattering experiments were recently

361: performed \cite{Gua2001,Bar1993}. This study completes preceding works on

362: the low density and high temperature states of Kr \cite

363: {Bom1998,Jak2000b,Jak2000}, where it was demonstrated that the Aziz and

364: Slaman two-body potential associated to the Axirod and Teller triple-dipole

365: contribution gives a excellent representation of interactions in the gaseous

366: phase. Here, we have shown that the latter potential energy function

367: predicts the essential characteristics of structural properties in liquid

368: Kr, even though we believe that an accurate description of $S(k)$ at low $k$

369: and the thermodynamic properties requires that other three-body

370: contributions such as the dipole-dipole-quadrupole and the exchange overlap

371: potentials are taken into account. Large scale MD simulations including

372: these additional contributions will be performed in the near future.

373: 

374: The CINES (Centre Informatique National de l'Enseignement Sup\'{e}rieur) is

375: gratefully acknowledged for providing us with computer time under Project No

376: TMC1928. The authors would also like to thank Pr. R. Magli and Dr. E.

377: Guarini for providing us with the experimental data.

378: 

379: \newpage

380: 

381: \begin{references}

382: \bibitem{Bar1976}  J. A. Barker and D. Henderson, Rev. Mod. Phys. {\bf 48},

383: 589 (1976).

384: 

385: \bibitem{End1965}  J. E. Enderby, T Gaskell and H. H. March, Proc. Phys Soc.

386: London. {\bf 85}, 217 (1965).

387: 

388: \bibitem{Rea1992}  L. Reatto and M. Tau, J. Phys.: Condens. Matter {\bf 4},

389: 1 (1992).

390: 

391: \bibitem{Mag1996}  R. Magli, F. Barocchi, P. Chieux, R. Fontana, Phys. Rev.

392: Lett. {\bf 77}, 846 (1996).

393: 

394: \bibitem{For1997}  F. Formisano, C. J. Benmore, U. Bafile, F. Barocchi, P.

395: A. Egelstaff, R. Magli and P. Verkerk, Phys. Rev. Lett. {\bf 79}, 221 (1997).

396: 

397: \bibitem{For1998}  F. Formisano, F. Barocchi and R. Magli, Phys. Rev. E {\bf %

398: 58}, 2648 (1998).

399: 

400: \bibitem{Ben1999}  \label{Ben1999}C. J. Benmore, F. Formisano, R. Magli, U.

401: Bafile, P. Verkerk, P. A. Egelstaff, and F. Barocchi, J. Phys.: Condens.

402: Matter {\bf 11}, 3091(1999).

403: 

404: \bibitem{Gua2001}  \label{Gua2001}E. Guarini, R. Magli, M. Tau, F. Barocchi,

405: G. Casanova and L. Reatto, Phys. Rev. E {\bf 63}, 052201 (2001).

406: 

407: \bibitem{Lon1930}  F. London, Z. Phys. {\bf 63}, 245 (1930).

408: 

409: \bibitem{Pow2001}  E. A. Power, Eur. J. Phys., {\bf 22}, 453 (2001).

410: 

411: \bibitem{Cas1948}  H. B. G. Casimir and D. Polder, Phys. Rev. {\bf 73}, 360

412: (1948).

413: 

414: \bibitem{Azi1985}  R. A. Aziz and M. J. Slaman, Mol. Phys. {\bf 57}, 827

415: (1985).

416: 

417: \bibitem{Azi1986}  R. A. Aziz and M. J. Slaman, Mol. Phys. {\bf 58}, 679

418: (1986).

419: 

420: \bibitem{Axi1943}  B. M. Axilrod and E. Teller, J. Chem. Phys. {\bf 11}, 299

421: (1943).

422: 

423: \bibitem{Bel1970}  R. J. Bell, J. Phys. B {\bf 3}, 731 (1970).

424: 

425: \bibitem{Cop1968}  D. A. Copeland and N. R. Kestner, J. Chem. Phys. {\bf 49}%

426: , 5214 (1968).

427: 

428: \bibitem{Lou1988}  P. Loubeyre, Phys. Rev. B {\bf 37}, 5432 (1988).

429: 

430: \bibitem{Sad1996}  R. J. Sadus and J. M. Prausnitz, J. Chem. Phys. {\bf 104}%

431: , 4784 (1996).

432: 

433: \bibitem{Lot1997}  V. F. Lotrich and K. Szalewicz, Phys. Rev. Lett. {\bf 79}%

434: , 1301 (1997).

435: 

436: \bibitem{Leo1975}  P. J. Leonard and J. A. Barker, Theor. Chem. Adv.

437: Perspect. {\bf 1}, 117 (1975).

438: 

439: \bibitem{Miy1994}  Y. Miyano, Fluid Phase Equilib. {\bf 95}, 31 (1994).

440: 

441: \bibitem{Bom2002}  J. M. Bomont, N. Jakse and J.\ L. Bretonnet (to be

442: published).

443: 

444: \bibitem{Cas1970}  G. Casanova, R. J. Dulla, D. A. Johan, J. S. Rowlinson

445: and G. Savile, Mol. Phys. {\bf 18}, 589 (1970).

446: 

447: \bibitem{All1989}  M. P. Allen and D. J. Tildesley, ''{\em Computer

448: Simulation of liquids}`` (Clarendon Press 1989).

449: 

450: \bibitem{Hai1992}  J. M. Haile, ''{\em Molecular Dynamics Simulation :

451: Elementary Methods``}, ed. John Wiley and Sons Inc. (1992).

452: 

453: \bibitem{Hoh1981}  C. Hoheisel, Phys. Rev.{\em \ }A {\bf 23,} 1998 (1981).

454: 

455: \bibitem{Bom1998}  J. M. Bomont, N. Jakse and J. L. Bretonnet, Phys. Rev.%

456: {\bf \ }B{\bf \ 57}, 10217 (1998).

457: 

458: \bibitem{Jak2000b}  N. Jakse, J. M. Bomont, I. Charpentier and J. L.

459: Bretonnet, Phys. Rev.{\bf \ }E{\bf \ 62}, 3671 (2000).

460: 

461: \bibitem{Jak2000}  N. Jakse and I. Charpentier, Mol. Sim. {\bf 23}, 293

462: (2000).

463: 

464: \bibitem{Bar1993}  \label{Bar1993}F. Barocchi, P. Chieux, R Magli, L. Reatto

465: and M. Tau, J. Phys.: Condens. Matter {\bf 5}, 42991(1993).

466: 

467: \bibitem{Bom2001}  J. M. Bomont, J. L. Bretonnet and M. A. van der Hoef, J.

468: Chem. Phys. {\bf 114}, 5674 (2001).

469: 

470: \bibitem{Hoef1999}  M. A. van der Hoef and P. A. Madden, J. Chem. Phys. {\bf %

471: 111}, 1520 (1999).

472: 

473: \bibitem{Juz1976}  \label{Juz1976}J. Juza and O. Sifner, Acta Technica CSAV 

474: {\bf 1}, 1 (1976).

475: 

476: \bibitem{Wil1997}  N. B. Wilding, J. Phys.: Condens. Matter {\bf 9}, 585

477: (1997).

478: 

479: \bibitem{Rov1993}  M. Rovere, J. Phys.: Condens. Matter {\bf 5}, B193 (1993).

480: \end{references}

481: 

482: \newpage

483: 

484: \section*{Captions}

485: 

486: \begin{description}

487: \item  {\bf Figure 1. }Structure factor $S(q)$ for $T=130$ K, at $n=16.83$ nm%

488: $^{-3}$, for $T=169$ K, at $n=14.57$ nm$^{-3}$ and for $T=199$ K, at $%

489: n=12.10 $ nm$^{-3}$ from the top to the bottom (the curves for $T=169$ K and 

490: $T=130$ K are shifted upwards by an amount of $1$ and $2$, respectively),

491: calculated by molecular dynamics with $\nu =0$ (dashed lines) $\nu =\nu

492: _{ddd}$ (solid lines) and $\nu =\nu _{eff}$ (dotted lines) as described in

493: the text. Open circles correspond to the experimental data of Ref. \ref

494: {Bar1993}, while full circles stand for the $PVT$ data of Ref. \ref{Juz1976}.

495: 

496: \item  {\bf Figure 2.} Structure factor $S(q)$ at small scattering angle for

497: isotherm (a) $T=199$ K, at $n=12.10$ nm$^{-3}$, $n=11.66$ nm$^{-3}$ and $%

498: n=11.31$ nm$^{-3}$, and (b) $T=169$ K, at $n=14.57$ nm$^{-3}$.and $14.22$ nm$%

499: ^{-3}$. The curves for $n=11.66$ nm$^{-3}$ and $n=11.31$ nm$^{-3}$ are

500: shifted upwards by an amount of $0.5$ and $1$, respectively, and that of $%

501: 14.22$ nm$^{-3}$ by an amount of $0.2$. Molecular dynamics results are

502: carried out with $\nu =0$ (dashed lines), $\nu =\nu _{ddd}$ (solid lines)

503: and $\nu =\nu _{eff}$ (dotted lines) as described in the text. The chain

504: curve corresponds to MD results with $\nu =0$ and a cutoff radius of $4r_{m}$%

505: . Open circles correspond to the experimental data of Ref. \ref{Bar1993},

506: open triangles correspond to the experimental data of Ref. \ref{Gua2001} and

507: full circles stand for the $PVT$ data of Ref. \ref{Juz1976}.

508: 

509: \item  {\bf Figure 3. }Structure factor $S(q)$ at small scattering angle for 

510: $T=130$ K, at $n=16.83$ nm$^{-3}$. Same captions as in Fig.1.

511: 

512: \item  {\bf Table 1}. Excess internal energy, $E^{\text{ex}}/N\varepsilon $,

513: and pressure, $P\left( r_{m}\right) ^{3}/\varepsilon $, calculated by

514: molecular dynamics for the different thermodynamic states considered in this

515: work. Subscripts 2 and 3 stand respectively for the two- and two- plus

516: three-body parts of the internal energy. $P_{\text{exp}}$ corresponds to the

517: experimental values of Ref. \ref{Gua2001}. The numbers in brackets represent

518: the standard deviations that affect the last decimal of the temperature,

519: energy and pressure extracted from the simulation.

520: \end{description}

521: 

522: \newpage

523: 

524: \section*{Table}

525: 

526: \begin{center}

527: \hspace*{-0.5in}\bigskip 

528: \begin{tabular}{rrrrrrrr}

529: \hline\hline

530: $T$ (K) & $\rho $ (nm$^{-3}$) & $\nu /\nu _{ddd}$ & $E_{2}^{\text{ex}%

531: }/N\varepsilon $ & $E_{3}^{\text{ex}}/N\varepsilon $ & $Pr_{m}^{3}/%

532: \varepsilon $ & $P$ (bar) & $P_{\text{exp}}$ (bar) \\ \hline

533: 130{\small \ (1)} & 16.83 & $0$ & $-4.962${\small \ (6)} & 

534: \multicolumn{1}{c}{$-$} & $-0.87${\small \ (4)} & $-375.4$ &  \\ 

535: &  & 1 & $-4.953${\small \ (6)} & $-4.689${\small \ (6)} & $-0.12${\small \

536: (4)} & $-51.8$ & 0 \\ 

537: &  & 1.65 & $-4.958${\small \ (6)} & $-4.522${\small \ (6)} & $0.33$ {\small %

538: (4)} & $142.4$ &  \\ \hline

539: 169{\small \ (1)} & 14.57 & 0 & \multicolumn{1}{l}{$-4.151${\small \ (7)}} & 

540: \multicolumn{1}{c}{$-$} & \multicolumn{1}{l}{$-0.37${\small \ (5)}} & $%

541: -159.6 $ &  \\ 

542: &  & 1 & $-4.127${\small \ (7)} & $-3.938${\small \ (7)} & $0.06${\small \

543: (4)} & $25.9$ & $61.7$ \\ 

544: &  & 1.65 & $-4.126${\small \ (7)} & $-3.818${\small \ (7)} & $0.30${\small %

545: \ (4)} & $129.4$ &  \\ \hline

546: 169{\small \ (1)} & 14.22 & 1 & \multicolumn{1}{l}{$-4.034${\small \ (7)}} & 

547: \multicolumn{1}{l}{$-3.855${\small \ (7)}} & $-0.05$ {\small (4)} & $-21.5$

548: & $20.1$ \\ \hline

549: 199{\small \ (1)} & 12.10 & 0 & $-3.392${\small \ (8)} & \multicolumn{1}{c}{$%

550: -$} & $-0.06${\small \ (4)} & $-25.9$ &  \\ 

551: &  & 1 & $-3.358${\small \ (9)} & $-3.232${\small \ (9)} & $0.11${\small \

552: (4)} & $49.6$ & $73.1$ \\ 

553: &  & 1.65 & $-3.344${\small \ (8)} & $-3.138${\small \ (8)} & $0.27${\small %

554: \ (4)} & $116.5$ &  \\ \hline

555: 199{\small \ (1)} & 11.66 & 1 & $-3.245${\small \ (8)} & $-3.127${\small \

556: (8)} & $0.09${\small \ (4)} & $38.8$ & $55.7$ \\ \hline

557: 199{\small \ (1)} & 11.31 & 1 & \multicolumn{1}{l}{$-3.165${\small \ (8)}} & 

558: \multicolumn{1}{l}{$-3.053${\small \ (8)}} & $0.06${\small \ (4)} & $25.9$ & 

559: $46.3$ \\ \hline\hline

560: \end{tabular}

561: 

562: {\bf Table 1}

563: \end{center}

564: 

565: \end{document}

566: 

567: %%%%%%%%%%%%%%%%%%%%%%% End /document/Kr3l3.tex %%%%%%%%%%%%%%%%%%%%%%%

568: 

569: %%%%%%%%%%%%%%%%%% Start /document/RevTeX/revtex.sty %%%%%%%%%%%%%%%%%%

570: 

571: % ****** Start of file revtex.sty ******

572: %

573: %

574: %   This file is part of the APS files in the REVTeX 3.1 distribution.

575: %   Version 3.1 of REVTeX, July 1, 1996.

576: %

577: %   Copyright (c) 1996 The American Physical Society.

578: %

579: %   See the REVTeX 3.1 README file for restrictions and more information.

580: %

581: %   Contains segtex information Seg changes are denoted by ``%%%''

582: 

583: \typeout{Filename: revtex.sty, v3.1 <1 July 96>}

584: 

585: \def\@revmess#1#2{\typeout{REVTeX #1: #2}}

586: 

587: \@namedef{ds@11pt}{\def\@ptsize{1}} %

588: \@namedef{ds@12pt}{\def\@ptsize{2}} %

589: \def\@ptsize{0} %

590: 

591: \def\ds@preprint{\global\preprintstytrue \def\@ptsize{2}}

592: \let\ds@manuscript\ds@preprint

593: \newif\ifpreprintsty \global\preprintstyfalse

594: 

595: \@namedef{ds@aps}{\def\@society{aps}}

596: \@namedef{ds@osa}{\def\@society{osa}}

597: %%%

598: \@namedef{ds@seg}{\def\@society{seg}}

599: %%%

600: \def\ds@twoside{\@twosidetrue %

601: \@mparswitchtrue} %

602: 

603: \def\ds@draft{\overfullrule 5\p@} %

604: 

605: \newif\if@amsfonts  \@amsfontsfalse

606: \def\ds@amsfonts{\@amsfontstrue}

607: 

608: \newif\if@amssymbols  \@amssymbolsfalse

609: \def\ds@amssymb{\@amssymbolstrue}

610: 

611: \newif\if@titlepage  \@titlepagefalse

612: \def\ds@titlepage{\@titlepagefalse}

613: 

614: \def\ds@twocolumn{\@twocolumntrue}

615: 

616: \newif\if@tightenlines \@tightenlinesfalse

617: \def\ds@tighten{\@tightenlinestrue}

618: 

619: \newif\if@floats \@floatsfalse

620: \def\ds@floats{\@floatstrue}

621: 

622: \newif\ifsecnumbers \global\secnumbersfalse

623: \def\ds@eqsecnum{\global\secnumberstrue}

624: 

625: \def\@journal{pra}

626: \def\ds@pra{\def\@journal{pra}}

627: \def\ds@prb{\def\@journal{prb}}

628: \def\ds@prc{\def\@journal{prc}}

629: \def\ds@prd{\def\@journal{prd}}

630: \def\ds@pre{\def\@journal{pre}}

631: \def\ds@prl{\def\@journal{prl}}

632: \def\ds@josaa{\def\@journal{josaa}}

633: \def\ds@josab{\def\@journal{josab}}

634: \def\ds@aplop{\def\@journal{aplop}}

635: 

636: %%% Martin

637: \def\ds@geo{\def\@journal{geo}}

638: \def\ds@tle{\def\@journal{tle}}

639: \newif\ifsegabssty \global\segabsstyfalse

640: \def\ds@abstract{

641: \def\@ptsize{2}

642: \global\segabsstytrue

643: \global\preprintstytrue

644: }

645: \newif\if@legalsize\@legalsizefalse

646: \def\ds@legalsize{\global\@legalsizetrue\global\def\@firstlongpage{3}}

647: %%%

648: 

649: \ifpreprintsty

650: \def\openone{\leavevmode\hbox{\small1\kern-3.8pt\normalsize1}}%

651: \else

652: \def\openone{\leavevmode\hbox{\small1\kern-3.3pt\normalsize1}}%

653: \fi

654: 

655: \def\case{\protect\@case}

656: 

657: \def\@case#1#2{%

658: \def\@tempa{#2}\def\@tempb{/}%

659: \ifx\@tempa\@tempb %

660: \def\@tempa{\@@case{#1}}%

661: \else %

662: \def\@tempa{\@@case{#1}{#2}}%

663: \fi

664: \@tempa

665: }

666: 

667: \def\@@case#1#2{{\textstyle{#1\over#2}}}

668: 

669: \def\overlay#1#2{\ifmmode%

670: \setbox0=\hbox{$#1$}%

671: \setbox1=\hbox to\wd0{\hss$#2$\hss}\else%

672: \setbox0=\hbox{#1}%

673: \setbox1=\hbox to\wd0{\hss#2\hss}\fi%

674: #1\hskip-\wd0\box1 }

675: 

676: \def\pmb#1{\leavevmode\setbox0=\hbox{#1}%

677: \kern-.02em\copy0\kern-\wd0

678: \kern.04em\copy0\kern-\wd0

679: \kern-.02em\raise.04em\box0 }

680: 

681: \def\Bigglb#1{\leavevmode\hbox{\pmb{$\Biggl#1$}}}

682: \def\Biglb#1{\leavevmode\hbox{\pmb{$\Bigl#1$}}}

683: \def\bigglb#1{\leavevmode\hbox{\pmb{$\biggl#1$}}}

684: \def\biglb#1{\leavevmode\hbox{\pmb{$\bigl#1$}}}

685: \def\Biggrb#1{\leavevmode\hbox{\pmb{$\Biggr#1$}}}

686: \def\Bigrb#1{\leavevmode\hbox{\pmb{$\Bigr#1$}}}

687: \def\biggrb#1{\leavevmode\hbox{\pmb{$\biggr#1$}}}

688: \def\bigrb#1{\leavevmode\hbox{\pmb{$\bigr#1$}}}

689: 

690: \def\lesssim{\mathrel{\mathpalette\vereq<}}

691: \def\vereq#1#2{\lower3pt\vbox{\baselineskip1.5pt \lineskip1.5pt

692: \ialign{$\m@th#1\hfill##\hfil$\crcr#2\crcr\sim\crcr}}}

693: 

694: \def\gtrsim{\mathrel{\mathpalette\vereq>}}

695: 

696: \def\alt{\lesssim}

697: \def\agt{\gtrsim}

698: 

699: \def\tensor#1{\protect\@ontopof{#1}{\leftrightarrow}{1.15}\mathord{\box2}}

700: \def\overstar#1{\protect\@ontopof{#1}{\ast}{1.15}\mathord{\box2}}

701: \def\overdots#1{\protect\@ontopof{#1}{\cdots}{1.0}\mathord{\box2}}

702: \def\overcirc#1{\protect\@ontopof{#1}{\circ}{1.2}\mathord{\box2}}

703: \def\loarrow#1{\protect\@ontopof{#1}{\leftarrow}{1.15}\mathord{\box2}}

704: \def\roarrow#1{\protect\@ontopof{#1}{\rightarrow}{1.15}\mathord{\box2}}

705: 

706: \def\@ontopof#1#2#3{%

707: {\mathchoice

708: {\@@ontopof{#1}{#2}{#3}\displaystyle\scriptstyle}%

709: {\@@ontopof{#1}{#2}{#3}\textstyle\scriptstyle}%

710: {\@@ontopof{#1}{#2}{#3}\scriptstyle\scriptscriptstyle}%

711: {\@@ontopof{#1}{#2}{#3}\scriptscriptstyle\scriptscriptstyle}%

712: }%

713: }

714: 

715: \def\@@ontopof#1#2#3#4#5{%

716: \setbox0=\hbox{$#4#1$}%

717: \setbox1=\hbox{$#5#2$}%

718: \setbox2=\hbox{}\ht2=\ht0 \dp2=\dp0 %

719: \ifdim\wd0>\wd1 %

720: \setbox1=\hbox to\wd0{\hss\box1\hss}%

721: \mathord{\rlap{\raise#3\ht0\box1}\box0}%

722: \else   %

723: \setbox1=\hbox to.9\wd1{\hss\box1\hss}%

724: \setbox0=\hbox to\wd1{\hss$#4\relax#1$\hss}%

725: \mathord{\rlap{\copy0}\raise#3\ht0\box1}%

726: \fi

727: }%

728: 

729: \def\lambdabar{\protect\@lambdabar}

730: \def\@lambdabar{%

731: \relax

732: \bgroup

733: \def\@tempa{\hbox{\raise.73\ht0

734: \hbox to0pt{\kern.25\wd0\vrule width.5\wd0

735: height.1pt depth.1pt\hss}\box0}}%

736: \mathchoice{\setbox0\hbox{$\displaystyle\lambda$}\@tempa}%

737: {\setbox0\hbox{$\textstyle\lambda$}\@tempa}%

738: {\setbox0\hbox{$\scriptstyle\lambda$}\@tempa}%

739: {\setbox0\hbox{$\scriptscriptstyle\lambda$}\@tempa}%

740: \egroup

741: }

742: 

743: \def\corresponds{{\lower.2ex\hbox{=}}{\rm\kern-.75em^\triangle}}

744: \def\succsim{\succ\kern-.9em_\sim\kern.3em}

745: \def\precsim{\prec\kern-1em_\sim\kern.3em}

746: \def\slantfrac#1#2{\kern1em^{#1}\kern-.3em/\kern-.1em_{#2}}

747: 

748: \@options

749: 

750: \let\@tempa\relax

751: \ifx\@society\undefined

752: \def\@tempa{%

753: \typeout{You need to use one of the society style options!}

754: \typeout{The valid options are aps, osa or seg. That is, use either

755: aps, osa or seg in}

756: \typeout{square brackets after the \string\documentstyle\space

757: command and before the curly brackets:}

758: \typeout{\space\space\space\string\documentstyle[aps]{revtex} or

759: \string\documentstyle[osa]{revtex}}\typeout{}\@@end

760: }

761: \fi

762: \@tempa

763: 

764: \input \@society.sty

765: 

766: \endinput

767: %

768: % ****** End of file revtex.sty ******

769: 

770: 

771: %%%%%%%%%%%%%%%%%%% End /document/RevTeX/revtex.sty %%%%%%%%%%%%%%%%%%%

772: 

773: %%%%%%%%%%%%%%%%%%%% Start /document/RevTeX/aps.sty %%%%%%%%%%%%%%%%%%%

774: 

775: % ****** Start of file aps.sty ******

776: %

777: %

778: %   This file is part of the APS files in the REVTeX 3.1 distribution.

779: %   Version 3.1 of REVTeX, September 1996.

780: %

781: %   Copyright (c) 1992 The American Physical Society.

782: %

783: %   See the REVTeX 3.1 README file for restrictions and more information.

784: %

785: 

786: \typeout{Filename: aps.sty, v3.1 <September 1996>}

787: 

788: \def\partname{Part}

789: \def\contentsname{Contents}

790: \def\listfigurename{List of Figures}

791: \def\listtablename{List of Tables}

792: \def\refname{REFERENCES}

793: \def\indexname{Index}

794: \def\figurename{FIG.}

795: \def\tablename{TABLE}

796: \def\abstractname{Abstract}

797: 

798: \newif\iffirstfig \global\firstfigtrue

799: \newif\iffirsttab \global\firsttabtrue

800: 

801: \def\tightenlines{\def\baselinestretch{1}\small\normalsize}

802: \let\tighten\tightenlines

803: 

804: \ifx\selectfont\undefined %

805: \@revmess{message}{NFSS not detected. Assuming OFSS.}

806: \let\reset@font\relax

807: \def\mathhexbox{\protect\mathhexbox@}

808: \def\mathhexbox@#1#2#3{\relax

809: \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%

810: \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}

811: \def\text#1{%

812: \relax

813: \ifmmode %

814: \mathchoice

815: {\hbox{\everymath{\displaystyle}\rm #1}}%

816: {\hbox{\everymath{\textstyle}\rm #1}}%

817: {\hbox{\everymath{\scriptstyle}%

818: \def\prm{\fam\z@ \the\scriptfont\z@ \relax}%

819: \def\pit{\fam\itfam \the\scriptfont\itfam \relax}%

820: \rm #1}%

821: }%

822: {\hbox{\everymath{\scriptscriptstyle}%

823: \def\prm{\fam\z@ \the\scriptscriptfont\z@ \relax}%

824: \def\pit{\fam\itfam \the\scriptscriptfont\itfam \relax}%

825: \rm #1}%

826: }%

827: \else %

828: \leavevmode\hbox{#1}%

829: \fi

830: }

831: \def\bbox#1{%

832: \leavevmode\text{%

833: \textfont0 \the\textfont\bffam

834: \scriptfont0 \the\scriptfont\bffam

835: \scriptscriptfont0 \the\scriptscriptfont\bffam

836: \@temptokena\everymath \boldmath \everymath\@temptokena

837: {$\m@th\relax#1$}%

838: }%

839: }

840: \font\fivbf=cmbx5 \font\sixbf=cmbx6 \font\sevbf=cmbx7 \font\egtbf=cmbx8

841: \expandafter\def\expandafter\ixpt\expandafter{\ixpt

842: \scriptfont\bffam\sixbf \scriptscriptfont\bffam\fivbf}

843: \expandafter\def\expandafter\xpt\expandafter{\xpt

844: \scriptfont\bffam\sevbf \scriptscriptfont\bffam\fivbf}

845: \expandafter\def\expandafter\xipt\expandafter{\xipt

846: \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}

847: \expandafter\def\expandafter\xiipt\expandafter{\xiipt

848: \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}

849: \expandafter\def\expandafter\xivpt\expandafter{\xivpt

850: \scriptfont\bffam\tenbf \scriptscriptfont\bffam\sevbf}

851: \else %

852: \@revmess{message}{NFSS detected! Assuming NFSS.}

853: \def\text#1{%

854: \relax\ifmmode

855: \mathchoice

856: {\hbox{{\everymath{\displaystyle}#1}}}%

857: {\hbox{{\everymath{\textstyle}#1}}}%

858: {\hbox{{\everymath{\scriptstyle}\let\f@size\sf@size\selectfont#1}}}%

859: {\hbox{{\everymath{\scriptscriptstyle}\let\f@size\ssf@size\selectfont#1}}}%

860: \glb@settings

861: \else

862: \mbox{#1}%

863: \fi

864: }

865: \def\bbox#1{%

866: \relax\ifmmode

867: \mathchoice

868: {{\hbox{\boldmath$\displaystyle#1$}}}%

869: {{\hbox{\boldmath$\textstyle#1$}}}%

870: {{\hbox{\boldmath$\scriptstyle#1$}}}%

871: {{\hbox{\boldmath$\scriptscriptstyle#1$}}}%

872: \glb@settings

873: \else

874: \mbox{#1}%

875: \fi

876: }

877: \def\mathhexbox{\protect\mathhexbox@}

878: \def\mathhexbox@#1#2#3{\relax

879: \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%

880: \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}

881: \fi

882: 

883: %mtp

884: 

885: \input aps1\@ptsize.sty\relax

886: 

887: \def\@chuckoptarg[#1]{}

888: 

889: \def\alph#1{\@alph{\@nameuse{c@#1}}}

890: \def\@alph#1{\ifcase#1\or a\or b\or c\or d\else\@ialph{#1}\fi}

891: \def\@ialph#1{\ifcase#1\or \or \or \or \or e\or f\or g\or h\or i\or j\or

892: k\or l\or m\or n\or o\or p\or q\or r\or s\or t\or u\or v\or w\or x\or y\or

893: z\or aa\or bb\or cc\or dd\or ee\or ff\or gg\or hh\or ii\or jj\or

894: kk\or ll\or mm\or nn\or oo\or pp\or qq\or rr\or ss\or tt\or uu\or

895: vv\or ww\or xx\or yy\or zz\else\@ctrerr\fi}

896: 

897: \let\slantfrac\frac

898: 

899: \def\ao{Appl.\  Opt.\ }

900: \def\ap{Appl.\  Phys.\ }

901: \def\apl{Appl.\ Phys.\ Lett.\ }

902: \def\apj{Astrophys.\ J.\ }

903: \def\bell{Bell Syst.\ Tech.\ J.\ }

904: \def\jqe{IEEE J.\ Quantum Electron.\ }

905: \def\assp{IEEE Trans.\ Acoust.\ Speech Signal Process.\ }

906: \def\aprop{IEEE Trans.\ Antennas Propag.\ }

907: \def\mtt{IEEE Trans.\ Microwave Theory Tech.\ }

908: \def\iovs{Invest.\ Ophthalmol.\ Vis.\ Sci.\ }

909: \def\jcp{J.\ Chem.\ Phys.\ }

910: \def\jmo{J.\ Mod.\ Opt.\ }

911: \def\josa{J.\ Opt.\ Soc.\ Am.\ }

912: \def\josaa{J.\ Opt.\ Soc.\ Am.\ A }

913: \def\josab{J.\ Opt.\ Soc.\ Am.\ B }

914: \def\jpp{J.\ Phys.\ (Paris) }

915: \def\nat{Nature (London) }

916: \def\oc{Opt.\ Commun.\ }

917: \def\ol{Opt.\ Lett.\ }

918: \def\pl{Phys.\ Lett.\ }

919: \def\pra{Phys.\ Rev.\ A }

920: \def\prb{Phys.\ Rev.\ B }

921: \def\prc{Phys.\ Rev.\ C }

922: \def\prd{Phys.\ Rev.\ D }

923: \def\pre{Phys.\ Rev.\ E }

924: \def\prl{Phys.\ Rev.\ Lett.\ }

925: \def\rmp{Rev.\ Mod.\ Phys.\ }

926: \def\pspie{Proc.\ Soc.\ Photo-Opt.\ Instrum.\ Eng.\ }

927: \def\sjqe{Sov.\ J.\ Quantum Electron.\ }

928: \def\vr{Vision Res.\ }

929: 

930: \def\labelenumi{\theenumi.}

931: \def\theenumi{\arabic{enumi}}

932: 

933: \def\labelenumii{(\theenumii)}

934: \def\theenumii{\alph{enumii}}

935: \def\p@enumii{\theenumi}

936: 

937: \def\labelenumiii{\theenumiii.}

938: \def\theenumiii{\roman{enumiii}}

939: \def\p@enumiii{\theenumi(\theenumii)}

940: 

941: \def\labelenumiv{\theenumiv.}

942: \def\theenumiv{\Alph{enumiv}}

943: \def\p@enumiv{\p@enumiii\theenumiii}

944: 

945: \def\labelitemi{$\m@th\bullet$}

946: \def\labelitemii{\bf --}

947: \def\labelitemiii{$\m@th\ast$}

948: \def\labelitemiv{$\m@th\cdot$}

949: 

950: \def\verse{\let\\=\@centercr

951: \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent

952: \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}

953: \let\endverse\endlist

954: 

955: \def\quotation{\list{}{\listparindent 1.5em

956: \itemindent\listparindent

957: \rightmargin\leftmargin \parsep \z@ plus\p@}\item[]}

958: \let\endquotation=\endlist

959: 

960: \def\quote{\list{}{\rightmargin\leftmargin}\item[]}

961: \let\endquote=\endlist

962: 

963: \def\descriptionlabel#1{\hspace\labelsep \bf #1}

964: \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin

965: \let\makelabel\descriptionlabel}}

966: 

967: \let\enddescription\endlist

968: 

969: \def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn

970: \else \newpage \fi \thispagestyle{empty}\c@page\z@}

971: 

972: \def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}

973: 

974: \arraycolsep 3pt %

975: \tabcolsep 2pt %

976: \arrayrulewidth .4pt %

977: \doublerulesep 2pt %

978: 

979: \tabbingsep \labelsep %

980: 

981: \skip\@mpfootins = \skip\footins

982: 

983: \fboxsep = 3pt %

984: \fboxrule = .4pt %

985: 

986: \newcounter{part}

987: \newcounter{section}

988: \newcounter{subsection}[section]

989: \newcounter{subsubsection}[subsection]

990: \newcounter{paragraph}[subsubsection]

991: \newcounter{subparagraph}[paragraph]

992: 

993: \def\thepart          {\Roman{part}} %

994: \def\thesection       {\Roman{section}}

995: \def\p@section        {}

996: \def\thesubsection    {\Alph{subsection}}

997: \def\p@subsection     {\thesection\,}

998: \def\thesubsubsection {\arabic{subsubsection}}

999: \def\p@subsubsection  {\thesection\,\thesubsection\,}

1000: \def\theparagraph     {\alph{paragraph}}

1001: \def\thesubparagraph  {\theparagraph.\arabic{subparagraph}}

1002: 

1003: \def\acknowledgments{\section*{ACKNOWLEDGMENTS}}

1004: \let\acknowledgements\acknowledgments

1005: 

1006: \def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth

1007: \let\@svsec\@empty\else

1008: \refstepcounter{#1}%

1009: \def\@tempa{#8}%

1010: \ifx\@tempa\empty %

1011: \ifappendixon %

1012: \if@mainhead %

1013: \def\@tempa{APPENDIX }\def\@tempb{}%

1014: \else %

1015: \def\@tempa{}\def\@tempb{. }%

1016: \fi

1017: \else %

1018: \def\@tempa{}\def\@tempb{. }%

1019: \fi

1020: \else %

1021: \ifappendixon %

1022: \if@mainhead %

1023: \def\@tempa{APPENDIX }\def\@tempb{: }%

1024: \else %

1025: \def\@tempa{}\def\@tempb{. }%

1026: \fi

1027: \else %

1028: \def\@tempa{}\def\@tempb{. }%

1029: \fi

1030: \fi

1031: \edef\@svsec{\@tempa\csname the#1\endcsname\@tempb}\fi

1032: \@tempskipa #5\relax

1033: \ifdim \@tempskipa>\z@

1034: \begingroup #6\relax

1035: {\hskip #3\relax\@svsec}{\interlinepenalty \@M

1036: \if@mainhead\uppercase{#8}\else#8\fi\par}%

1037: \endgroup

1038: \csname #1mark\endcsname{#7}\addcontentsline

1039: {toc}{#1}{\ifnum #2>\c@secnumdepth \else

1040: \protect\numberline{\csname the#1\endcsname}\fi

1041: #7}\else

1042: \def\@svsechd{#6\hskip #3\relax %

1043: \@svsec \if@mainhead\uppercase{#8}\else#8\fi

1044: \csname #1mark\endcsname

1045: {#7}\addcontentsline

1046: {toc}{#1}{\ifnum #2>\c@secnumdepth \else

1047: \protect\numberline{\csname the#1\endcsname}\fi

1048: #7}}\fi

1049: \@xsect{#5}}

1050: 

1051: \def\@ssect#1#2#3#4#5{\@tempskipa #3\relax

1052: \ifdim \@tempskipa>\z@

1053: \begingroup #4{\hskip #1}{\interlinepenalty \@M

1054: \ifappendixon

1055: \if@mainhead %

1056: \stepcounter{section}%

1057: \def\@tempa{#5}%

1058: \ifx\@tempa\empty %

1059: APPENDIX%

1060: \else %

1061: APPENDIX:

1062: \fi

1063: \fi

1064: \fi

1065: \if@mainhead\uppercase{#5}\else#5\fi\par}\endgroup

1066: \else \def\@svsechd{#4\hskip #1\relax

1067: \ifappendixon

1068: \if@mainhead %

1069: \stepcounter{section}%

1070: \def\@tempa{#5}%

1071: \ifx\@tempa\empty %

1072: APPENDIX%

1073: \else %

1074: APPENDIX:

1075: \fi

1076: \fi

1077: \fi

1078: \if@mainhead\uppercase{#5}\else#5\fi}\fi

1079: \@xsect{#3}}

1080: 

1081: \def\part{\par %

1082: \addvspace{4ex} %

1083: \@afterindentfalse %

1084: \secdef\@part\@spart} %

1085: 

1086: \def\@part[#1]#2{\ifnum \c@secnumdepth >\m@ne %

1087: \refstepcounter{part} %

1088: \addcontentsline{toc}{part}{\thepart %

1089: \hspace{1em}#1}\else %

1090: \addcontentsline{toc}{part}{#1}\fi %

1091: {\parindent \z@ \raggedright

1092: \interlinepenalty\@M

1093: \ifnum \c@secnumdepth >\m@ne %

1094: \Large \bf \partname~\thepart%

1095: \par\nobreak %

1096: \fi %

1097: \huge \bf %

1098: #2%

1099: \markboth{}{}\par %

1100: }\nobreak %

1101: \vskip 3ex %

1102: \@afterheading %

1103: } %

1104: 

1105: \def\@spart#1{{\parindent \z@ \raggedright

1106: \interlinepenalty\@M

1107: \huge \bf

1108: #1\par} %

1109: \nobreak %

1110: \vskip 3ex %

1111: \@afterheading %

1112: } %

1113: 

1114: \newcount\@indentflag \global\@indentflag=1 %

1115: \newdimen\@eqtoeqnum \@eqtoeqnum=6pt %

1116: \def\@indentamount{%

1117: \ifcase\@indentflag 0pt\or\@centering\or0pt plus1fil\fi\relax

1118: }

1119: \def\FL{\global\@indentflag=0 }

1120: \def\FR{\global\@indentflag=2 }

1121: 

1122: \newcounter{eqletter} \setcounter{eqletter}{0}

1123: 

1124: \def\@eqnnum{\hbox{\reset@font\rm(\theequation)}}

1125: \let\make@eqnnum=\@eqnnum %

1126: \def\eqnum#1{\dec@eqnnum \global\def\make@eqnnum{\reset@font\rm(#1)}%

1127: \def\@currentlabel{#1}%

1128: }

1129: \def\inc@eqnnum{\addtocounter{equation}{1}}

1130: \def\dec@eqnnum{\addtocounter{equation}{-1}}

1131: \@definecounter{equation}%

1132: \ifsecnumbers %

1133: \@addtoreset{equation}{section} %

1134: \def\theequation@prefix{\arabic{section}.} %

1135: \else %

1136: \def\theequation@prefix{}

1137: \fi

1138: 

1139: \def\theequation{\theequation@prefix\arabic{equation}}%

1140: 

1141: \def\mathletters{%

1142: \inc@eqnnum  \setcounter{eqletter}{0}%

1143: \edef\@currentlabel{\theequation}%

1144: \def\theequation{\theequation@prefix\arabic{equation}\alph{eqletter}}%

1145: \def\inc@eqnnum{\addtocounter{eqletter}{1}}%

1146: \def\dec@eqnnum{\addtocounter{eqletter}{-1}}%

1147: }

1148: 

1149: % next line is new def to fix spacing problem after mathletters.

1150: % mtp 6/17/96

1151: \def\endmathletters{\global\@ignoretrue}

1152: 

1153: \def\[{\relax

1154: \ifmmode\@badmath\else\par\vskip-\lastskip\vskip\abovedisplayskip\fi

1155: \hbox to\hsize\bgroup

1156: \def\label##1{\@revmess{warning}{\string\label{##1} used

1157: in \string\[\space environment after (\theequation)}}%

1158: \hskip\@totalleftmargin\hskip\@indentamount$\displaystyle

1159: }

1160: 

1161: \def\]{\relax

1162: \ifmmode

1163: $\hskip\@centering\egroup

1164: \else

1165: \@badmath

1166: \fi

1167: \vskip\belowdisplayskip

1168: \global\@indentflag=1 %

1169: \noindent\ignorespaces

1170: }

1171: 

1172: \newbox\@testboxa

1173: \newbox\@testboxb

1174: 

1175: \def\equation{\par\vskip-\lastskip\vskip\abovedisplayskip

1176: \inc@eqnnum\let\@currentlabel=\theequation

1177: \setbox\@testboxa=\hbox\bgroup\hskip\@totalleftmargin\hskip\@indentamount

1178: \hbox\bgroup$\displaystyle

1179: }

1180: 

1181: \def\endequation{$\egroup\hskip\@centering\egroup %

1182: \setbox\@testboxb=\hbox{\make@eqnnum}%

1183: \bgroup

1184: \@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb

1185: \ifcase\@indentflag

1186: \advance\@tempdima by\@eqtoeqnum

1187: \ifdim\@tempdima<\hsize %

1188: \def\@tempa{0}%

1189: \else

1190: \def\@tempa{1}%

1191: \fi

1192: \or

1193: \advance\@tempdima by2\@eqtoeqnum

1194: \ifdim\@tempdima<\hsize %

1195: \def\@tempa{0}%

1196: \else %

1197: \@tempdima\wd\@testboxa \advance\@tempdima by\wd\@testboxb

1198: \advance\@tempdima by\@eqtoeqnum

1199: \ifdim\@tempdima<\hsize %

1200: \def\@tempa{0}%

1201: \setbox\@testboxa\hbox{\hfill\box\@testboxa\kern\@eqtoeqnum}%

1202: \else

1203: \def\@tempa{1}%

1204: \fi

1205: \fi

1206: \or

1207: \advance\@tempdima by2\@eqtoeqnum

1208: \ifdim\@tempdima<\hsize %

1209: \def\@tempa{0}%

1210: \setbox\@testboxb=\hbox{\kern\@eqtoeqnum\make@eqnnum}%

1211: \else

1212: \def\@tempa{1}%

1213: \fi

1214: \fi

1215: \ifnum\@tempa=0 %

1216: \hbox to\hsize{\unhbox\@testboxa\box\@testboxb}%

1217: \else %

1218: \vbox{\hbox to\hsize{\unhbox\@testboxa}%

1219: \vskip6pt %

1220: \hbox to\hsize{\hfil\box\@testboxb}}%

1221: \fi

1222: \egroup

1223: \global\let\make@eqnnum\@eqnnum %

1224: \vskip\belowdisplayskip\noindent\global\@indentflag=1 \global\@ignoretrue

1225: }

1226: 

1227: \def\eqnarray{\par\vskip-\lastskip\vskip\abovedisplayskip

1228: \inc@eqnnum\let\@currentlabel=\theequation

1229: \global\@eqnswtrue\m@th

1230: \global\@eqcnt\z@

1231: \tabskip\@totalleftmargin\advance\tabskip by\@indentamount\let\\\@eqncr

1232: \halign to\hsize\bgroup\hskip\@centering

1233: $\displaystyle\tabskip\z@{##{}}$&\global\@eqcnt\@ne

1234: \hfil${{}##{}}$\hfil

1235: &\global\@eqcnt\tw@ $\displaystyle\tabskip\z@{##}$\hfil

1236: \tabskip\@centering \if@eqnsw\phantom{\make@eqnnum\kern\@eqtoeqnum}\fi

1237: &\llap{##}\tabskip\z@\cr}

1238: 

1239: \def\endeqnarray{%

1240: \@@eqncr\egroup

1241: \vskip\belowdisplayskip\noindent

1242: \dec@eqnnum\global\@indentflag=1

1243: \global\let\make@eqnnum\@eqnnum %

1244: \global\@ignoretrue

1245: }

1246: 

1247: \def\nonumber{\global\@eqnswfalse

1248: \def\label##1{\@revmess{error}{\string\label{##1} used

1249: with \string\nonumber\space before (\theequation)}}%

1250: }

1251: 

1252: \def\@@eqncr{\let\@tempa\relax

1253: \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}%

1254: \else \def\@tempa{&}\fi

1255: \@tempa \if@eqnsw\make@eqnnum\inc@eqnnum\fi

1256: \global\@eqnswtrue\global\@eqcnt\z@\global\let\make@eqnnum=\@eqnnum\cr

1257: }

1258: 

1259: \@namedef{eqnarray*}{\def\@eqncr{\nonumber\@seqncr}%

1260: \def\label##1{\@revmess{warning}{\string\label{##1} used

1261: in eqnarray* environment before (\theequation)}}%

1262: \eqnarray}

1263: 

1264: \def\@pnumwidth{1.55em}

1265: \def\@tocrmarg {2.55em}

1266: \def\@dotsep{4.5}

1267: \setcounter{tocdepth}{3}

1268: 

1269: \def\tableofcontents{\section*{\contentsname

1270: \@mkboth{\uppercase{\contentsname}}{\uppercase{\contentsname}}}%

1271: \@starttoc{toc}}

1272: 

1273: \def\l@part#1#2{\addpenalty{\@secpenalty}%

1274: \addvspace{2.25em plus\p@}%

1275: \begingroup

1276: \@tempdima 3em %

1277: \parindent \z@ \rightskip \@pnumwidth %

1278: \parfillskip -\@pnumwidth

1279: {\large \bf %

1280: \leavevmode %

1281: #1\hfil \hbox to\@pnumwidth{\hss #2}}\par

1282: \nobreak %

1283: \endgroup}

1284: 

1285: \def\l@section#1#2{\addpenalty{\@secpenalty}%

1286: \addvspace{1.0em plus\p@}%

1287: \@tempdima 3.0em %

1288: \begingroup

1289: \parindent \z@ \rightskip \@pnumwidth

1290: \parfillskip -\@pnumwidth

1291: \bf %

1292: \leavevmode %

1293: \advance\leftskip\@tempdima %

1294: \hskip -\leftskip %

1295: #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par

1296: \endgroup}

1297: 

1298: \def\l@subsection{\@dottedtocline{2}{3.0em}{2.0em}}

1299: \def\l@subsubsection{\@dottedtocline{3}{5.0em}{1.5em}}

1300: \def\l@paragraph{\@dottedtocline{4}{6.5em}{1.5em}}

1301: \def\l@subparagraph{\@dottedtocline{5}{8.0em}{1.5em}}

1302: 

1303: \def\listoffigures{\section*{\listfigurename

1304: \@mkboth{\uppercase{\listfigurename}}{\uppercase{\listfigurename}}}%

1305: \@starttoc{lof}}

1306: 

1307: \def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}

1308: 

1309: \def\listoftables{\section*{\listtablename\@mkboth

1310: {\uppercase{\listtablename}}{\uppercase{\listtablename}}}%

1311: \@starttoc{lot}}

1312: \let\l@table\l@figure

1313: 

1314: \def\@tempa{prb}

1315: \ifx\@tempa\@journal %

1316: \def\tempa{\input prbbib.sty}

1317: \else

1318: \def\tempa{\input prabib.sty}

1319: \fi

1320: \tempa

1321: 

1322: \newif\if@restonecol

1323: 

1324: \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi

1325: \columnseprule \z@

1326: \columnsep 35\p@\twocolumn[\section*{\indexname}]%

1327: \@mkboth{\uppercase{\indexname}}{\uppercase{\indexname}}%

1328: \thispagestyle{plain}\parindent\z@

1329: \parskip\z@ plus.3\p@\relax\let\item\@idxitem}

1330: 

1331: \def\@idxitem{\par\hangindent 40\p@}

1332: 

1333: \def\subitem{\par\hangindent 40\p@ \hspace*{20\p@}}

1334: 

1335: \def\subsubitem{\par\hangindent 40\p@ \hspace*{30\p@}}

1336: 

1337: \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}

1338: 

1339: \def\indexspace{\par \vskip 10\p@ plus5\p@ minus3\p@\relax}

1340: 

1341: \long\def\@makefntext#1{\parindent 5pt\hsize\columnwidth\parskip0pt\relax

1342: \small\def\strut{\vrule width0pt height0pt depth1.75pt\relax}%

1343: $\m@th^{\@thefnmark}$#1}

1344: 

1345: \def\thefootnote{\fnsymbol{footnote}}

1346: 

1347: \def\@fnsymbol#1{\ifcase#1\or *\or \dagger\or \ddagger\or

1348: \mathchar "278\or **\or \dagger\dagger

1349: \or \ddagger\ddagger \or \mathchar "278 \mathchar "278\or

1350: ***\or\dagger\dagger\dagger\or\ddagger\ddagger\ddagger\or

1351: \mathchar "278 \mathchar "278 \mathchar "278

1352: \else\@ctrerr\fi\relax}

1353: 

1354: \setcounter{topnumber}{2}

1355: \def\topfraction{.7}

1356: \setcounter{bottomnumber}{1}

1357: \def\bottomfraction{.3}

1358: \setcounter{totalnumber}{3}

1359: \def\textfraction{.2}

1360: \def\floatpagefraction{.5}

1361: \setcounter{dbltopnumber}{2}

1362: \def\dbltopfraction{.7}

1363: \def\dblfloatpagefraction{.5}

1364: 

1365: \long\def\@makecaption#1#2{%

1366: \setbox\@testboxa\hbox{\outertabfalse %

1367: \reset@font\small\rm#1\penalty10000\hskip.5em plus.2em\ignorespaces#2%

1368: }%

1369: \setbox\@testboxb\vbox{\hsize\@capwidth

1370: \ifdim\wd\@testboxa<\hsize %

1371: \hbox to\hsize{\hfil\box\@testboxa\hfil}%

1372: \else %

1373: \small

1374: \parindent \ifpreprintsty 1.5em \else 1em \fi

1375: \unhbox\@testboxa\par

1376: \fi

1377: }%

1378: \box\@testboxb

1379: } %

1380: 

1381: \newcounter{figure}

1382: \def\thefigure{\@arabic\c@figure}

1383: 

1384: \def\fps@figure{tbp}

1385: \def\ftype@figure{1}

1386: \def\ext@figure{lof}

1387: \def\fnum@figure{\figurename\penalty10000\hskip.3em plus .1em\relax\thefigure.}

1388: \if@floats

1389: \def\figure{\let\@capwidth\columnwidth\@float{figure}}

1390: \let\endfigure\end@float

1391: \@namedef{figure*}{\let\@capwidth\textwidth\@dblfloat{figure}}

1392: \@namedef{endfigure*}{\end@dblfloat}

1393: \else

1394: \def\figure{%

1395: \let\@capwidth\columnwidth

1396: \ifpreprintsty\iffirstfig

1397: {\newpage\centerline{FIGURES}}\global\firstfigfalse

1398: \fi\fi

1399: \vskip1pc

1400: \def\@captype{figure}%

1401: \interlinepenalty10000 %

1402: \@ifnextchar[{\@chuckoptarg}{}%

1403: }%

1404: \def\endfigure{\goodbreak\vskip1pc}%

1405: \@namedef{figure*}{\figure}%

1406: \@namedef{endfigure*}{\endfigure}%

1407: \fi

1408: 

1409: \newcounter{table}

1410: \def\thetable{\@Roman\c@table}

1411: 

1412: {\catcode`\.=13 %

1413: \gdef.{\relax\egroup\def\@flag{1}\setbox1\hbox\bgroup}%

1414: }%

1415: 

1416: \def\fps@table{tbp}

1417: \def\ftype@table{2}

1418: \def\ext@table{lot}

1419: \def\fnum@table{\tablename\penalty10000\hskip.3em plus .1em\relax\thetable.}

1420: \if@floats

1421: \def\table{%

1422: \let\@capwidth\columnwidth \def\@tablenotes{}%

1423: \global\tableontrue

1424: \bgroup\parindent=0pt

1425: \outertabtrue

1426: \setcounter{tablenote}{0}%

1427: \@float{table}%

1428: }%

1429: \def\endtable{%

1430: \global\tableonfalse\global\outertabfalse

1431: {\let\protect\relax\small\vskip2pt\@tablenotes\par}\xdef\@tablenotes{}%

1432: \end@float\egroup

1433: }%

1434: \@namedef{table*}{%

1435: \let\@capwidth\textwidth \def\@tablenotes{}%

1436: \global\tableontrue

1437: \bgroup\parindent=0pt

1438: \outertabtrue

1439: \setcounter{tablenote}{0}%

1440: \@dblfloat{table}%

1441: }

1442: \@namedef{endtable*}{%

1443: \global\tableonfalse\global\outertabfalse

1444: {\let\protect\relax\small\vskip2pt\@tablenotes\par}\xdef\@tablenotes{}%

1445: \end@dblfloat\egroup

1446: }%

1447: \else %

1448: \def\table{%

1449: \let\@capwidth\columnwidth \def\@tablenotes{}%

1450: \iffirsttab

1451: \global\firsttabfalse

1452: \ifpreprintsty{\newpage\centerline{TABLES}}\fi

1453: \fi

1454: \vskip1pc

1455: \global\tableontrue

1456: \bgroup\parindent=0pt

1457: \outertabtrue

1458: \setcounter{tablenote}{0}%

1459: \def\@captype{table}%

1460: \@ifnextchar[{\@chuckoptarg}{}%

1461: }%

1462: \def\endtable{%

1463: \global\tableonfalse\global\outertabfalse

1464: {\let\protect\relax\small\vskip2pt\@tablenotes\par}\xdef\@tablenotes{}%

1465: \egroup

1466: \vskip1pc plus 1filll \penalty-200 \vskip0pt plus -1filll

1467: }%

1468: \@namedef{table*}{\table}

1469: \@namedef{endtable*}{\endtable}

1470: \fi

1471: 

1472: \@definecounter{tablenote}

1473: \def\thetablenote{\alph{tablenote}}

1474: \def\@tablenotes{}

1475: 

1476: \def\@maketnmark{\leavevmode\hbox{$^{\reset@font\rm\@thetnmark}\m@th$}}

1477: 

1478: \def\tablenote{\@ifnextchar[{\@xtablenote}{\stepcounter{tablenote}%

1479: \begingroup \def\protect{\noexpand\protect\noexpand}%

1480: \xdef\@thetnmark{\thetablenote}\endgroup

1481: \@tablenotemark\@tablenotetext}}

1482: 

1483: \def\@xtablenote[#1]{\begingroup \c@tablenote #1\relax

1484: \def\protect{\noexpand\protect\noexpand}%

1485: \xdef\@thetnmark{\thetablenote}\endgroup

1486: \@tablenotemark\@tablenotetext}

1487: 

1488: \long\def\@tablenotetext#1{%

1489: \bgroup

1490: \iftableon\else

1491: \@revmess{error}{tablenotes used outside a table environment,}%

1492: \typeout{\space\space\space\space\space THEY ARE ARE BEING LOST!}%

1493: \fi

1494: \def\protect{\noexpand\protect\noexpand}%

1495: \edef\@tempa{\@maketnmark}%

1496: \expandafter\expandafter\expandafter

1497: \gdef

1498: \expandafter\expandafter\expandafter

1499: \@tablenotes

1500: \expandafter\expandafter\expandafter

1501: {\expandafter\@tablenotes\expandafter\par\@tempa#1}%

1502: \egroup

1503: }

1504: 

1505: \def\tablenotemark{%

1506: \@ifnextchar[{\@xtablenotemark}{\stepcounter{tablenote}%

1507: \begingroup\def\protect{\noexpand\protect\noexpand}%

1508: \xdef\@thetnmark{\thetablenote}\endgroup

1509: \@tablenotemark}}

1510: 

1511: \def\@xtablenotemark[#1]{\begingroup \c@tablenote #1\relax

1512: \def\protect{\noexpand\protect\noexpand}%

1513: \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotemark}

1514: 

1515: \def\@tablenotemark{\leavevmode\ifhmode

1516: \edef\@x@sf{\the\spacefactor}\fi \@maketnmark

1517: \ifhmode\spacefactor\@x@sf\fi\relax}

1518: 

1519: \def\tablenotetext{\@ifnextchar [{\@xtablenotetext}%

1520: {\begingroup

1521: \def\protect{\noexpand\protect\noexpand}%

1522: \xdef\@thetnmark{\thetablenote}\endgroup

1523: \@tablenotetext}}

1524: 

1525: \def\@xtablenotetext[#1]{\begingroup \c@tablenote #1\relax

1526: \def\protect{\noexpand\protect\noexpand}%

1527: \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotetext}

1528: 

1529: \let\tableline\hline

1530: 

1531: \newdimen\@Ldec \newdimen\@Rdec

1532: 

1533: \def\dec #1.#2 {\hbox to\@Ldec{\hss#1}\def\test{#2}%

1534: \ifx\test\empty\hbox to\@Rdec{\hfill}\else\hbox to\@Rdec{.#2\hss}\fi

1535: }

1536: 

1537: \def\setdec #1.#2 {\relax%

1538: \bgroup

1539: \setbox0\hbox{\kern1pt\relax#1}\setbox1\hbox{\kern1pt\relax#2}%

1540: \global\@Ldec\wd0\global\@Rdec\wd1%

1541: \egroup

1542: }

1543: 

1544: \setdec 000.000 %

1545: 

1546: \@temptokena={\relax\egroup

1547: \ifnum\@flag=1

1548: \setbox0\hbox{\unhbox0.\unhbox1}%

1549: \fi

1550: \gdef\@flag{1}\setbox1\hbox\bgroup

1551: }%

1552: {\catcode`\.=13\let.\relax

1553: \xdef\@defdot{\def.{\the\@temptokena}}

1554: }

1555: 

1556: \@temptokena={.}

1557: {\catcode`\.=13

1558: \ifx.\undefined %

1559: \xdef.{\the\@temptokena}

1560: \fi

1561: }

1562: 

1563: \def\@activatedots{%

1564: \def\@startcenterdot{\begingroup

1565: \relax\gdef\@flag{0 }

1566: \catcode`\.=13\@defdot

1567: \setbox0\hbox\bgroup\ignorespaces}%

1568: \def\@endcenterdot{\unskip\egroup\catcode`\.=12

1569: \ifnum\@flag=0 %

1570: \box0

1571: \else %

1572: \ifdim\wd0=0pt %

1573:  .\box1

1574: \else

1575: \ifdim\wd1=0pt %

1576: \setbox1=\hbox{\phantom{.\copy0}}\box0\box1

1577: \else %

1578: \ifdim\wd0>\wd1

1579: \setbox1\hbox to\wd0{\box1\hfil}%

1580: \else

1581: \setbox0\hbox to\wd1{\hfil\box0}%

1582: \fi

1583: \box0.\box1

1584: \fi

1585: \fi

1586: \fi

1587: \endgroup}%

1588: }

1589: 

1590: \def\apstable@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule

1591: height\arraystretch \ht\strutbox

1592: depth\arraystretch \dp\strutbox

1593: width\z@}\@mkpream{#2}\edef\@preamble{\tabskip\z@ plus 1fil\halign

1594: to\@capwidth%

1595: \bgroup \tabskip\z@ plus1fill \@arstrut

1596: \@preamble\hskip-\tabcolsep \tabskip\z@ plus 1fil

1597: \cr}%

1598: \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%

1599: \bgroup\let\par\relax\outertabfalse%

1600: \let\@sharp##\let\protect\relax

1601: \@activatedots

1602: \lineskip\z@\baselineskip\z@\@preamble}

1603: 

1604: \def\@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule

1605: height\arraystretch \ht\strutbox

1606: depth\arraystretch \dp\strutbox

1607: width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto

1608: \bgroup\tabskip\z@\@arstrut\@preamble

1609: \tabskip\z@\cr}%

1610: \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%

1611: \if #1t\vtop \else \if#1b\vbox \else \vcenter \fi\fi%

1612: \bgroup\let\par\relax%

1613: \let\@sharp##\let\protect\relax

1614: \@activatedots

1615: \lineskip\z@\baselineskip\z@\@preamble}

1616: 

1617: \def\@arrayclassz{\ifcase \@lastchclass \@acolampacol \or \@ampacol \or

1618: \or \or \@addamp \or

1619: \@acolampacol \or \@firstampfalse \@acol \fi

1620: \edef\@preamble{\@preamble

1621: \ifcase \@chnum

1622: \hfil$\relax\@sharp$\hfil \or $\relax\@sharp$\hfil

1623: \or \hfil$\relax\@sharp$\or

1624: \hfil$\relax\@sharp$\hfil \fi}}

1625: 

1626: \def\@tabclassz{\ifcase \@lastchclass\@acolampacol

1627: \or \@ampacol \or \or \or \@addamp \or \@acolampacol\or

1628: \@firstampfalse \new@tabacol \fi

1629: \edef\@preamble{\@preamble{%

1630: \ifcase \@chnum

1631: \hfil\ignorespaces\@sharp\unskip\hfil

1632: \or \ignorespaces\@sharp\unskip\hfil

1633: \or \hfil\hskip\z@ \ignorespaces\@sharp\unskip

1634: \or\hfil\@startcenterdot\@sharp\@endcenterdot\hfil

1635: \fi}}}

1636: 

1637: \def\@tabclassiv{\@addtopreamble\@nextchar}

1638: 

1639: \let\tabbodyfont\small

1640: \def\squeezetable{\let\tabbodyfont\scriptsize}

1641: 

1642: \def\tabular{\def\@halignto{}\@tabular}

1643: 

1644: \newif\ifoutertab

1645: \global\outertabfalse

1646: 

1647: \def\@tabular{%

1648: \ifoutertab

1649: \tabbodyfont\global\@newlistfalse\bgroup

1650: \else

1651: \leavevmode\hbox\bgroup$%

1652: \fi

1653: \let\@acol\@tabacol

1654: \let\@classz\@tabclassz

1655: \let\@classiv\@tabclassiv \let\\\@tabularcr

1656: \ifoutertab

1657: \if@quasitable\else

1658: \vskip2pt\hrule width\@capwidth\vskip2pt\hrule width\@capwidth\vskip2pt

1659: \fi

1660: \expandafter\apstable@tabarray

1661: \else

1662: \expandafter\@tabarray

1663: \fi

1664: }

1665: 

1666: \def\apstable@tabarray{%

1667: \m@th\@ifnextchar[{\apstable@array}{\apstable@array[c]}%

1668: }

1669: 

1670: \def\endtabular{\crcr\egroup\egroup

1671: \ifoutertab

1672: \if@quasitable\else

1673: \vskip2pt\hrule width\@capwidth\vskip2pt\hrule width\@capwidth\vskip2pt

1674: \fi

1675: \else

1676: $%

1677: \fi \egroup

1678: }

1679: 

1680: \def\new@tabacol{\edef\@preamble{\@preamble \hskip0pt%

1681: }}

1682: 

1683: \newif\iftableon

1684: 

1685: \def\@mkpream#1{\@firstamptrue\@lastchclass6

1686: \def\@preamble{}%

1687: \def\protect{\noexpand\protect\noexpand}\let\@sharp\relax

1688: \let\@startpbox\relax\let\@endpbox\relax

1689: \let\@startcenterdot\relax \let\@endcenterdot\relax

1690: \@expast{#1}\expandafter\@tfor \expandafter

1691: \@nextchar \expandafter:\expandafter=\@tempa\do{\@testpach\@nextchar

1692: \ifcase \@chclass \@classz \or \@classi \or \@classii \or \@classiii

1693: \or \@classiv \or\@classv \fi%

1694: \iftableon\ifoutertab %

1695: \ifnum\@chclass=4

1696: \@addtopreamble{\tabskip\z@}%

1697: \else

1698: \ifnum\@lastchclass=4

1699: \@addtopreamble{\tabskip\z@ plus1fill}%

1700: \fi

1701: \fi

1702: \fi\fi

1703: \@lastchclass\@chclass}%

1704: \ifcase \@lastchclass \@acol

1705: \or \or \@preamerr \@ne\or \@preamerr \tw@\or \or \@acol \fi}

1706: 

1707: \def\@testpach#1{\@chclass \ifnum \@lastchclass=\tw@ 4 \else

1708: \ifnum \@lastchclass=3 5 \else

1709: \z@ \if #1c\@chnum \z@ \else

1710: \if #1l\@chnum \@ne \else

1711: \if #1r\@chnum \tw@ \else

1712: \if #1d\@chnum 3 \else %

1713: \@chclass \if #1|\@ne \else

1714: \if #1@\tw@ \else

1715: \if #1p3 \else \z@ \@preamerr 0\fi

1716: \fi  \fi  \fi  \fi  \fi  \fi \fi %

1717: \fi}

1718: 

1719: \newif\if@quasitable

1720: \@quasitablefalse

1721: 

1722: \def\quasitable{%

1723: \@quasitabletrue

1724: \par\vskip\topsep \bgroup

1725: \def\caption##1{\@revmess{warning}{Captions are not supported

1726: for quasitables.}\@revmess{warning}{No caption was set.}}%

1727: \def\tablenotes##1{\@revmess{warning}{Tablenotes are not

1728: supported for quasitables.}%

1729: \@revmess{warning}{No tablenotes were set.}}%

1730: \let\@capwidth\columnwidth

1731: \tableontrue\outertabtrue\parindent0pt\relax}

1732: 

1733: \def\endquasitable{\par\egroup\vskip\topsep\noindent

1734: \@quasitablefalse \global\@ignoretrue}

1735: 

1736: \def\@authoraddress{}  \def\@title{} \def\@date{} \def\@preprint{}

1737: \def\and{\unskip, }

1738: 

1739: \def\preprint#1{%

1740: \ifpreprintsty

1741: \def\@preprint{\noindent\hfill\hbox{#1}\vskip 10pt}%

1742: \fi

1743: }

1744: 

1745: \def\title#1{\gdef\@title{{\large\bf\centering\ignorespaces#1\vskip2.5pt}}}

1746: 

1747: 

1748: \def\author#1{\expandafter\def\expandafter\@authoraddress\expandafter

1749: {\@authoraddress %

1750: \ifpreprintsty\vskip1.5pc \fi %

1751: {\dimen0=-\prevdepth \advance\dimen0 by23pt

1752: \nointerlineskip \rm\centering

1753: \vrule height\dimen0 width0pt\relax\ignorespaces#1\par

1754: }%

1755: }%

1756: }

1757: 

1758: \def\address#1{\expandafter\def\expandafter\@authoraddress\expandafter

1759: {\@authoraddress{\small\it\centering\ignorespaces#1\par}}}

1760: 

1761: \def\date#1{\gdef\@date{{\small\rm\centering(\ignorespaces#1\unskip)\par}}}

1762: 

1763: \def\maketitle{\par

1764: \begingroup

1765: \let\cite\@bylinecite

1766: \def\thefootnote{\fnsymbol{footnote}}%

1767: \if@twocolumn

1768: \twocolumn[\@maketitle\vskip2pc]%

1769: \else

1770: \newpage

1771: \global\@topnum\z@ %

1772: \@maketitle

1773: \fi

1774: \thispagestyle{plain}\@thanks

1775: \endgroup

1776: \def\thefootnote{\arabic{footnote}}%

1777: \setcounter{footnote}{0}%

1778: \let\maketitle\relax \let\@maketitle\relax

1779: \let\@thanks\relax \let\@authoraddress\relax \let\@title\relax

1780: \let\@date\relax \let\thanks\relax

1781: }

1782: 

1783: \def\@maketitle{%

1784: \@preprint

1785: \@title

1786: \ifdim\prevdepth=-1000pt \prevdepth0pt\fi

1787: \@authoraddress

1788: \@date

1789: }

1790: 

1791: \def\abstract{\par

1792: \ifpreprintsty %

1793: \vskip2.5pc

1794: \begin{center}%

1795: {\large \abstractname\par}%

1796: \end{center}%

1797: \vskip.5pc

1798: \fi

1799: \bgroup

1800: \ifdim\prevdepth=-1000pt \prevdepth0pt\fi

1801: \hsize\columnwidth

1802: \if@twocolumn\else\leftskip=0.10753\textwidth \rightskip\leftskip\fi

1803: \dimen0=-\prevdepth \advance\dimen0 by17.5pt \nointerlineskip

1804: \small\vrule width 0pt height\dimen0 \relax

1805: }

1806: 

1807: \def\endabstract{\par\egroup}

1808: 

1809: \global\let\ifdraft\iffalse \def\draft{\global\let\ifdraft\iftrue}

1810: 

1811: \def\pacs#1{\par %

1812: \bgroup

1813: \hsize\columnwidth \parindent0pt

1814: \if@twocolumn\else\leftskip=0.10753\textwidth \rightskip\leftskip\fi

1815: \ifdim\prevdepth=-1000pt \prevdepth0pt\fi

1816: \dimen0=-\prevdepth \advance\dimen0 by20pt\nointerlineskip

1817: \vbox to28pt{\small\vrule height\dimen0 width0pt\relax\ifdraft#1\fi\vfill}%

1818: \egroup

1819: \if@twocolumn\vskip1pc\fi

1820: \ifpreprintsty

1821: \penalty10000\vfill

1822: \hbox to\columnwidth{\hfil Typeset using {REV\TeX}}\newpage

1823: \fi

1824: }

1825: 

1826: \def\keywords#1{%

1827: \@revmess{warning}{APS doesn't use keywords. I'll ignore them.}%

1828: }

1829: 

1830: \mark{{}{}} %

1831: 

1832: \if@twoside %

1833: \def\ps@headings{\let\@mkboth\markboth

1834: \def\@oddfoot{}\def\@evenfoot{}%

1835: \def\@evenhead{\rm \thepage\hfil \sl \leftmark}%

1836: \def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}%

1837: \def\sectionmark##1{\markboth {\uppercase{\ifnum \c@secnumdepth >\z@

1838: \thesection\hskip 1em\relax \fi ##1}}{}}%

1839: \def\subsectionmark##1{\markright {\ifnum \c@secnumdepth >\@ne

1840: \thesubsection\hskip 1em\relax \fi ##1}}}

1841: \else %

1842: \def\ps@headings{\let\@mkboth\markboth

1843: \def\@oddfoot{}\def\@evenfoot{}%

1844: \def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}%

1845: \def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\z@

1846: \thesection\hskip 1em\relax \fi ##1}}}}

1847: \fi

1848: 

1849: \def\ps@myheadings{\let\@mkboth\@gobbletwo

1850: \def\@oddhead{{\sl\rightmark}\hfil \rm\thepage}%

1851: \def\@oddfoot{}\def\@evenhead{\rm \thepage\hfil\sl\leftmark}%

1852: \def\@evenfoot{}\def\sectionmark##1{}\def\subsectionmark##1{}}

1853: 

1854: \def\today{\ifcase\month\or

1855: January\or February\or March\or April\or May\or June\or

1856: July\or August\or September\or October\or November\or December\fi

1857: \space\number\day, \number\year}

1858: 

1859: \ps@plain %

1860: \pagenumbering{arabic} %

1861: \if@twoside\else\raggedbottom\fi %

1862: \if@twocolumn %

1863: \twocolumn

1864: \sloppy

1865: \raggedbottom %

1866: \else

1867: \sloppy

1868: \onecolumn %

1869: \raggedbottom %

1870: \fi

1871: 

1872: \if@titlepage

1873: \@@input titlepag.sty\relax

1874: \fi

1875: 

1876: \endinput

1877: 

1878: %

1879: % ****** End of file aps.sty ******

1880: 

1881: 

1882: %%%%%%%%%%%%%%%%%%%%% End /document/RevTeX/aps.sty %%%%%%%%%%%%%%%%%%%%

1883: 

1884: %%%%%%%%%%%%%%%%%%%% Start /document/RevTeX/osa.sty %%%%%%%%%%%%%%%%%%%

1885: 

1886: % ******* Start of file osa.sty *******

1887: %

1888: % Copyright (c) 1992, Optical Society of America.

1889: %

1890: %   This is one of the files of the release version of the OSA macros for

1891: % REVTEX 3.0. REVTEX 3.0 is being developed by cooperation between the AAS,

1892: % AGU, AIP, APS, and OSA.

1893: %

1894: %

1895: % Support is available weekdays, 8:45 am--4:30 pm, East coast(USA) time.

1896: %

1897: %     Frank Harris

1898: %     Optical Society of America

1899: %     2010 Massachusetts Ave. N.W.

1900: %     Washington D.C. 20036-1023

1901: %     (202) 416-1903 (phone)

1902: %     (202) 416-6120 (fax)

1903: %     fharris@aip.org (Internet)

1904: %

1905: %

1906: %

1907: 

1908: \typeout{Filename: osa.sty, v1.0 <November 20, 1992>}

1909: 

1910: \def\partname{Part}

1911: \def\contentsname{Contents}

1912: \def\listfigurename{List of Figures}

1913: \def\listtablename{List of Tables}

1914: \def\indexname{Index}

1915: \def\figurename{Fig.}

1916: \def\tablename{Table}

1917: \def\abstractname{Abstract}

1918: 

1919: \newif\iffirstfig \global\firstfigtrue

1920: \newif\iffirsttab \global\firsttabtrue

1921: 

1922: \def\@tempa{aplop}

1923: \ifx\@journal\@tempa

1924:    \def\refname{\bf References} %

1925:    \def\acknowledgments{\section*{}}  %

1926: \else

1927:    \def\refname{\large\bf REFERENCES}

1928:    \def\acknowledgments{\section*{ACKNOWLEDGMENTS}}

1929: \fi

1930: 

1931: \def\tightenlines{\def\baselinestretch{1}\small\normalsize}

1932: 

1933: \ifx\selectfont\undefined %

1934: \@revmess{message}{NFSS not detected. Assuming OFSS.}

1935: \let\reset@font\relax

1936: \def\mathhexbox{\protect\mathhexbox@}

1937: \def\mathhexbox@#1#2#3{\relax

1938: \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%

1939: \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}

1940: \def\text#1{%

1941: \relax

1942: \ifmmode %

1943: \mathchoice

1944: {\hbox{\everymath{\displaystyle}\rm #1}}%

1945: {\hbox{\everymath{\textstyle}\rm #1}}%

1946: {\hbox{\everymath{\scriptstyle}%

1947: \def\prm{\fam\z@ \the\scriptfont\z@ \relax}%

1948: \def\pit{\fam\itfam \the\scriptfont\itfam \relax}%

1949: \rm #1}%

1950: }%

1951: {\hbox{\everymath{\scriptscriptstyle}%

1952: \def\prm{\fam\z@ \the\scriptscriptfont\z@ \relax}%

1953: \def\pit{\fam\itfam \the\scriptscriptfont\itfam \relax}%

1954: \rm #1}%

1955: }%

1956: \else %

1957: \leavevmode\hbox{#1}%

1958: \fi

1959: }

1960: \def\bbox#1{%

1961: \leavevmode\text{%

1962: \textfont0 \the\textfont\bffam

1963: \scriptfont0 \the\scriptfont\bffam

1964: \scriptscriptfont0 \the\scriptscriptfont\bffam

1965: \@temptokena\everymath \boldmath \everymath\@temptokena

1966: {$\m@th\relax#1$}%

1967: }%

1968: }

1969: \font\fivbf=cmbx5 \font\sixbf=cmbx6 \font\sevbf=cmbx7 \font\egtbf=cmbx8

1970: \expandafter\def\expandafter\ixpt\expandafter{\ixpt

1971: \scriptfont\bffam\sixbf \scriptscriptfont\bffam\fivbf}

1972: \expandafter\def\expandafter\xpt\expandafter{\xpt

1973: \scriptfont\bffam\sevbf \scriptscriptfont\bffam\fivbf}

1974: \expandafter\def\expandafter\xipt\expandafter{\xipt

1975: \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}

1976: \expandafter\def\expandafter\xiipt\expandafter{\xiipt

1977: \scriptfont\bffam\egtbf \scriptscriptfont\bffam\sixbf}

1978: \expandafter\def\expandafter\xivpt\expandafter{\xivpt

1979: \scriptfont\bffam\tenbf \scriptscriptfont\bffam\sevbf}

1980: \else   %

1981: \@revmess{message}{NFSS detected! Assuming NFSS.}

1982: \def\text#1{%

1983: \relax\ifmmode

1984: \mathchoice

1985: {\hbox{{\everymath{\displaystyle}#1}}}%

1986: {\hbox{{\everymath{\textstyle}#1}}}%

1987: {\hbox{{\everymath{\scriptstyle}\let\f@size\sf@size\selectfont#1}}}%

1988: {\hbox{{\everymath{\scriptscriptstyle}\let\f@size\ssf@size\selectfont#1}}}%

1989: \glb@settings

1990: \else

1991: \mbox{#1}%

1992: \fi

1993: }

1994: \def\bbox#1{%

1995: \relax\ifmmode

1996: \mathchoice

1997: {{\hbox{\boldmath$\displaystyle#1$}}}%

1998: {{\hbox{\boldmath$\textstyle#1$}}}%

1999: {{\hbox{\boldmath$\scriptstyle#1$}}}%

2000: {{\hbox{\boldmath$\scriptscriptstyle#1$}}}%

2001: \glb@settings

2002: \else

2003: \mbox{#1}%

2004: \fi

2005: }

2006: \def\mathhexbox{\protect\mathhexbox@}

2007: \def\mathhexbox@#1#2#3{\relax

2008: \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%

2009: \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}

2010: \fi

2011: 

2012: \input osa1\@ptsize.sty\relax   %

2013: 

2014: \def\@chuckoptarg[#1]{}

2015: 

2016: \def\labelenumi{\theenumi.}

2017: \def\theenumi{\arabic{enumi}}

2018: 

2019: \def\labelenumii{(\theenumii)}

2020: \def\theenumii{\alph{enumii}}

2021: \def\p@enumii{\theenumi}

2022: 

2023: \def\labelenumiii{\theenumiii.}

2024: \def\theenumiii{\roman{enumiii}}

2025: \def\p@enumiii{\theenumi(\theenumii)}

2026: 

2027: \def\labelenumiv{\theenumiv.}

2028: \def\theenumiv{\Alph{enumiv}}

2029: \def\p@enumiv{\p@enumiii\theenumiii}

2030: 

2031: \def\labelitemi{$\m@th\bullet$}

2032: \def\labelitemii{\bf --}

2033: \def\labelitemiii{$\m@th\ast$}

2034: \def\labelitemiv{$\m@th\cdot$}

2035: 

2036: \def\verse{\let\\=\@centercr

2037:   \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent

2038:           \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}

2039: \let\endverse\endlist

2040: 

2041: \def\quotation{\list{}{\listparindent 1.5em

2042:     \itemindent\listparindent

2043:     \rightmargin\leftmargin \parsep \z@ plus\p@}\item[]}

2044: \let\endquotation=\endlist

2045: 

2046: \def\quote{\list{}{\rightmargin\leftmargin}\item[]}

2047: \let\endquote=\endlist

2048: 

2049: \def\descriptionlabel#1{\hspace\labelsep \bf #1}

2050: \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin

2051:        \let\makelabel\descriptionlabel}}

2052: 

2053: \let\enddescription\endlist

2054: 

2055: \def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn

2056:      \else \newpage \fi \thispagestyle{empty}\c@page\z@}

2057: 

2058: \def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}

2059: 

2060: \arraycolsep 3pt

2061: \tabcolsep 2pt

2062: \arrayrulewidth .4pt

2063: \doublerulesep 2pt

2064: 

2065: \tabbingsep \labelsep

2066: 

2067: \skip\@mpfootins = \skip\footins

2068: 

2069: \fboxsep = 3pt

2070: \fboxrule = .4pt

2071: 

2072: \newcounter{part}

2073: \newcounter{section}

2074: \newcounter{subsection}[section]

2075: \newcounter{subsubsection}[subsection]

2076: \newcounter{paragraph}[subsubsection]

2077: \newcounter{subparagraph}[paragraph]

2078: 

2079: \def\thepart          {\Roman{part}}

2080: \def\thesection       {\arabic{section}}

2081: \def\p@section        {}

2082: \def\thesubsection    {\Alph{subsection}}

2083: \def\p@subsection     {\thesection\,}

2084: \def\thesubsubsection {\arabic{subsubsection}}

2085: \def\p@subsubsection  {\thesection\,\thesubsection\,}

2086: \def\theparagraph     {\alph{paragraph}}

2087: \def\thesubparagraph  {\theparagraph.\arabic{subparagraph}}

2088: 

2089: 

2090: \def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth

2091:      \let\@svsec\@empty\else

2092:      \refstepcounter{#1}%

2093:      \def\@tempa{#8}%

2094:      \ifx\@tempa\empty %

2095:        \ifappendixon %

2096:          \if@mainhead %

2097:            \def\@tempa{Appendix }\def\@tempb{}%

2098:          \else %

2099:            \def\@tempa{}\def\@tempb{. }%

2100:          \fi

2101:        \else    %

2102:          \def\@tempa{}\def\@tempb{. }%

2103:        \fi

2104:      \else %

2105:        \ifappendixon %

2106:          \if@mainhead %

2107:            \def\@tempa{Appendix }\def\@tempb{: }%

2108:          \else %

2109:            \def\@tempa{}\def\@tempb{. }%

2110:          \fi

2111:        \else    %

2112:          \def\@tempa{}\def\@tempb{. }%

2113:        \fi

2114:      \fi

2115:      \edef\@svsec{\@tempa\csname the#1\endcsname\@tempb}\fi

2116:      \@tempskipa #5\relax

2117:       \ifdim \@tempskipa>\z@

2118:         \begingroup #6\relax

2119:           \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty \@M #8}%

2120:         \endgroup

2121:        \csname #1mark\endcsname{#7}\addcontentsline

2122:          {toc}{#1}{\ifnum #2>\c@secnumdepth \else

2123:                       \protect\numberline{\csname the#1\endcsname}\fi

2124:                     #7}\else

2125:         \def\@svsechd{#6\hskip #3\relax  %%

2126:                    \@svsec #8\csname #1mark\endcsname

2127:                       {#7}\addcontentsline

2128:                            {toc}{#1}{\ifnum #2>\c@secnumdepth \else

2129:                              \protect\numberline{\csname the#1\endcsname}\fi

2130:                        #7}}\fi

2131:      \@xsect{#5}}

2132: 

2133: \def\@ssect#1#2#3#4#5{\@tempskipa #3\relax

2134:    \ifdim \@tempskipa>\z@

2135:      \begingroup #4\@hangfrom{\hskip #1}{\interlinepenalty \@M

2136:      \ifappendixon

2137:        \if@mainhead %

2138:          \stepcounter{section}%

2139:          \def\@tempa{#5}%

2140:          \ifx\@tempa\empty %

2141:            Appendix%

2142:          \else %

2143:            Appendix:

2144:          \fi

2145:        \fi

2146:      \fi

2147:      #5}\endgroup

2148:    \else \def\@svsechd{#4\hskip #1\relax

2149:      \ifappendixon

2150:        \if@mainhead %

2151:          \stepcounter{section}%

2152:          \def\@tempa{#5}%

2153:          \ifx\@tempa\empty %

2154:            Appendix%

2155:          \else %

2156:            Appendix:

2157:          \fi

2158:        \fi

2159:      \fi

2160:      #5}\fi

2161:     \@xsect{#3}}

2162: 

2163: \def\part{\par

2164:    \addvspace{4ex}

2165:    \@afterindentfalse

2166:    \secdef\@part\@spart}

2167: 

2168: \def\@part[#1]#2{\ifnum \c@secnumdepth >\m@ne

2169:         \refstepcounter{part}

2170:         \addcontentsline{toc}{part}{\thepart

2171:         \hspace{1em}#1}\else

2172:       \addcontentsline{toc}{part}{#1}\fi

2173:    {\parindent \z@ \raggedright

2174:     \interlinepenalty\@M

2175:     \ifnum \c@secnumdepth >\m@ne

2176:       \Large \bf \partname~\thepart%

2177:       \par\nobreak

2178:     \fi

2179:     \huge \bf

2180:     #2%

2181:     \markboth{}{}\par

2182:    }\nobreak

2183:    \vskip 3ex

2184:    \@afterheading

2185:   }

2186: 

2187: \def\@spart#1{{\parindent \z@ \raggedright

2188:     \interlinepenalty\@M

2189:     \huge \bf

2190:     #1\par}

2191:     \nobreak

2192:     \vskip 3ex

2193:     \@afterheading

2194:   }

2195: 

2196: \newskip\@indentwidth \@indentwidth=18.4pt

2197: \newcount\@indentflag \global\@indentflag=1

2198: \def\@eqtoeqnum{6pt\relax}

2199: \ifpreprintsty % preprint; FL, FR don't work, equations are flush left.

2200: %  \let\@indentamount=\@centering

2201:   \def\@indentamount{0pt}

2202:   \let\FL=\relax

2203:   \let\FR=\relax

2204: \else

2205:   \def\@indentamount{%

2206:       \ifcase\@indentflag 0pt\or\@indentwidth\or0pt plus1fil\fi\relax}

2207:   \def\FL{\global\@indentflag=0 }

2208:   \def\FR{\global\@indentflag=2 }

2209: \fi

2210: 

2211: \newcounter{eqletter} \setcounter{eqletter}{0}

2212: 

2213: \def\@eqnnum{\hbox{\reset@font\rm(\theequation)}}

2214: \let\make@eqnnum=\@eqnnum %

2215: \def\eqnum#1{\dec@eqnnum \global\def\make@eqnnum{\reset@font\rm(#1)}%

2216:   \def\@currentlabel{#1}%

2217: }

2218: \def\inc@eqnnum{\addtocounter{equation}{1}}

2219: \def\dec@eqnnum{\addtocounter{equation}{-1}}

2220: \@definecounter{equation}%

2221: \ifsecnumbers %

2222:   \@addtoreset{equation}{section}

2223:   \def\theequation@prefix{\arabic{section}.}

2224: \else

2225:   \def\theequation@prefix{}

2226: \fi

2227: 

2228: \def\theequation{\theequation@prefix\arabic{equation}}%

2229: 

2230: \def\mathletters{%

2231:      \inc@eqnnum  \setcounter{eqletter}{0}%

2232:      \edef\@currentlabel{\theequation}%

2233:      \def\theequation{\theequation@prefix\arabic{equation}\alph{eqletter}}%

2234:      \def\inc@eqnnum{\addtocounter{eqletter}{1}}%

2235:      \def\dec@eqnnum{\addtocounter{eqletter}{-1}}%

2236: }

2237: 

2238: \let\endmathletters\relax

2239: 

2240: \def\[{\relax

2241:   \ifmmode\@badmath\else\par\vskip-\lastskip\vskip\abovedisplayskip\fi

2242:   \hbox to\hsize\bgroup

2243:   \def\label##1{\@revmess{warning}{\string\label{##1} used

2244:    in \string\[\space environment after (\theequation)}}%

2245:   \hskip\@totalleftmargin\hskip\@indentamount$\displaystyle

2246: }

2247: 

2248: \def\]{\relax

2249:   \ifmmode

2250:     $\hskip\@centering\egroup

2251:     \else

2252:     \@badmath

2253:   \fi

2254:   \vskip\belowdisplayskip

2255:   \global\@indentflag=1 %

2256:   \noindent\ignorespaces

2257: }

2258: 

2259: \newbox\@testboxa

2260: \newbox\@testboxb

2261: 

2262: \def\equation{\par\vskip-\lastskip\vskip\abovedisplayskip

2263:   \inc@eqnnum\let\@currentlabel=\theequation

2264:   \setbox\@testboxa=\hbox\bgroup\hskip\@totalleftmargin\hskip\@indentamount

2265:   $\displaystyle

2266: }

2267: 

2268: \def\endequation{$\hskip\@centering\egroup %

2269:  \setbox\@testboxb=\hbox{\unhcopy\@testboxa\kern\@eqtoeqnum\make@eqnnum}%

2270:  \ifdim\wd\@testboxb>\hsize %

2271:    \vbox{\hbox to\hsize{\unhbox\@testboxa}%

2272:          \hbox to\hsize{\hfil\make@eqnnum}}%

2273:  \else %

2274:    \hbox to\hsize{\unhbox\@testboxb}%

2275:  \fi

2276:  \global\let\make@eqnnum\@eqnnum %

2277:  \vskip\belowdisplayskip\noindent\global\@indentflag=1 \global\@ignoretrue

2278: }

2279: 

2280: \def\eqnarray{\par\vskip-\lastskip\vskip\abovedisplayskip

2281: \inc@eqnnum\let\@currentlabel=\theequation

2282: \global\@eqnswtrue\m@th

2283: \global\@eqcnt\z@

2284: \tabskip\@totalleftmargin\advance\tabskip by\@indentamount\let\\\@eqncr

2285: \halign to\hsize\bgroup\hskip\@centering

2286:   $\displaystyle\tabskip\z@{##}$&\global\@eqcnt\@ne

2287:   \hfil${{}##{}}$\hfil

2288:   &\global\@eqcnt\tw@ $\displaystyle\tabskip\z@{##}$\hfil

2289:    \tabskip\@centering \if@eqnsw\phantom{\make@eqnnum\kern\@eqtoeqnum}\fi

2290:             &\llap{##}\tabskip\z@\cr}

2291: 

2292: \def\endeqnarray{%

2293:   \@@eqncr\egroup

2294:   \vskip\belowdisplayskip\noindent

2295:   \dec@eqnnum\global\@indentflag=1

2296:   \global\let\make@eqnnum\@eqnnum %

2297:   \global\@ignoretrue

2298: }

2299: 

2300: \def\nonumber{\global\@eqnswfalse

2301: \def\label##1{\@revmess{error}{\string\label{##1} used

2302:               with \string\nonumber\space before (\theequation)}}%

2303: }

2304: 

2305: \def\@@eqncr{\let\@tempa\relax

2306:     \ifcase\@eqcnt \def\@tempa{& & &}\or \def\@tempa{& &}%

2307:       \else \def\@tempa{&}\fi

2308:      \@tempa \if@eqnsw\make@eqnnum\inc@eqnnum\fi

2309:      \global\@eqnswtrue\global\@eqcnt\z@\global\let\make@eqnnum=\@eqnnum\cr

2310: }

2311: 

2312: \@namedef{eqnarray*}{\def\@eqncr{\nonumber\@seqncr}%

2313: \def\label##1{\@revmess{warning}{\string\label{##1} used

2314:  in eqnarray* environment before (\theequation)}}%

2315: \eqnarray}

2316: 

2317: \def\@pnumwidth{1.55em}

2318: \def\@tocrmarg {2.55em}

2319: \def\@dotsep{4.5}

2320: \setcounter{tocdepth}{3}

2321: 

2322: \def\tableofcontents{\section*{\contentsname

2323:         \@mkboth{\uppercase{\contentsname}}{\uppercase{\contentsname}}}%

2324:   \@starttoc{toc}}

2325: 

2326: \def\l@part#1#2{\addpenalty{\@secpenalty}%

2327:    \addvspace{2.25em plus\p@}%

2328:    \begingroup

2329:    \@tempdima 3em

2330:      \parindent \z@ \rightskip \@pnumwidth

2331:      \parfillskip -\@pnumwidth

2332:      {\large \bf

2333:      \leavevmode

2334:      #1\hfil \hbox to\@pnumwidth{\hss #2}}\par

2335:      \nobreak

2336:    \endgroup}

2337: 

2338: \def\l@section#1#2{\addpenalty{\@secpenalty}%

2339:    \addvspace{1.0em plus\p@}%

2340:    \@tempdima 1.5em

2341:    \begingroup

2342:      \parindent \z@ \rightskip \@pnumwidth

2343:      \parfillskip -\@pnumwidth

2344:      \bf

2345:      \leavevmode

2346:       \advance\leftskip\@tempdima

2347:       \hskip -\leftskip

2348:      #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par

2349:    \endgroup}

2350: 

2351: \def\l@subsection{\@dottedtocline{2}{1.5em}{2.3em}}

2352: \def\l@subsubsection{\@dottedtocline{3}{3.8em}{3.2em}}

2353: \def\l@paragraph{\@dottedtocline{4}{7.0em}{4.1em}}

2354: \def\l@subparagraph{\@dottedtocline{5}{10em}{5em}}

2355: 

2356: \def\listoffigures{\section*{\listfigurename

2357:     \@mkboth{\uppercase{\listfigurename}}{\uppercase{\listfigurename}}}%

2358:   \@starttoc{lof}}

2359: 

2360: \def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}

2361: 

2362: \def\listoftables{\section*{\listtablename\@mkboth

2363:    {\uppercase{\listtablename}}{\uppercase{\listtablename}}}%

2364:   \@starttoc{lot}}

2365: \let\l@table\l@figure

2366: 

2367: \def\@tempa{osa} %

2368: \def\tempa{\input osabib.sty} %

2369: \tempa

2370: 

2371: \newif\if@restonecol

2372: 

2373: \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi

2374: \columnseprule \z@

2375: \columnsep 35\p@\twocolumn[\section*{\indexname}]%

2376:     \@mkboth{\uppercase{\indexname}}{\uppercase{\indexname}}%

2377:     \thispagestyle{plain}\parindent\z@

2378:     \parskip\z@ plus.3\p@\relax\let\item\@idxitem}

2379: 

2380: \def\@idxitem{\par\hangindent 40\p@}

2381: 

2382: \def\subitem{\par\hangindent 40\p@ \hspace*{20\p@}}

2383: 

2384: \def\subsubitem{\par\hangindent 40\p@ \hspace*{30\p@}}

2385: 

2386: \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}

2387: 

2388: \def\indexspace{\par \vskip 10\p@ plus5\p@ minus3\p@\relax}

2389: 

2390: \long\def\@makefntext#1{\parindent 5pt\hsize\columnwidth\parskip0pt\relax

2391:  \small\def\strut{\vrule width0pt height0pt depth1.75pt\relax}%

2392:  $\m@th^{\@thefnmark}$#1}

2393: 

2394: \def\thefootnote{\fnsymbol{footnote}}

2395: 

2396: \def\@fnsymbol#1{\ifcase#1\or *\or \dagger\or \ddagger\or

2397:    \mathchar "278\or **\or \dagger\dagger

2398:    \or \ddagger\ddagger \or \mathchar "278 \mathchar "278\or

2399:    ***\or\dagger\dagger\dagger\or\ddagger\ddagger\ddagger\or

2400:    \mathchar "278 \mathchar "278 \mathchar "278

2401:    \else\@ctrerr\fi\relax}

2402: 

2403: \setcounter{topnumber}{2}

2404: \def\topfraction{.7}

2405: \setcounter{bottomnumber}{1}

2406: \def\bottomfraction{.3}

2407: \setcounter{totalnumber}{3}

2408: \def\textfraction{.2}

2409: \def\floatpagefraction{.5}

2410: \setcounter{dbltopnumber}{2}

2411: \def\dbltopfraction{.7}

2412: \def\dblfloatpagefraction{.5}

2413: 

2414: \long\def\@makecaption#1#2{%

2415:   \setbox\@testboxa\hbox{\outertabfalse %

2416:     \reset@font\small\rm#1\penalty10000\hskip4pt plus2pt\ignorespaces#2%

2417:   }% eo hbox

2418:   \setbox\@testboxb\vbox{\hsize\@capwidth

2419:     \ifdim\wd\@testboxa<\hsize  %

2420:       \hbox to\hsize{\box\@testboxa\hfil}%

2421:     \else % reset as a paragraph

2422:       \small

2423:       \parindent \ifpreprintsty 0pt \else 1em \fi  %

2424:       \unhbox\@testboxa\par

2425:     \fi

2426:   }%

2427:   \box\@testboxb

2428: } %

2429: 

2430: \newcounter{figure}

2431: \def\thefigure{\@arabic\c@figure}

2432: 

2433: \def\fps@figure{tbp}

2434: \def\ftype@figure{1}

2435: \def\ext@figure{lof}

2436: \def\fnum@figure{\figurename\penalty10000\

2437:     \thefigure.\hskip1em}

2438: 

2439: \def\figure{%

2440:     \let\@capwidth\columnwidth

2441:     \ifpreprintsty\iffirstfig

2442:       {\newpage\centerline{FIGURES}}\global\firstfigfalse

2443:     \fi\fi

2444:     \vskip1pc

2445:     \def\@captype{figure}%

2446:     \interlinepenalty10000 %

2447:     \@ifnextchar[{\@chuckoptarg}{}%

2448:   }%

2449:   \def\endfigure{\goodbreak\vskip1pc}%

2450:   \@namedef{figure*}{\figure}%

2451:   \@namedef{endfigure*}{\endfigure}%

2452: %

2453: 

2454: \newcounter{table}

2455: \def\thetable{\@arabic\c@table} %

2456: 

2457: {\catcode`\.=13 %

2458: \gdef.{\relax\egroup\def\@flag{1}\setbox1\hbox\bgroup}%

2459: }%

2460: 

2461: \def\fps@table{tbp}

2462: \def\ftype@table{2}

2463: \def\ext@table{lot}

2464: \def\fnum@table{\tablename\kern.33em\thetable.}

2465: \if@floats

2466: \else %

2467:   \def\table{%

2468:     \let\@capwidth\columnwidth

2469:     \iffirsttab

2470:       \global\firsttabfalse

2471:       \ifpreprintsty{\newpage\centerline{TABLES}}\fi

2472:     \fi

2473:     \vskip1pc

2474:     \global\tableontrue

2475:     \bgroup\parindent=0pt

2476:     \outertabtrue

2477:     \setcounter{tablenote}{0}%

2478:     \def\@captype{table}%

2479:     \@ifnextchar[{\@chuckoptarg}{}%

2480:   }%

2481:   \def\endtable{%

2482:     \global\tableonfalse\global\outertabfalse

2483:     {\let\protect\relax\small\vskip2pt\leftskip = 1em\@tablenotes%

2484:     \par}\xdef\@tablenotes{}%

2485:     \egroup

2486:     \vskip1pc plus 1filll \penalty-200 \vskip0pt plus -1filll

2487:   }%

2488: \@namedef{table*}{\table}

2489: \@namedef{endtable*}{\endtable}

2490: \fi

2491: 

2492: \@definecounter{tablenote}

2493: \def\thetablenote{\it\alph{tablenote}}   %

2494: \def\@tablenotes{}

2495: 

2496: \def\@maketnmark{\leavevmode\hbox{$^{\reset@font\rm\@thetnmark}\m@th$}}

2497: 

2498: \def\tablenote{\@ifnextchar[{\@xtablenote}{\stepcounter{tablenote}%

2499:    \begingroup \def\protect{\noexpand\protect\noexpand}%

2500:     \xdef\@thetnmark{\thetablenote}\endgroup    %

2501:    \@tablenotemark\@tablenotetext}}

2502: 

2503: \def\@xtablenote[#1]{\begingroup \c@tablenote #1\relax

2504:    \def\protect{\noexpand\protect\noexpand}%

2505:     \xdef\@thetnmark{\thetablenote}\endgroup

2506:    \@tablenotemark\@tablenotetext}

2507: 

2508: \long\def\@tablenotetext#1{%

2509:   \bgroup

2510:     \def\protect{\noexpand\protect\noexpand}%

2511:     \edef\@tempa{\@maketnmark}%

2512:     \expandafter\expandafter\expandafter

2513:     \gdef

2514:     \expandafter\expandafter\expandafter

2515:     \@tablenotes

2516:     \expandafter\expandafter\expandafter

2517:       {\expandafter\@tablenotes\expandafter\par\@tempa#1}%

2518:   \egroup

2519: }

2520: 

2521: \def\tablenotemark{\@ifnextchar[{\@xtablenotemark}{\stepcounter{tablenote}%

2522:    \begingroup\def\protect{\noexpand\protect\noexpand}%

2523:    \xdef\@thetnmark{\thetablenote}\endgroup

2524:    \@tablenotemark}}

2525: 

2526: \def\@xtablenotemark[#1]{\begingroup \c@tablenote #1\relax

2527:     \def\protect{\noexpand\protect\noexpand}%

2528:    \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotemark}

2529: 

2530: \def\@tablenotemark{\leavevmode\ifhmode

2531:   \edef\@x@sf{\the\spacefactor}\fi \@maketnmark

2532:    \ifhmode\spacefactor\@x@sf\fi\relax}

2533: 

2534: \def\tablenotetext{\@ifnextchar [{\@xtablenotetext}%

2535:    {\begingroup

2536:     \def\protect{\noexpand\protect\noexpand}%

2537:       \xdef\@thetnmark{\thetablenote}\endgroup

2538:     \@tablenotetext}}

2539: 

2540: \def\@xtablenotetext[#1]{\begingroup \c@tablenote #1\relax

2541:     \def\protect{\noexpand\protect\noexpand}%

2542:    \xdef\@thetnmark{\thetablenote}\endgroup \@tablenotetext}

2543: 

2544: \def\tableline{\noalign{\vskip2pt\hrule\vskip2pt}}

2545: 

2546: \newdimen\@Ldec \newdimen\@Rdec

2547: 

2548: \def\dec #1.#2 {\hbox to\@Ldec{\hss#1}\def\test{#2}%

2549: \ifx\test\empty\hbox to\@Rdec{\hfill}\else\hbox to\@Rdec{.#2\hss}\fi

2550: }

2551: 

2552: \def\setdec #1.#2 {\relax%

2553:   \bgroup

2554:     \setbox0\hbox{\kern1pt\relax#1}\setbox1\hbox{\kern1pt\relax#2}%

2555:     \global\@Ldec\wd0\global\@Rdec\wd1%

2556:   \egroup

2557: }

2558: 

2559: \setdec 000.000 %

2560: 

2561: \def\savecaption{}

2562: 

2563: \def\apstable@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule

2564:      height\arraystretch \ht\strutbox

2565:      depth\arraystretch \dp\strutbox

2566:      width\z@}\@mkpream{#2}\edef\@preamble{\tabskip\z@ plus 1fil\halign

2567:  to\@capwidth%

2568: \bgroup \tabskip\z@ plus1fill \@arstrut

2569: \@preamble\hskip-\tabcolsep \tabskip\z@ plus 1fil

2570:  \cr}%

2571: \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%

2572:   \bgroup\let\par\relax\outertabfalse%

2573:   \let\@sharp##\let\protect\relax

2574:   \def\@startcenterdot{\begingroup

2575:     \relax\def\@flag{0 }\catcode`\.=13

2576:     \setbox0\hbox\bgroup\ignorespaces}%

2577:   \def\@endcenterdot{\unskip\egroup\catcode`\.=12

2578:     \ifnum\@flag=0 %

2579:      \box0

2580:     \else %

2581:       \ifdim\wd0=0pt %

2582:         \setbox0\hbox to\wd1{\hss 0}\box0.\box1

2583:       \else

2584:         \ifdim\wd1=0pt %

2585:           \setbox1=\hbox{\phantom{.\copy0}}\box0\box1

2586:         \else %

2587:           \ifdim\wd0>\wd1

2588:             \setbox1\hbox to\wd0{\box1\hfil}%

2589:           \else

2590:             \setbox0\hbox to\wd1{\hfil\box0}%

2591:           \fi

2592:           \box0.\box1

2593:         \fi

2594:       \fi

2595:     \fi

2596:   \endgroup}%

2597:   \lineskip\z@\baselineskip\z@\@preamble}

2598: 

2599: \def\@array[#1]#2{\setbox\@arstrutbox=\hbox{\vrule

2600:      height\arraystretch \ht\strutbox

2601:      depth\arraystretch \dp\strutbox

2602:      width\z@}\@mkpream{#2}\edef\@preamble{\halign\noexpand\@halignto

2603: \bgroup\tabskip\z@\@arstrut\@preamble

2604: \tabskip\z@\cr}%

2605: \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox%

2606:   \if #1t\vtop \else \if#1b\vbox \else \vcenter \fi\fi%

2607:   \bgroup\let\par\relax%

2608:   \let\@sharp##\let\protect\relax

2609:   \def\@startcenterdot{\begingroup

2610:     \relax\def\@flag{0 }\catcode`\.=13

2611:     \setbox0\hbox\bgroup\ignorespaces}%

2612:   \def\@endcenterdot{\unskip\egroup\catcode`\.=12

2613:     \ifnum\@flag=0 %

2614:      \box0

2615:     \else %

2616:       \ifdim\wd0=0pt %

2617:         \setbox0\hbox to\wd1{\hss 0}\box0.\box1

2618:       \else

2619:         \ifdim\wd1=0pt %

2620:           \setbox1=\hbox{\phantom{.\copy0}}\box0\box1

2621:         \else %

2622:           \ifdim\wd0>\wd1

2623:             \setbox1\hbox to\wd0{\box1\hfil}%

2624:           \else

2625:             \setbox0\hbox to\wd1{\hfil\box0}%

2626:           \fi

2627:           \box0.\box1

2628:         \fi

2629:       \fi

2630:     \fi

2631:   \endgroup}%

2632:   \lineskip\z@\baselineskip\z@\@preamble}

2633: 

2634: \def\@arrayclassz{\ifcase \@lastchclass \@acolampacol \or \@ampacol \or

2635:    \or \or \@addamp \or

2636:    \@acolampacol \or \@firstampfalse \@acol \fi

2637: \edef\@preamble{\@preamble

2638:   \ifcase \@chnum

2639:      \hfil$\relax\@sharp$\hfil \or $\relax\@sharp$\hfil

2640:     \or \hfil$\relax\@sharp$\or

2641:      \hfil$\relax\@sharp$\hfil \fi}}

2642: 

2643: \def\@tabclassz{\ifcase \@lastchclass\@acolampacol

2644: \or \@ampacol \or \or \or \@addamp \or \@acolampacol\or

2645: \@firstampfalse \new@tabacol \fi

2646: \edef\@preamble{\@preamble{%

2647:   \ifcase \@chnum

2648:      \hfil\ignorespaces\@sharp\unskip\hfil

2649:      \or \ignorespaces\@sharp\unskip\hfil

2650:      \or \hfil\hskip\z@ \ignorespaces\@sharp\unskip

2651:      \or\hfil\@startcenterdot\@sharp\@endcenterdot\hfil

2652:      \fi}}}

2653: 

2654: \def\@tabclassiv{\@addtopreamble\@nextchar}

2655: 

2656: \let\tabbodyfont\small

2657: \def\squeezetable{\let\tabbodyfont\scriptsize}

2658: 

2659: \def\tabular{\def\@halignto{}\@tabular}

2660: 

2661: \newif\ifoutertab

2662: \global\outertabfalse

2663: 

2664: \def\@tabular{%

2665:   \ifoutertab

2666:     \tabbodyfont\global\@newlistfalse\bgroup

2667:   \else

2668:     \leavevmode\hbox\bgroup$%

2669:   \fi

2670:   \let\@acol\@tabacol

2671:   \let\@classz\@tabclassz

2672:   \let\@classiv\@tabclassiv \let\\\@tabularcr

2673:   \ifoutertab

2674:     \vskip18pt\hrule width\@capwidth\vskip2pt

2675:     \expandafter\apstable@tabarray

2676:   \else

2677:     \expandafter\@tabarray

2678:   \fi

2679: }

2680: 

2681: \def\apstable@tabarray{%

2682:  \m@th\@ifnextchar[{\apstable@array}{\apstable@array[c]}%

2683: }

2684: 

2685: \def\endtabular{\crcr\egroup\egroup

2686:   \ifoutertab

2687:     \vskip3pt\hrule width\@capwidth\vskip2pt

2688:   \else

2689:     $%

2690:   \fi \egroup

2691: }

2692: 

2693: \def\new@tabacol{\edef\@preamble{\@preamble \hskip0pt%

2694: }}

2695: 

2696: \newif\iftableon

2697: 

2698: \def\@mkpream#1{\@firstamptrue\@lastchclass6

2699: \def\@preamble{}%

2700: \def\protect{\noexpand\protect\noexpand}\let\@sharp\relax

2701: \let\@startpbox\relax\let\@endpbox\relax

2702: \let\@startcenterdot\relax \let\@endcenterdot\relax

2703: \@expast{#1}\expandafter\@tfor \expandafter

2704:   \@nextchar \expandafter:\expandafter=\@tempa\do{\@testpach\@nextchar

2705:   \ifcase \@chclass \@classz \or \@classi \or \@classii \or \@classiii

2706:     \or \@classiv \or\@classv \fi%

2707: \iftableon\ifoutertab %

2708:   \ifnum\@chclass=4

2709:     \@addtopreamble{\tabskip\z@}%

2710:   \else

2711:     \ifnum\@lastchclass=4

2712:       \@addtopreamble{\tabskip\z@ plus1fill}%

2713:     \fi

2714:   \fi

2715: \fi\fi

2716: \@lastchclass\@chclass}%

2717: \ifcase \@lastchclass \@acol

2718:     \or \or \@preamerr \@ne\or \@preamerr \tw@\or \or \@acol \fi}

2719: 

2720: \def\@testpach#1{\@chclass \ifnum \@lastchclass=\tw@ 4 \else

2721:     \ifnum \@lastchclass=3 5 \else

2722:      \z@ \if #1c\@chnum \z@ \else

2723:                               \if #1l\@chnum \@ne \else

2724:                               \if #1r\@chnum \tw@ \else

2725:                               \if #1d\@chnum 3 \else %

2726:           \@chclass \if #1|\@ne \else

2727:                     \if #1@\tw@ \else

2728:                     \if #1p3 \else \z@ \@preamerr 0\fi

2729:   \fi  \fi  \fi  \fi  \fi  \fi \fi %

2730: \fi}

2731: 

2732: \def\quasitable{%

2733:   \par\vskip\topsep \bgroup

2734:   \def\caption##1{\@revmess{warning}{Captions are not supported

2735:   for quasitables.}\@revmess{warning}{No caption was set.}}%

2736:   \def\tablenotes##1{\@revmess{warning}{Tablenotes are not

2737:   supported for quasitables.}%

2738:   \@revmess{warning}{No tablenotes were set.}}%

2739:   \tableontrue\outertabtrue\parindent0pt\relax}

2740: 

2741: \def\endquasitable{\par\egroup\vskip\topsep\noindent

2742: \global\@ignoretrue}

2743: 

2744: \def\@frontmaterial{} \def\@preprint{}

2745: \def\and{\unskip, }

2746: 

2747: \def\preprint#1{%

2748: \ifpreprintsty

2749: \def\@preprint{\noindent\hfill\hbox{#1}\vskip 10pt}%

2750: \fi

2751: }

2752: 

2753: \def\title#1{\expandafter\def\expandafter\@frontmaterial\expandafter

2754: {\@frontmaterial{\large\bf\centering\ignorespaces#1\par\vskip2pc}}}

2755: 

2756: \def\author#1{\expandafter\def\expandafter\@frontmaterial\expandafter

2757: {\@frontmaterial{\vskip-\lastskip\vskip1pc\rm\centering\ignorespaces#1\par}}}

2758: 

2759: \def\address#1{\expandafter\def\expandafter\@frontmaterial\expandafter

2760: {\@frontmaterial{\vskip-\lastskip\vskip.2pc%

2761:                 \small\it\centering\ignorespaces#1\par

2762:                  \vskip1pc}}}

2763: 

2764: \def\date#1{\expandafter\def\expandafter\@frontmaterial\expandafter

2765: {\@frontmaterial{\vskip-\lastskip\vskip1pc\rm\centering\ignorespaces#1\vskip

2766: 1pc}}}

2767: 

2768: \def\maketitle{\par

2769:  \begingroup

2770:    \let\cite\bylinecite

2771:    \let\thanks\footnote

2772:    \def\thefootnote{\fnsymbol{footnote}}%

2773:    \if@twocolumn

2774:      \twocolumn[\@maketitle]%

2775:      \else \newpage

2776:      \global\@topnum\z@   %

2777:      \@maketitle \fi\thispagestyle{plain}\@thanks

2778:  \endgroup

2779:  \def\thefootnote{\arabic{footnote}}%

2780:  \setcounter{footnote}{0}%

2781:  \let\maketitle\relax

2782:  \let\@maketitle\relax

2783:  \gdef\@thanks{}\gdef\@frontmaterial{}\gdef\@title{}\let\thanks\relax}

2784: 

2785: \def\@maketitle{\@preprint\@frontmaterial\gdef\@frontmaterial{}}

2786: 

2787: \def\abstract{%

2788: \if@twocolumn

2789:   \section*{\abstractname}%

2790: \else

2791:   \par

2792:   \ifpreprintsty

2793:     \vskip3pc

2794:     \begin{center}%

2795:       {\bf\large \abstractname\par}%

2796:     \end{center}%

2797:   \fi

2798:   \bgroup

2799:     \dimen0\textwidth\advance\dimen0by-5.56in\divide\dimen0by2

2800:     \leftskip\dimen0\rightskip\leftskip

2801:     \small\vrule width 0pt height .6cm

2802:     \leavevmode

2803: \fi}

2804: 

2805: \def\endabstract{\if@twocolumn\else\par\egroup\fi}

2806: 

2807: \def\pacs#1{

2808:   \bgroup

2809:     \dimen0\textwidth\advance\dimen0by-5.56in\divide\dimen0by2

2810:     \leftskip\dimen0\rightskip\leftskip\parindent0pt

2811:     \vskip1pc

2812:     #1\par

2813:   \egroup

2814: }

2815: 

2816: \mark{{}{}}   %

2817: 

2818: \if@twoside         %

2819:  \def\ps@headings{\let\@mkboth\markboth

2820:   \def\@oddfoot{}\def\@evenfoot{}%

2821:   \def\@evenhead{\rm \thepage\hfil \sl \leftmark}%

2822:   \def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}%

2823:   \def\sectionmark##1{\markboth {\uppercase{\ifnum \c@secnumdepth >\z@

2824:     \thesection\hskip 1em\relax \fi ##1}}{}}%

2825:   \def\subsectionmark##1{\markright {\ifnum \c@secnumdepth >\@ne

2826:           \thesubsection\hskip 1em\relax \fi ##1}}}

2827: \else

2828:  \def\ps@headings{\let\@mkboth\markboth

2829:   \def\@oddfoot{}\def\@evenfoot{}%

2830:   \def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}%

2831:   \def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\z@

2832:     \thesection\hskip 1em\relax \fi ##1}}}}

2833: \fi

2834: 

2835: \def\ps@myheadings{\let\@mkboth\@gobbletwo

2836:  \def\@oddhead{{\sl\rightmark}\hfil \rm\thepage}%

2837:  \def\@oddfoot{}\def\@evenhead{\rm \thepage\hfil\sl\leftmark}%

2838:  \def\@evenfoot{}\def\sectionmark##1{}\def\subsectionmark##1{}}

2839: 

2840: \def\today{\ifcase\month\or

2841:   January\or February\or March\or April\or May\or June\or

2842:   July\or August\or September\or October\or November\or December\fi

2843:   \space\number\day, \number\year}

2844: 

2845: \ps@plain

2846: \pagenumbering{arabic}

2847: \if@twoside\else\raggedbottom\fi %

2848: \if@twocolumn %

2849:   \twocolumn

2850:   \sloppy

2851:   \raggedbottom %

2852: \else

2853:   \sloppy

2854:   \onecolumn

2855:   \raggedbottom %

2856: \fi

2857: 

2858: \if@titlepage

2859:   \@@input titlepag.sty\relax

2860: \fi

2861: 

2862: \def\ao{Appl.\  Opt.\ }

2863: \def\ap{Appl.\  Phys.\ }

2864: \def\apl{Appl.\ Phys.\ Lett.\ }

2865: \def\apj{Astrophys.\ J.\ }

2866: \def\bell{Bell Syst.\ Tech.\ J.\ }

2867: \def\jqe{IEEE J.\ Quantum Electron.\ }

2868: \def\assp{IEEE Trans.\ Acoust.\ Speech Signal Process.\ }

2869: \def\aprop{IEEE Trans.\ Antennas Propag.\ }

2870: \def\mtt{IEEE Trans.\ Microwave Theory Tech.\ }

2871: \def\iovs{Invest.\ Ophthalmol.\ Vis.\ Sci.\ }

2872: \def\jcp{J.\ Chem.\ Phys.\ }

2873: \def\jmo{J.\ Mod.\ Opt.\ }

2874: \def\josa{J.\ Opt.\ Soc.\ Am.\ }

2875: \def\josaa{J.\ Opt.\ Soc.\ Am.\ A }

2876: \def\josab{J.\ Opt.\ Soc.\ Am.\ B }

2877: \def\jpp{J.\ Phys.\ (Paris) }

2878: \def\nat{Nature (London) }

2879: \def\oc{Opt.\ Commun.\ }

2880: \def\ol{Opt.\ Lett.\ }

2881: \def\pl{Phys.\ Lett.\ }

2882: \def\pra{Phys.\ Rev.\ A }

2883: \def\prb{Phys.\ Rev.\ B }

2884: \def\prl{Phys.\ Rev.\ Lett.\ }

2885: \def\pspie{Proc.\ Soc.\ Photo-Opt.\ Instrum.\ Eng.\ }

2886: \def\sjqe{Sov.\ J.\ Quantum Electron.\ }

2887: \def\vr{Vision Res.\ }

2888: \endinput

2889: 

2890: 

2891: 

2892: %%%%% end of file OSA.STY %%%%%

2893: 

2894: 

2895: %%%%%%%%%%%%%%%%%%%%% End /document/RevTeX/osa.sty %%%%%%%%%%%%%%%%%%%%

2896: 

2897: %%%%%%%%%%%%%%%%%% Start /document/RevTeX/prbbib.sty %%%%%%%%%%%%%%%%%%

2898: 

2899: % ****** Start of file prbbib.sty ******

2900: %

2901: %

2902: %   This file is part of the APS files in the REVTeX 3.1 distribution.

2903: %   Version 3.1 of REVTeX, July 1, 1996.

2904: %

2905: %   Copyright (c) 1996 The American Physical Society.

2906: %

2907: %   See the REVTeX 3.1 README file for restrictions and more information.

2908: %

2909: 

2910: \typeout{Filename: prbbib.sty, v3.1 <7/1/1996>}

2911: 

2912: \def\@bibitem#1{\item\if@filesw \immediate\write\@auxout

2913: {\string\bibcite{#1}{\the\value{\@listctr}}}\fi\ignorespaces}

2914: 

2915: \def\@cite#1#2{{#1\if@tempswa , #2\fi}} %

2916: \def\@biblabel#1{$^{#1}$} %

2917: 

2918: \def\@lbibitem[#1]#2{\item[\@biblabel{#1}]\if@filesw

2919: {\def\protect##1{\string ##1\space}\immediate

2920: \write\@auxout{\string\bibcite{#2}{#1}}}\fi\ignorespaces}

2921: 

2922: \newdimen\WidestRefLabelThusFar

2923: \global\WidestRefLabelThusFar\z@

2924: 

2925: \def\bibcite#1#2{\global\@namedef{b@#1}{#2}\@SetMaxRefLabel{#1}}

2926: 

2927: \def\@SetMaxRefLabel#1{%

2928: {%

2929: \setbox0\hbox{$^{\csname b@#1\endcsname}$}%

2930: \ifdim\wd0>\WidestRefLabelThusFar

2931: \global\WidestRefLabelThusFar=\wd0

2932: \fi

2933: }%

2934: }

2935: 

2936: \def\@citex[#1]#2{%

2937: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

2938: \leavevmode\unskip$^{\scriptstyle\@cite{\@collapse{#2}}{#1}}$}

2939: 

2940: \def\CITE{%

2941: \@ifnextchar[{\@tempswatrue\@CITEX}{\@tempswafalse\@CITEX[]}%

2942: }

2943: 

2944: \let\onlinecite\CITE

2945: 

2946: \def\@CITEX[#1]#2{%

2947: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

2948: \leavevmode\unskip\ \@cite{\@collapse{#2}}{#1}}

2949: 

2950: \let\@bylinecite\cite

2951: 

2952: \def\@collapse#1{%

2953: {%

2954: \let\@temp\relax

2955: \@tempcntb\@MM

2956: \def\@citea{}%

2957: \@for \@citeb:=#1\do{%

2958: \@ifundefined{b@\@citeb}%

2959: {\@temp\@citea{\bf ?}%

2960: \@tempcntb\@MM\let\@temp\relax

2961: \@warning{Citation `\@citeb ' on page \thepage\space undefined}%

2962: }%

2963: {\@tempcnta\@tempcntb \advance\@tempcnta\@ne

2964: \edef\MyTemp{\csname b@\@citeb\endcsname}%

2965: \def\@tempa{\@temptokena=\bgroup}%

2966: \if0A{\fi%

2967: \afterassignment\@tempa %

2968: \@tempcntb=0\MyTemp\relax}%

2969: \ifnum\@tempcntb=0\relax%

2970: \@tempcntb=\@MM

2971: \@citea\MyTemp

2972: \let\@temp = \relax

2973: \else %

2974: \edef\@tempd{\number\@tempcntb}%

2975: \ifnum\@tempcnta=\@tempcntb %

2976: \ifx\@temp\relax %

2977: \edef\@temp{\@citea\@tempd}%

2978: \else

2979: \edef\@temp{\hbox{--}\@tempd}%

2980: \fi

2981: \else %

2982: \@temp\@citea\@tempd

2983: \let\@temp\relax

2984: \fi

2985: \fi

2986: }%

2987: \def\@citea{, }%

2988: }%

2989: \@temp %

2990: }%

2991: }%

2992: 

2993: \def\references{%

2994: \ifpreprintsty

2995: \newpage

2996: \hbox to\hsize{\hss\large \refname\hss}%

2997: \else

2998: \vskip24pt

2999: \hrule width\hsize\relax

3000: \vskip 1.6cm

3001: \fi

3002: \list{\@biblabel{\arabic{enumiv}}}%

3003: {\labelwidth\WidestRefLabelThusFar  \labelsep2pt %

3004: \leftmargin\labelwidth %

3005: \advance\leftmargin\labelsep %

3006: \ifdim\baselinestretch pt>1 pt %

3007: \parsep  4pt\relax %

3008: \else   %

3009: \parsep  0pt\relax %

3010: \fi

3011: \itemsep\parsep %

3012: \usecounter{enumiv}%

3013: \let\p@enumiv\@empty

3014: \def\theenumiv{\arabic{enumiv}}%

3015: }%

3016: \let\newblock\relax %

3017: \sloppy\clubpenalty4000\widowpenalty4000

3018: \sfcode`\.=1000\relax

3019: \ifpreprintsty\else\small\fi

3020: }

3021: 

3022: \def\endreferences{%

3023: \def\@noitemerr{\@warning{Empty `thebibliography' environment}}%

3024: \endlist     \let\@SetMaxRefLabel\@gobble

3025: }

3026: 

3027: \def\thebibliography#1{\references}

3028: 

3029: \def\endthebibliography{\endreferences}

3030: 

3031: %

3032: % ****** End of file prbbib.sty ******

3033: 

3034: 

3035: %%%%%%%%%%%%%%%%%%% End /document/RevTeX/prbbib.sty %%%%%%%%%%%%%%%%%%%

3036: 

3037: %%%%%%%%%%%%%%%%%% Start /document/RevTeX/prabib.sty %%%%%%%%%%%%%%%%%%

3038: 

3039: %------------- Beginning of prabib.sty ---------------------

3040: 

3041: %   This file is part of the APS files in the REVTeX 3.1 distribution.

3042: %   Version 3.1 of REVTeX, July 1, 1996.

3043: %

3044: %   Copyright (c) 1996 The American Physical Society.

3045: %

3046: %   See the REVTeX 3.1 README file for restrictions and more information.

3047: %

3048:  

3049: \typeout{Filename: prabib.sty, v3.1 <7/1/96>}

3050: 

3051: \def\@bibitem#1{\item\if@filesw \immediate\write\@auxout

3052: {\string\bibcite{#1}{\the\value{\@listctr}}}\fi\ignorespaces}

3053: 

3054: \newdimen\WidestRefLabelThusFar

3055: 

3056: \global\WidestRefLabelThusFar\z@

3057: 

3058: \def\bibcite#1#2{\global\@namedef{b@#1}{#2}\@SetMaxRefLabel{#1}}

3059: 

3060: \def\@SetMaxRefLabel#1{%

3061: {%

3062: \if\@ExpandsToRefNumber{#1}%

3063: \setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi

3064: \rm[\csname b@#1\endcsname]}%

3065: \else %

3066: \setbox0\hbox{\ifpreprintsty\@normalsize\else\small\fi

3067: $\scriptstyle\m@th{\csname b@#1\endcsname}$}%

3068: \fi

3069: \ifdim\wd0>\WidestRefLabelThusFar

3070: \global\WidestRefLabelThusFar=\wd0

3071: \fi

3072: }%

3073: }

3074: 

3075: % To use \protected@edef (instead of \edef) we have to add the following

3076: % three def's (from LaTeX2e) FOR  LATEX 2.09 USERS!

3077: %						 --- Hu Wang 

3078: \ifx\every@math@size\undefined

3079: \def\protected@edef{%

3080:    \let\@@protect\protect

3081:    \let\protect\@unexpandable@protect

3082:    \afterassignment\restore@protect

3083:    \edef}

3084: \def\@unexpandable@protect{\noexpand\protect\noexpand}

3085: \def\restore@protect{\let\protect\@@protect}

3086: \fi

3087: %%

3088: 

3089: \def\@ExpandsToRefNumber #1{%

3090: TT\fi %

3091: \@ifundefined{b@#1}%

3092: {\@tempcntb=1

3093: }%

3094: % using \edef is bad here! Christian Spieler and David Carlisle  suggest

3095: % The fix: use \protected@edef !

3096: %

3097: {\protected@edef\@tempb{\csname b@#1\endcsname}%

3098: \def\@tempa{\@temptokena=\bgroup}%

3099: \if0A { \else  \fi %

3100: \afterassignment\@tempa

3101: \@tempcntb=0\@tempb}%

3102: }%

3103: \ifnum\@tempcntb>0 %

3104: }%

3105: 

3106: \def\cite{\@ifnextchar[{\@tempswatrue\@citex}{\@tempswafalse\@citex[]}}

3107: \let\CITE\cite

3108: \let\onlinecite\cite

3109: 

3110: \def\@citex[#1]#2{%

3111: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

3112: \leavevmode\unskip\ \@cite{\@collapse{#2}}{#1}}

3113: 

3114: \def\@bylinecite{%

3115: \@ifnextchar[{\@tempswatrue\@CITEX}{\@tempswafalse\@CITEX[]}%

3116: }

3117: 

3118: \def\@CITEX[#1]#2{%

3119: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

3120: \leavevmode\unskip$^{\scriptstyle\@CITE{\@collapse{#2}}{#1}}$}

3121: 

3122: \def\@cite#1#2{[{#1\if@tempswa , #2\fi}]} %

3123: \def\@CITE#1#2{{#1\if@tempswa , #2\fi}} %

3124: 

3125: \def\@lbibitem[#1]#2{\item[\@BIBLABEL{#1}]\if@filesw

3126: {\def\protect##1{\string ##1\space}\immediate

3127: \write\@auxout{\string\bibcite{#2}{#1}}}\fi\ignorespaces}

3128: 

3129: \def\@biblabel#1{{[#1]}} %

3130: \def\@BIBLABEL#1{$^{#1}\m@th$} %

3131: 

3132: \def\references{%

3133: \ifpreprintsty

3134: \newpage

3135: \hbox to\hsize{\hss\large \refname\hss}%

3136: \else

3137: \vskip24pt

3138: \hrule width\hsize\relax

3139: \vskip 1.6cm

3140: \fi

3141: \list{\@biblabel{\arabic{enumiv}}}%

3142: {\labelwidth\WidestRefLabelThusFar  \labelsep4pt %

3143: \leftmargin\labelwidth %

3144: \advance\leftmargin\labelsep %

3145: \ifdim\baselinestretch pt>1 pt %

3146: \parsep  4pt\relax %

3147: \else %

3148: \parsep  0pt\relax %

3149: \fi

3150: \itemsep\parsep %

3151: \usecounter{enumiv}%

3152: \let\p@enumiv\@empty

3153: \def\theenumiv{\arabic{enumiv}}%

3154: }%

3155: \let\newblock\relax %

3156: \sloppy\clubpenalty4000\widowpenalty4000

3157: \sfcode`\.=1000\relax

3158: \ifpreprintsty\else\small\fi

3159: }

3160: 

3161: \def\endreferences{%

3162: \def\@noitemerr{\@warning{Empty `thebibliography' environment}}%

3163: \endlist     \let\@SetMaxRefLabel\@gobble

3164: }

3165: 

3166: \def\thebibliography#1{\references}

3167: 

3168: \def\endthebibliography{\endreferences}

3169: 

3170: \def\@collapse#1{%

3171: {%

3172: \let\@temp\relax

3173: \@tempcntb\@MM

3174: \def\@citea{}%

3175: \@for \@citeb:=#1\do{%

3176: \@ifundefined{b@\@citeb}%

3177: {\@temp\@citea{\bf ?}%

3178: \@tempcntb\@MM\let\@temp\relax

3179: \@warning{Citation `\@citeb ' on page \thepage\space undefined}%

3180: }%

3181: {\@tempcnta\@tempcntb \advance\@tempcnta\@ne

3182: \edef\MyTemp{\csname b@\@citeb\endcsname}%

3183: \def\@tempa{\@temptokena=\bgroup}%

3184: \if0A{\fi%

3185: \afterassignment\@tempa %

3186: \@tempcntb=0\MyTemp\relax}%

3187: \ifnum\@tempcntb=0\relax%

3188: \@tempcntb=\@MM

3189: \@citea\MyTemp

3190: \let\@temp = \relax

3191: \else %

3192: \edef\@tempd{\number\@tempcntb}%

3193: \ifnum\@tempcnta=\@tempcntb %

3194: \ifx\@temp\relax %

3195: \edef\@temp{\@citea\@tempd}%

3196: \else

3197: \edef\@temp{\hbox{--}\@tempd}%

3198: \fi

3199: \else %

3200: \@temp\@citea\@tempd

3201: \let\@temp\relax

3202: \fi

3203: \fi

3204: }%

3205: \def\@citea{,}%

3206: }%

3207: \@temp %

3208: }%

3209: }%

3210: %

3211: % ****** End of file prabib.sty ******

3212: 

3213: 

3214: 

3215: %%%%%%%%%%%%%%%%%%% End /document/RevTeX/prabib.sty %%%%%%%%%%%%%%%%%%%

3216: 

3217: %%%%%%%%%%%%%%%%%% Start /document/RevTeX/osabib.sty %%%%%%%%%%%%%%%%%%

3218: 

3219: % ******* Start of file osabib.sty *******

3220: %

3221: % Copyright (c) 1992, Optical Society of America.

3222: %

3223: %   This is one of the files of the release version of the OSA macros for

3224: % REVTEX 3.0. REVTEX 3.0 is being developed by cooperation between the AAS,

3225: % AGU, AIP, APS, and OSA.

3226: %

3227: %

3228: % Support is available weekdays, 8:45 am--4:30 pm, East coast(USA) time.

3229: %

3230: %     Frank Harris

3231: %     Optical Society of America

3232: %     2010 Massachusetts Ave. N.W.

3233: %     Washington D.C. 20036-1023

3234: %     (202) 416-1903 (phone)

3235: %     (202) 416-6120 (fax)

3236: %     fharris@aip.org (Internet)

3237: %

3238: %

3239: %

3240: 

3241: \typeout{Filename: osabib.sty, v1.0 <November 20, 1992>}

3242: 

3243: \def\@bibitem#1{\item\if@filesw \immediate\write\@auxout

3244:        {\string\bibcite{#1}{\the\value{\@listctr}}}\fi\ignorespaces}

3245: 

3246: \def\@cite#1#2{{#1\if@tempswa , #2\fi}}  %

3247: \def\@biblabel#1{${#1.\,\,\,}$} %

3248: 

3249: \newdimen\WidestRefLabelThusFar

3250: \global\WidestRefLabelThusFar\z@

3251: 

3252: \def\bibcite#1#2{\global\@namedef{b@#1}{#2}\@SetMaxRefLabel{#1}}

3253: 

3254: \def\@SetMaxRefLabel#1{%

3255:   {%

3256:     \setbox0\hbox{${\csname b@#1\endcsname}.\,\,\,$}%

3257:     \ifdim\wd0>\WidestRefLabelThusFar

3258:       \global\WidestRefLabelThusFar=\wd0

3259:     \fi

3260:   }%

3261: }

3262: 

3263: \def\@citex[#1]#2{%

3264: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

3265: \leavevmode\unskip$^{\scriptstyle\@cite{\@collapse{#2}}{#1}}$}

3266: 

3267: \def\CITE{%

3268: \@ifnextchar[{\@tempswatrue\@CITEX}{\@tempswafalse\@CITEX[]}%

3269: }

3270: 

3271: \let\onlinecite\CITE

3272: 

3273: \def\@CITEX[#1]#2{%

3274: \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi

3275: \leavevmode\unskip\ \@cite{\@collapse{#2}}{#1}}

3276: 

3277: \let\bylinecite\cite

3278: 

3279: \def\@collapse#1{%

3280:  {%

3281:   \let\@temp\relax

3282:   \@tempcntb\@MM

3283:   \def\@citea{}%

3284:   \@for \@citeb:=#1\do{%

3285:     \@ifundefined{b@\@citeb}%

3286:       {\@temp\@citea{\bf ?}%

3287:        \@tempcntb\@MM\let\@temp\relax

3288:        \@warning{Citation `\@citeb ' on page \thepage\space undefined}%

3289:       }%

3290:       {\@tempcnta\@tempcntb \advance\@tempcnta\@ne

3291:        \edef\MyTemp{\csname b@\@citeb\endcsname}%

3292:        \def\@tempa{\@temptokena=\bgroup}%

3293:        \if0A{\fi%

3294:        \afterassignment\@tempa %

3295:        \@tempcntb=0\MyTemp\relax}%

3296:        \ifnum\@tempcntb=0\relax%

3297:          \@tempcntb=\@MM

3298:          \@citea\MyTemp

3299:          \let\@temp = \relax

3300:        \else %

3301:          \edef\@tempd{\number\@tempcntb}%

3302:          \ifnum\@tempcnta=\@tempcntb %

3303:             \ifx\@temp\relax %

3304:                \edef\@temp{\@citea\@tempd}%

3305:             \else

3306:                \edef\@temp{\hbox{--}\@tempd}%

3307:             \fi

3308:          \else %

3309:            \@temp\@citea\@tempd

3310:            \let\@temp\relax

3311:          \fi

3312:        \fi

3313:       }%

3314:     \def\@citea{, }%

3315:   }%

3316:   \@temp %

3317:  }%

3318: }%

3319: 

3320: \def\references{%

3321:   \ifpreprintsty

3322:     \newpage

3323:     \hbox to\hsize{\refname\hss}%

3324:   \else

3325:     \vskip24pt

3326:     \hrule width\textwidth\relax

3327:     \vskip 1.6cm

3328:   \fi

3329:   \list{\@biblabel{\arabic{enumiv}}}%

3330:        {\labelwidth\WidestRefLabelThusFar  \labelsep2pt %

3331:         \leftmargin\labelwidth

3332:         \advance\leftmargin\labelsep

3333:         \ifdim\baselinestretch pt>1 pt  %

3334:           \parsep  4pt\relax

3335:         \else

3336:           \parsep  0pt\relax

3337:         \fi

3338:         \itemsep\parsep

3339:         \usecounter{enumiv}%

3340:         \let\p@enumiv\@empty

3341:         \def\theenumiv{\arabic{enumiv}}%

3342:        }%

3343:   \let\newblock\relax

3344:   \sloppy\clubpenalty4000\widowpenalty4000

3345:   \sfcode`\.=1000\relax

3346:   \ifpreprintsty\else\small\fi

3347: }

3348: 

3349: \def\endreferences{%

3350:   \def\@noitemerr{\@warning{Empty `thebibliography' environment}}%

3351:   \endlist     \let\@SetMaxRefLabel\@gobble

3352: }

3353: 

3354: \def\thebibliography#1{\references}

3355: 

3356: \def\endthebibliography{\endreferences}

3357: 

3358: %

3359: % ****** End of file osabib.sty ******

3360: 

3361: 

3362: %%%%%%%%%%%%%%%%%%% End /document/RevTeX/osabib.sty %%%%%%%%%%%%%%%%%%%

3363: