%% file: mtexsis.tex - core TeXsis macros - TeXsis version 2.18
%  @(#) mtexsis.pre: $Id: mtexsis.pre,v 18.2 2001/02/13 03:20:41 myers Exp $
%======================================================================*
%  mTeXsis - mini version of the TeX Macros for Physicists
%
%  This is mtexsis.tex, a "mini" version of the TeXsis macro package
%  containing only the core TeXsis macros.  You can get the full
%  version of TeXsis, with complete documentation, from ftp://ftp.texsis.org/
%
%  If you receive a manuscript file prepared with TeXsis you can
%  (usually) print it by inserting the line
%
%       \input mtexsis
%
%  at the begining of the manuscript file (before \texsis, if it
%  is there) and then running it through Plain TeX.
%
%  Authors who prepare papers with TeXsis for submission to the Los
%  Alamos e-print archives should try their  manuscripts with Plain
%  TeX and mtexsis.tex to be sure that it works.  You can also make your
%  file automatically work with either TeXsis or Plain and mtexsis by
%  putting the following at the begining of your manuscript file (in
%  place of just \texsis): 
%
%	\ifx\texsis\undefined\input mtexsis\else\texsis\fi
%
%  If you want to know how a macro works you will have to look in the
%  full TeXsis source files.  There are copious comments.
%
%  Comments, suggestions, or bug reports should be directed to 
%  texsis@umich.edu.
%
% (C) copyright 1988,1992,1994,1997,1999 by Eric Myers and Frank E. Paige.
% This file is a part of TeXsis.  Distribution and/or modifications
% are allowed under the terms of the LaTeX Project Public License (LPPL).
% See the file COPYING or ftp://ftp.texsis.org/texsis/LPPL
%======================================================================*
\def\TeXsis{\TeX sis}%                          % the TeXsis logo
\catcode`@=11                                   % @ is a letter in what follows

% file: TXSfonts.tex - TeXsis Font Definitions - TeXsis version 2.18
% @(#) $Id: TXSfonts.tex,v 18.2 2001/04/06 21:40:14 myers Exp $
%%> {TeXsis fonts:}
\catcode`@=11
\newskip\ttglue
%++ 9 pt fonts:
\def\ninefonts{%
   \global\font\ninerm=cmr9
   \global\font\ninei=cmmi9
   \global\font\ninesy=cmsy9
   \global\font\nineex=cmex10
   \global\font\ninebf=cmbx9
   \global\font\ninesl=cmsl9
   \global\font\ninett=cmtt9
   \global\font\nineit=cmti9
   \skewchar\ninei='177
   \skewchar\ninesy='60
   \hyphenchar\ninett=-1
   \moreninefonts
   \gdef\ninefonts{\relax}}
\def\moreninefonts{\relax}%
%++ 10 pt fonts:                               
\font\tenss=cmss10
\def\moretenfonts{\relax}%
%++ 11 pt fonts:
\def\elevenfonts{%
   \global\font\elevenrm=cmr10 scaled \magstephalf
   \global\font\eleveni=cmmi10 scaled \magstephalf
   \global\font\elevensy=cmsy10 scaled \magstephalf
   \global\font\elevenex=cmex10
   \global\font\elevenbf=cmbx10 scaled \magstephalf
   \global\font\elevensl=cmsl10 scaled \magstephalf
   \global\font\eleventt=cmtt10 scaled \magstephalf
   \global\font\elevenit=cmti10 scaled \magstephalf
   \global\font\elevenss=cmss10 scaled \magstephalf
   \skewchar\eleveni='177%
   \skewchar\elevensy='60%
   \hyphenchar\eleventt=-1%
   \moreelevenfonts
   \gdef\elevenfonts{\relax}}%
\def\moreelevenfonts{\relax}%
%++ 12 pt fonts:
\def\twelvefonts{%
   \global\font\twelverm=cmr10 scaled \magstep1%
   \global\font\twelvei=cmmi10 scaled \magstep1%
   \global\font\twelvesy=cmsy10 scaled \magstep1%
   \global\font\twelveex=cmex10 scaled \magstep1%
   \global\font\twelvebf=cmbx10 scaled \magstep1%
   \global\font\twelvesl=cmsl10 scaled \magstep1%
   \global\font\twelvett=cmtt10 scaled \magstep1%
   \global\font\twelveit=cmti10 scaled \magstep1%
   \global\font\twelvess=cmss10 scaled \magstep1%
   \skewchar\twelvei='177%
   \skewchar\twelvesy='60%
   \hyphenchar\twelvett=-1%
   \moretwelvefonts
   \gdef\twelvefonts{\relax}}
\def\moretwelvefonts{\relax}%
%++ 14 pt fonts:
\def\fourteenfonts{%
   \global\font\fourteenrm=cmr10 scaled \magstep2%
   \global\font\fourteeni=cmmi10 scaled \magstep2%
   \global\font\fourteensy=cmsy10 scaled \magstep2%
   \global\font\fourteenex=cmex10 scaled \magstep2%
   \global\font\fourteenbf=cmbx10 scaled \magstep2%
   \global\font\fourteensl=cmsl10 scaled \magstep2%
   \global\font\fourteenit=cmti10 scaled \magstep2%
   \global\font\fourteenss=cmss10 scaled \magstep2%
   \skewchar\fourteeni='177%
   \skewchar\fourteensy='60%
   \morefourteenfonts
   \gdef\fourteenfonts{\relax}}
\def\morefourteenfonts{\relax}%
%++ 16 pt fonts:
\def\sixteenfonts{%
   \global\font\sixteenrm=cmr10 scaled \magstep3%
   \global\font\sixteeni=cmmi10 scaled \magstep3%
   \global\font\sixteensy=cmsy10 scaled \magstep3%
   \global\font\sixteenex=cmex10 scaled \magstep3%
   \global\font\sixteenbf=cmbx10 scaled \magstep3%
   \global\font\sixteensl=cmsl10 scaled \magstep3%
   \global\font\sixteenit=cmti10 scaled \magstep3%
   \skewchar\sixteeni='177%
   \skewchar\sixteensy='60%
   \moresixteenfonts
   \gdef\sixteenfonts{\relax}}
\def\moresixteenfonts{\relax}%
%++ 20 pt fonts:
\def\twentyfonts{%
   \global\font\twentyrm=cmr10 scaled \magstep4%
   \global\font\twentyi=cmmi10 scaled \magstep4%
   \global\font\twentysy=cmsy10 scaled \magstep4%
   \global\font\twentyex=cmex10 scaled \magstep4%
   \global\font\twentybf=cmbx10 scaled \magstep4%
   \global\font\twentysl=cmsl10 scaled \magstep4%
   \global\font\twentyit=cmti10 scaled \magstep4%
   \skewchar\twentyi='177%
   \skewchar\twentysy='60%
   \moretwentyfonts
   \gdef\twentyfonts{\relax}}
\def\moretwentyfonts{\relax}%
%++ 24 pt fonts:
\def\twentyfourfonts{%
   \global\font\twentyfourrm=cmr10 scaled \magstep5%
   \global\font\twentyfouri=cmmi10 scaled \magstep5%
   \global\font\twentyfoursy=cmsy10 scaled \magstep5%
   \global\font\twentyfourex=cmex10 scaled \magstep5%
   \global\font\twentyfourbf=cmbx10 scaled \magstep5%
   \global\font\twentyfoursl=cmsl10 scaled \magstep5%
   \global\font\twentyfourit=cmti10 scaled \magstep5%
   \skewchar\twentyfouri='177%
   \skewchar\twentyfoursy='60%
   \moretwentyfourfonts
   \gdef\twentyfourfonts{\relax}}
\def\moretwentyfourfonts{\relax}%
\def\tenmibfonts{%
   \global\font\tenmib=cmmib10
   \global\font\tenbsy=cmbsy10
   \skewchar\tenmib='177%
   \skewchar\tenbsy='60%
   \gdef\tenmibfonts{\relax}}
\def\elevenmibfonts{%
   \global\font\elevenmib=cmmib10 scaled \magstephalf
   \global\font\elevenbsy=cmbsy10 scaled \magstephalf
   \skewchar\elevenmib='177%
   \skewchar\elevenbsy='60%
   \gdef\elevenmibfonts{\relax}}
\def\twelvemibfonts{%
   \global\font\twelvemib=cmmib10 scaled \magstep1%
   \global\font\twelvebsy=cmbsy10 scaled \magstep1%
   \skewchar\twelvemib='177%
   \skewchar\twelvebsy='60%
   \gdef\twelvemibfonts{\relax}}
\def\fourteenmibfonts{%
   \global\font\fourteenmib=cmmib10 scaled \magstep2%
   \global\font\fourteenbsy=cmbsy10 scaled \magstep2%
   \skewchar\fourteenmib='177%
   \skewchar\fourteenbsy='60%
   \gdef\fourteenmibfonts{\relax}}
\def\sixteenmibfonts{%
   \global\font\sixteenmib=cmmib10 scaled \magstep3%
   \global\font\sixteenbsy=cmbsy10 scaled \magstep3%
   \skewchar\sixteenmib='177%
   \skewchar\sixteenbsy='60%
   \gdef\sixteenmibfonts{\relax}}
\def\twentymibfonts{%
   \global\font\twentymib=cmmib10 scaled \magstep4%
   \global\font\twentybsy=cmbsy10 scaled \magstep4%
   \skewchar\twentymib='177%
   \skewchar\twentybsy='60%
   \gdef\twentymibfonts{\relax}}
\def\twentyfourmibfonts{%
   \global\font\twentyfourmib=cmmib10 scaled \magstep5%
   \global\font\twentyfourbsy=cmbsy10 scaled \magstep5%
   \skewchar\twentyfourmib='177%
   \skewchar\twentyfourbsy='60%
   \gdef\twentyfourmibfonts{\relax}}
%%> {\string\mib,}
\def\mib{%
   \tenmibfonts
   \textfont0=\tenbf\scriptfont0=\sevenbf
   \scriptscriptfont0=\fivebf
   \textfont1=\tenmib\scriptfont1=\seveni
   \scriptscriptfont1=\fivei
   \textfont2=\tenbsy\scriptfont2=\sevensy
   \scriptscriptfont2=\fivesy}
%%> {\string\scr,}
\newfam\scrfam
\def\scr{\scrfonts\fam\scrfam\tenscr
   \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
   \global\scriptscriptfont\scrfam=\fivescr}
\def\scrfonts{%
   \global\font\twentyfourscr=rsfs10  scaled \magstep5
   \global\font\twentyscr=rsfs10  scaled \magstep4
   \global\font\sixteenscr=rsfs10  scaled \magstep3
   \global\font\fourteenscr=rsfs10  scaled \magstep2
   \global\font\twelvescr=rsfs10  scaled \magstep1
   \global\font\elevenscr=rsfs10  scaled \magstephalf
   \global\font\tenscr=rsfs10
   \global\font\ninescr=rsfs7 scaled \magstep1
   \global\font\sevenscr=rsfs7
   \global\font\fivescr=rsfs5
   \global\skewchar\tenscr='177 \global\skewchar\sevenscr='177%
        \global\skewchar\fivescr='177%
   \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
        \global\scriptscriptfont\scrfam=\fivescr
   \gdef\scrfonts{\relax}}%
%%> {9pt,}
\def\ninepoint{\ninefonts
   \def\rm{\fam0\ninerm}%
   \textfont0=\ninerm\scriptfont0=\sevenrm\scriptscriptfont0=\fiverm
   \textfont1=\ninei\scriptfont1=\seveni\scriptscriptfont1=\fivei
   \textfont2=\ninesy\scriptfont2=\sevensy\scriptscriptfont2=\fivesy
   \textfont3=\nineex\scriptfont3=\nineex\scriptscriptfont3=\nineex
   \textfont\itfam=\nineit\def\it{\fam\itfam\nineit}%
   \textfont\slfam=\ninesl\def\sl{\fam\slfam\ninesl}%
   \textfont\ttfam=\ninett\def\tt{\fam\ttfam\ninett}%
   \textfont\bffam=\ninebf
   \scriptfont\bffam=\sevenbf
   \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\ninebf}%
   \def\mib{\relax}%
   \def\scr{\relax}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=11pt
   \setbox\strutbox=\hbox{\vrule height 8pt depth 3pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {10pt,}
\def\tenpoint{%
   \def\rm{\fam0\tenrm}%
   \textfont0=\tenrm\scriptfont0=\sevenrm\scriptscriptfont0=\fiverm
   \textfont1=\teni\scriptfont1=\seveni\scriptscriptfont1=\fivei
   \textfont2=\tensy\scriptfont2=\sevensy\scriptscriptfont2=\fivesy
   \textfont3=\tenex\scriptfont3=\tenex\scriptscriptfont3=\tenex
   \textfont\itfam=\tenit\def\it{\fam\itfam\tenit}%
   \textfont\slfam=\tensl\def\sl{\fam\slfam\tensl}%
   \textfont\ttfam=\tentt\def\tt{\fam\ttfam\tentt}%
   \textfont\bffam=\tenbf
   \scriptfont\bffam=\sevenbf
   \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\tenbf}%
   \def\mib{%
      \tenmibfonts
      \textfont0=\tenbf\scriptfont0=\sevenbf
      \scriptscriptfont0=\fivebf
      \textfont1=\tenmib\scriptfont1=\seveni
      \scriptscriptfont1=\fivei
      \textfont2=\tenbsy\scriptfont2=\sevensy
      \scriptscriptfont2=\fivesy}%
   \def\scr{\scrfonts\fam\scrfam\tenscr
      \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
      \global\scriptscriptfont\scrfam=\fivescr}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=12pt
   \setbox\strutbox=\hbox{\vrule height 8.5pt depth 3.5pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {11pt,}
\def\elevenpoint{\elevenfonts
   \def\rm{\fam0\elevenrm}%
   \textfont0=\elevenrm\scriptfont0=\sevenrm\scriptscriptfont0=\fiverm
   \textfont1=\eleveni\scriptfont1=\seveni\scriptscriptfont1=\fivei
   \textfont2=\elevensy\scriptfont2=\sevensy\scriptscriptfont2=\fivesy
   \textfont3=\elevenex\scriptfont3=\elevenex\scriptscriptfont3=\elevenex
   \textfont\itfam=\elevenit\def\it{\fam\itfam\elevenit}%
   \textfont\slfam=\elevensl\def\sl{\fam\slfam\elevensl}%
   \textfont\ttfam=\eleventt\def\tt{\fam\ttfam\eleventt}%
   \textfont\bffam=\elevenbf
   \scriptfont\bffam=\sevenbf
   \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\elevenbf}%
   \def\mib{%
      \elevenmibfonts
      \textfont0=\elevenbf\scriptfont0=\sevenbf
      \scriptscriptfont0=\fivebf
      \textfont1=\elevenmib\scriptfont1=\seveni
      \scriptscriptfont1=\fivei
      \textfont2=\elevenbsy\scriptfont2=\sevensy
      \scriptscriptfont2=\fivesy}%
   \def\scr{\scrfonts\fam\scrfam\elevenscr
      \global\textfont\scrfam=\elevenscr\global\scriptfont\scrfam=\sevenscr
      \global\scriptscriptfont\scrfam=\fivescr}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=13pt
   \setbox\strutbox=\hbox{\vrule height 9pt depth 4pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {12pt,}
\def\twelvepoint{\twelvefonts\ninefonts
   \def\rm{\fam0\twelverm}%
   \textfont0=\twelverm\scriptfont0=\ninerm\scriptscriptfont0=\sevenrm
   \textfont1=\twelvei\scriptfont1=\ninei\scriptscriptfont1=\seveni
   \textfont2=\twelvesy\scriptfont2=\ninesy\scriptscriptfont2=\sevensy
   \textfont3=\twelveex\scriptfont3=\twelveex\scriptscriptfont3=\twelveex
   \textfont\itfam=\twelveit\def\it{\fam\itfam\twelveit}%
   \textfont\slfam=\twelvesl\def\sl{\fam\slfam\twelvesl}%
   \textfont\ttfam=\twelvett\def\tt{\fam\ttfam\twelvett}%
   \textfont\bffam=\twelvebf
   \scriptfont\bffam=\ninebf
   \scriptscriptfont\bffam=\sevenbf\def\bf{\fam\bffam\twelvebf}%
   \def\mib{%
      \twelvemibfonts\tenmibfonts
      \textfont0=\twelvebf\scriptfont0=\ninebf
      \scriptscriptfont0=\sevenbf
      \textfont1=\twelvemib\scriptfont1=\ninei
      \scriptscriptfont1=\seveni
      \textfont2=\twelvebsy\scriptfont2=\ninesy
      \scriptscriptfont2=\sevensy}%
   \def\scr{\scrfonts\fam\scrfam\twelvescr
      \global\textfont\scrfam=\twelvescr\global\scriptfont\scrfam=\ninescr
      \global\scriptscriptfont\scrfam=\sevenscr}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=14pt
   \setbox\strutbox=\hbox{\vrule height 10pt depth 4pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {14pt,}
\def\fourteenpoint{\fourteenfonts\twelvefonts
   \def\rm{\fam0\fourteenrm}%
   \textfont0=\fourteenrm\scriptfont0=\twelverm\scriptscriptfont0=\tenrm
   \textfont1=\fourteeni\scriptfont1=\twelvei\scriptscriptfont1=\teni
   \textfont2=\fourteensy\scriptfont2=\twelvesy\scriptscriptfont2=\tensy
   \textfont3=\fourteenex\scriptfont3=\fourteenex
      \scriptscriptfont3=\fourteenex
   \textfont\itfam=\fourteenit\def\it{\fam\itfam\fourteenit}%
   \textfont\slfam=\fourteensl\def\sl{\fam\slfam\fourteensl}%
   \textfont\bffam=\fourteenbf
   \scriptfont\bffam=\twelvebf
   \scriptscriptfont\bffam=\tenbf\def\bf{\fam\bffam\fourteenbf}%
   \def\mib{%
      \fourteenmibfonts\twelvemibfonts\tenmibfonts
      \textfont0=\fourteenbf\scriptfont0=\twelvebf
        \scriptscriptfont0=\tenbf
      \textfont1=\fourteenmib\scriptfont1=\twelvemib
        \scriptscriptfont1=\tenmib
      \textfont2=\fourteenbsy\scriptfont2=\twelvebsy
        \scriptscriptfont2=\tenbsy}%
   \def\scr{\scrfonts\fam\scrfam\fourteenscr
      \global\textfont\scrfam=\fourteenscr\global\scriptfont\scrfam=\twelvescr
      \global\scriptscriptfont\scrfam=\tenscr}%
   \normalbaselineskip=17pt
   \setbox\strutbox=\hbox{\vrule height 12pt depth 5pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {16pt,}
\def\sixteenpoint{\sixteenfonts\fourteenfonts\twelvefonts
   \def\rm{\fam0\sixteenrm}%
   \textfont0=\sixteenrm\scriptfont0=\fourteenrm\scriptscriptfont0=\twelverm
   \textfont1=\sixteeni\scriptfont1=\fourteeni\scriptscriptfont1=\twelvei
   \textfont2=\sixteensy\scriptfont2=\fourteensy\scriptscriptfont2=\twelvesy
   \textfont3=\sixteenex\scriptfont3=\sixteenex\scriptscriptfont3=\sixteenex
   \textfont\itfam=\sixteenit\def\it{\fam\itfam\sixteenit}%
   \textfont\slfam=\sixteensl\def\sl{\fam\slfam\sixteensl}%
   \textfont\bffam=\sixteenbf
   \scriptfont\bffam=\fourteenbf
   \scriptscriptfont\bffam=\twelvebf\def\bf{\fam\bffam\sixteenbf}%
   \def\mib{%
      \sixteenmibfonts\fourteenmibfonts\twelvemibfonts
      \textfont0=\sixteenbf\scriptfont0=\fourteenbf
        \scriptscriptfont0=\twelvebf
      \textfont1=\sixteenmib\scriptfont1=\fourteenmib
        \scriptscriptfont1=\twelvemib
      \textfont2=\sixteenbsy\scriptfont2=\fourteenbsy
         \scriptscriptfont2=\twelvebsy}%
   \def\scr{\scrfonts\fam\scrfam\sixteenscr
      \global\textfont\scrfam=\sixteenscr\global\scriptfont\scrfam=\fourteenscr
      \global\scriptscriptfont\scrfam=\twelvescr}%
   \normalbaselineskip=20pt
   \setbox\strutbox=\hbox{\vrule height 14pt depth 6pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {20pt,}
\def\twentypoint{\twentyfonts\sixteenfonts\fourteenfonts
   \def\rm{\fam0\twentyrm}%
   \textfont0=\twentyrm\scriptfont0=\sixteenrm\scriptscriptfont0=\fourteenrm
   \textfont1=\twentyi\scriptfont1=\sixteeni\scriptscriptfont1=\fourteeni
   \textfont2=\twentysy\scriptfont2=\sixteensy\scriptscriptfont2=\fourteensy
   \textfont3=\twentyex\scriptfont3=\twentyex\scriptscriptfont3=\twentyex
   \textfont\itfam=\twentyit\def\it{\fam\itfam\twentyit}%
   \textfont\slfam=\twentysl\def\sl{\fam\slfam\twentysl}%
   \textfont\bffam=\twentybf
   \scriptfont\bffam=\sixteenbf
   \scriptscriptfont\bffam=\fourteenbf\def\bf{\fam\bffam\twentybf}%
   \def\mib{%
      \twentymibfonts\sixteenmibfonts\fourteenmibfonts
      \textfont0=\twentybf\scriptfont0=\sixteenbf
      \scriptscriptfont0=\fourteenbf
      \textfont1=\twentymib\scriptfont1=\sixteenmib
      \scriptscriptfont1=\fourteenmib
      \textfont2=\twentybsy\scriptfont2=\sixteenbsy
      \scriptscriptfont2=\fourteenbsy}%
   \def\scr{\scrfonts
      \global\textfont\scrfam=\twentyscr\fam\scrfam\twentyscr}%
   \normalbaselineskip=24pt
   \setbox\strutbox=\hbox{\vrule height 17pt depth 7pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
%%> {24pt.}
\def\twentyfourpoint{\twentyfourfonts\twentyfonts\sixteenfonts
   \def\rm{\fam0\twentyfourrm}%
   \textfont0=\twentyfourrm\scriptfont0=\twentyrm\scriptscriptfont0=\sixteenrm
   \textfont1=\twentyfouri\scriptfont1=\twentyi\scriptscriptfont1=\sixteeni
   \textfont2=\twentyfoursy\scriptfont2=\twentysy\scriptscriptfont2=\sixteensy
   \textfont3=\twentyfourex\scriptfont3=\twentyfourex
      \scriptscriptfont3=\twentyfourex
   \textfont\itfam=\twentyfourit\def\it{\fam\itfam\twentyfourit}%
   \textfont\slfam=\twentyfoursl\def\sl{\fam\slfam\twentyfoursl}%
   \textfont\bffam=\twentyfourbf
   \scriptfont\bffam=\twentybf
   \scriptscriptfont\bffam=\sixteenbf\def\bf{\fam\bffam\twentyfourbf}%
   \def\mib{%
      \twentyfourmibfonts\twentymibfonts\sixteenmibfonts
      \textfont0=\twentyfourbf\scriptfont0=\twentybf
      \scriptscriptfont0=\sixteenbf
      \textfont1=\twentyfourmib\scriptfont1=\twentymib
      \scriptscriptfont1=\sixteenmib
      \textfont2=\twentyfourbsy\scriptfont2=\twentybsy
      \scriptscriptfont2=\sixteenbsy}%
   \def\scr{\scrfonts
      \global\textfont\scrfam=\twentyfourscr\fam\scrfam\twentyfourscr}%
   \normalbaselineskip=28pt
   \setbox\strutbox=\hbox{\vrule height 19pt depth 9pt width 0pt}%
   \normalbaselines\rm\singlespaced}%
\def\Tbf{\fourteenpoint\bf}
\def\tbf{\twelvepoint\bf}
\def\printfont{\autoload\printfont{printfont.txs}\printfont}

% file: TXSmacs.tex - Main Macros - TeXsis version 2.18
% @(#) $Id: TXSmacs.tex,v 18.0 1999/07/07 21:30:29 myers Exp $
%%> {TeXsis main macros.}
\catcode`@=11
\let\XA=\expandafter
\let\NX=\noexpand
\def\dospecials{\do\ \do\\\do\{\do\}\do\$\do\&\do\"\do\(\do\)\do\[\do\]%
  \do\#\do\^\do\^^K\do\_\do\^^A\do\%\do\~}
\def\emsg#1{\relax
   \begingroup
     \def\@quote{"}%
     \def\TeX{TeX}\def\label##1{}\def\use{\string\use}%
     \def\ { }\def~{ }%
     \def\tt{}\def\bf{}\def\Tbf{}\def\tbf{}%
     \def\break{}\def\n{}\def\singlespaced{}\def\doublespaced{}%
     \immediate\write16{#1}%
   \endgroup}
\def\cmsg#1{\emsg{\@comment #1}}
{\catcode`\%=11 \gdef\@comment{% }}
\newif\ifmarkerrors     \markerrorsfalse
\def\@errmark#1{\ifmarkerrors
   \vadjust{\vbox to 0pt{%
   \kern-\baselineskip
   \line{\hfil\rlap{{\tt\ <-#1}}}%
   \vss}}\fi}%
\def\draft{%
   \def\draftline{{\tentt\DraftName\hfill
       -~\folio~- \hfill \runtime}}\footline={\draftline}%
   \eqnotracetrue
   \markerrorstrue
   \overfullrule=1em}%
\def\DraftName{Preliminary Draft}%
\def\setTableskip{\relax}%
\def\singlespaced{%
   \baselineskip=\normalbaselineskip
   \setRuledStrut
   \setTableskip}%
\def\singlespace{\singlespaced}%
\def\doublespaced{%
   \baselineskip=\normalbaselineskip
   \multiply\baselineskip by 150
   \divide\baselineskip by 100
   \setRuledStrut
   \setTableskip}%
\def\doublespace{\doublespaced}%
\def\TrueDoubleSpacing{%
   \baselineskip=\normalbaselineskip
   \multiply\baselineskip by 2
   \setRuledStrut
   \setTableskip}%
\def\truedoublespacing{\TrueDoubleSpacing}%
\def\triplespaced{%
   \baselineskip=\normalbaselineskip
   \multiply\baselineskip by 3
   \setRuledStrut
   \setTableskip}%
\def\widenspacing{%
   \multiply\baselineskip by 125
   \divide\baselineskip by 100
   \setRuledStrut
   \setTableskip}%
\def\whitespaced{\widenspacing}%
\def\whitespace{\widenspacing}%
\def\Footnote#1{%
   \let\@sf\empty
   \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
   ${}^{\scriptstyle\smash{#1}}$\@sf
   \Vfootnote{#1}}%
\def\Vfootnote#1{%
   \begingroup
     \def\@foot{\strut\egroup\endgroup}%
     \tenpoint
     \baselineskip=\normalbaselineskip
     \parskip=0pt
     \FootFont
     \vfootnote{${}^{\hbox{#1}}$}}%
\def\FootFont{\rm}%
\newcount\footnum \footnum=0
\let\footnotemark=\empty
\def\NFootnote{%
  \advance\footnum by 1
  \xdef\lab@l{\the\footnum}%
  \Footnote{\footnotemark\the\footnum}}
\def~{\ifmmode\phantom{0}\else\penalty10000\ \fi}%
\def\0{\phantom{0}}%
\def\,{\relax\ifmmode\mskip\the\thinmuskip\else\thinspace\fi}
\def\topspace{\hrule width \z@ height \z@ \vskip}
\def\n{\hfil\break}%
\def\nl{\hfil\break}%
\def\newpage{\vfill\eject}%
\def\Afour{\hsize=16.5cm \vsize=24.5cm\relax}%
\def\bye{%
    \endmode
    \par\vfill\supereject
    \checktags
    \end}
\def\endmode{\relax}%
\def\unobeylines{\catcode`\^^M=5}%
{\obeyspaces\gdef\unobeyspaces{\catcode`\ =10}}
\def\unraggedright{\rightskip=\z@\spaceskip=0pt\xspaceskip=0pt}
{\catcode`\^^M=\active\gdef\seeCR{\catcode`\^^M\active \let^^M\space}}
\catcode`\"=\active
\newcount\@quoteflag   \@quoteflag=\z@
\def"{\@quote}%
\def\@quote{%
   \ifnum\@quoteflag=\z@
     \@quoteflag=\@ne {``}%
   \else
     \@quoteflag=\z@ {''}%
   \fi}
\def\quoteon{\catcode`\"=\active\def"{\@quote}}%
\def\quoteoff{\catcode`\"=12}%
\def\@checkquote#1{\ifnum\@quoteflag=\@ne\message{#1}\fi}
\quoteoff
\def\checkquote{{\quoteoff\@checkquote{> Unbalanced "}}}%
\def\tightbox#1{\vbox{\hrule\hbox{\vrule\vbox{#1}\vrule}\hrule}}
\let\tightboxit=\tightbox
\def\loosebox#1{%
    \vbox{\vskip\jot
        \hbox{\hskip\jot #1\hskip\jot}%
        \vskip\jot}}
\def\eqnbox#1{\lower\jot\tightbox{\loosebox{\quad $#1$ \quad}}}
\def\undertext#1{\setbox0=\hbox{#1}\dimen0=\dp0
      \vtop{\box0 \vskip-\dimen0 \vskip 0.25ex \hrule}}
\def\theBlank#1{\nobreak\hbox{\lower\jot\vbox{\hrule width #1\relax}}}
\ifx\setRuledStrut\undefined\def\setRuledStrut{\relax}\fi
\def\Romannumeral#1{\uppercase\expandafter{\romannumeral #1}}
\def\monthname#1{\ifcase#1 \errmessage{0 is not a month}
    \or January\or February\or March\or April\or May\or June\or 
    July\or August\or September\or October\or November\or
    December\else \errmessage{#1 is not a month}\fi}
\def\jtem#1#2{\par\hangafter0\hangindent#1
              \noindent\llap{#2\enspace}\ignorespaces}
\def\leftpar#1{%
    \setbox\@capbox=\vbox{\normalbaselines
    \noindent #1\par
        \global\@caplines=\prevgraf}%
    \ifnum \@ne=\@caplines
        \leftline{#1}\else
        \hbox to\hsize{\hss\box\@capbox\hss}\fi}
\def\obsolete#1#2{\def#1{\@obsolete#1#2}}
\def\@obsolete#1#2{%
   \emsg{>=========================================================}%
   \emsg{> \string#1 is now obsolete! It may soon disappear!}%
   \emsg{> Please use \string#2 instead.  But I'll try to do it anyway...}%
   \emsg{>=========================================================}%
   \let#1=#2\relax
   #2}%
\def\ATlock{\catcode`@=12\relax}%
\def\ATunlock{\catcode`@=11\relax}%
\newhelp\AThelp{@: 
You've apparantly tried to use a macro which begins with ``@''.^^M
These macros are usually for internal TeXsis functions and should^^M
not be used casually.  If you really want to use the macro try first^^M
saying \string\ATunlock.  If you got this message by pure accident^^M
then something else is wrong.} 
\def\@{\begingroup
    \errhelp=\AThelp
    \newlinechar=`\^^M
    \errmessage{Are you tring to use an internal @-macro?}\relax
   \endgroup}
\long\def\comment#1/*#2*/{\relax}%
\long\def\Ignore#1\endIgnore{\relax}%
\def\endIgnore{\relax}%
\def\REV{\begingroup
   \def\endcomment{\endgroup}%
   \catcode`\|=12
   \catcode`(=12 \catcode`)=12
   \catcode`[=12 \catcode`]=12
   \comment}%
\def\begin#1{%
   \begingroup
     \let\end=\endbegin
     \expandafter\ifx\csname #1\endcsname\relax\relax
        \def\next{\beginerror{#1}}%
     \else
        \def\next{\csname #1\endcsname}%
     \fi\next}
\def\endbegin#1{%
   \endgroup
   \expandafter\ifx\csname end#1\endcsname\relax\relax
      \def\next{\begingroup\beginerror{end#1}}%
   \else
      \def\next{\csname end#1\endcsname}%
   \fi\next}
\newhelp\beginhelp{begin: 
    The \string\begin\space or \string\end\space marked above is for a
    non-existant^^M
    environment.  Check for spelling errors and such.}
\def\beginerror#1{%
   \endgroup
   \errhelp=\beginhelp
   \newlinechar=`\^^M
   \errmessage{Undefined environment for \string\begin\space or \string\end}}
\begingroup\seeCR%
\long\gdef\unexpandedwrite#1#2{\@CopyLine#1#2
\endlist}%
\long\gdef\@CopyLine#1#2
#3\endlist{\@unexpandedwrite#1{#2}%
\def\@arg{#3}\ifx\@arg\par\let\@arg=\empty\fi% ignore trailing ^^M
\ifx\@arg\empty\relax\let\@@next=\relax%
\else\def\@@next{\@CopyLine#1#3\endlist}%
\fi\@@next}%
\long\gdef\writeNX#1#2{\@CopyLineNX#1#2
\endlist}%
\long\gdef\@CopyLineNX#1#2
#3\endlist{\@writeNX#1{#2}%
\def\@arg{#3}\ifx\@arg\par\let\@arg=\empty\fi% ignore trailing ^^M
\ifx\@arg\empty\relax\let\@@next=\relax%
\else\def\@@next{\@CopyLineNX#1#3\endlist}%
\fi\@@next}%
\endgroup
\long\def\@unexpandedwrite#1#2{%
   \def\@finwrite{\immediate\write#1}%
   \begingroup
    \aftergroup\@finwrite
    \aftergroup{\relax
    \@NXstack#2\endNXstack
    \aftergroup}\relax
   \endgroup
 }
\long\def\@writeNX#1#2{%
   \def\@finwrite{\write#1}%
   \begingroup
    \aftergroup\@finwrite
    \aftergroup{\relax
    \@NXstack#2\endNXstack
    \aftergroup}\relax
   \endgroup}%
\def\@NXstack{\futurelet\next\@NXswitch} 
\def\\{\global\let\@stoken= }\\ 
\def\@NXswitch{%
    \ifx\next\endNXstack\relax
    \else\ifcat\noexpand\next\@stoken
        \aftergroup\space\let\next=\@eat
    \else\ifcat\noexpand\next\bgroup
        \aftergroup{\let\next=\@eat
    \else\ifcat\noexpand\next\egroup
        \aftergroup}\let\next=\@eat
     \else
        \let\next=\@copytoken
     \fi\fi\fi\fi 
     \next}%
\def\@eat{\afterassignment\@NXstack\let\next= } 
\long\def\@copytoken#1{%
    \ifcat\noexpand#1\relax
        \aftergroup\noexpand
    \else\ifcat\noexpand#1\noexpand~\relax
        \aftergroup\noexpand
    \fi\fi
    \aftergroup#1\relax
    \@NXstack}%
\def\endNXstack\endNXstack{}%

%%> {Checkpoint/Restart.}
\newwrite\checkpointout
\def\checkpoint#1{\emsg{\@comment\NX\checkpoint --> #1.chk}%
    \immediate\openout\checkpointout= #1.chk
    \@checkwrite{\pageno}   \@checkwrite{\chapternum}%
    \@checkwrite{\eqnum}    \@checkwrite{\corollarynum}%
    \@checkwrite{\fignum}   \@checkwrite{\definitionnum}%
    \@checkwrite{\lemmanum} \@checkwrite{\sectionnum}%
    \@checkwrite{\refnum}   \@checkwrite{\subsectionnum}%
    \@checkwrite{\tabnum}   \@checkwrite{\theoremnum}%
    \@checkwrite{\footnum}%
    \immediate\closeout\checkpointout}%
\def\@checkwrite#1{\edef\tnum{\the #1}%
     \immediate\write\checkpointout{\NX #1 = \tnum}}%
\def\restart#1{\relax
    \immediate\closeout\checkpointout
    \ATunlock
    \Input #1.chk \relax
    \@firstrefnum=\refnum
    \advance\@firstrefnum by \@ne
    \ATlock}%
\let\restore=\restart
\def\endstat{%
   \emsg{\@comment Last PAGE      number is \the\pageno.}%
   \emsg{\@comment Last CHAPTER   number is \the\chapternum.}%
   \emsg{\@comment Last EQUATION  number is \the\eqnum.}%
   \emsg{\@comment Last FIGURE    number is \the\fignum.}%
   \emsg{\@comment Last REFERENCE number is \the\refnum.}%
   \emsg{\@comment Last SECTION   number is \the\sectionnum.}%
   \emsg{\@comment Last TABLE     number is \the\tabnum.}%
   \tracingstats=1}%
\def\gloop#1\repeat{\gdef\body{#1}\iterate}%
\newif\iflastarg\lastargfalse
\def\car#1,#2;{\gdef\@arg{#1}\gdef\@args{#2}}
\def\@apply{%
    \iflastarg
    \else
        \XA\car\@args;
        \islastarg
        \XA\@fcn\XA{\@arg}%
        \@apply
    \fi}
\def\apply#1#2{%
    \gdef\@args{#2,}\let\@fcn#1
    \islastarg
    \@apply
    }
\def\islastarg{\ifx \@args\empty\lastargtrue\else\lastargfalse\fi}%
\def\setcnt#1#2{%
  \edef\th@value{\the#1}%
  \aftergroup\global\aftergroup#1
  \aftergroup=\relax
  \XA\@ftergroup\th@value\endafter
  \global#1=#2\relax}%
\def\@ftergroup{\futurelet\next\@ftertoken} 
\long\def\@ftertoken#1{
   \ifx\next\endafter\relax
     \let\next=\relax
   \else\aftergroup#1\relax
     \let\next=\@ftergroup
   \fi\next}%
\let\DUMP=\dump
\def\@seppuku{\errmessage{Interwoven alignment preambles are not allowed.}\end}

% file: TXSinit.tex - Initialization - TeXsis version 2.18
% @(#) $Id: TXSinit.tex,v 18.2 2000/05/16 22:44:04 myers Exp $
%%> {Initialization.}
\catcode`@=11
\long\def\texsis{%
    \quoteon
    \Contentsfalse
    \autoparens
    \ATlock
    \resetcounters
    \pageno=1
    \colwidth=\hsize
    \headline={\HeadLine}\headlineoffset=0.5cm
    \footline={\FootLine}\footlineoffset=0.5cm
    \twelvepoint
    \doublespaced
    \newlinechar=`\^^M
    \uchyph=\@ne
    \brokenpenalty=\@M
    \widowpenalty=\@M
    \clubpenalty=\@M
    \dimen\footins=0.5\vsize
}
\obsolete\inittexsis\texsis     \obsolete\texsisinit\texsis    
\obsolete\initexsis\texsis      \obsolete\initTeXsis\texsis    
\def\LaTeXwarning{\emsg{> }%
   \emsg{> Whoops! This seems to be a LaTeX file.}%
   \emsg{> Try saying `latex \jobname` instead.}%
   \emsg{> }\end}
\def\documentstyle{\LaTeXwarning}
\def\@writefile{\LaTeXwarning}
\def\today{\number\day\ \ifcase\month\or 
    January\or February\or March\or April\or May\or June\or
    July\or August\or September\or October\or November\or December\fi
    \ \number\year}
\let\@today=\today
\def\dated#1{\xdef\today{#1}}
\def\SetDate{%
  \xdef\adate{\monthname{\the\month}~\number\day, \number\year}%
  \xdef\edate{\number\day~\monthname{\the\month}~\number\year}%
  \count255=\time\divide\count255 by 60
  \edef\hour{\the\count255}%
  \multiply\count255 by -60 \advance\count255 by\time
  \edef\minutes{\ifnum 10>\count255 {0}\fi\the\count255}%
  \edef\runtime{\the\year/\the\month/\the\day\space\hour:\minutes}}
\def\gzero#1{\ifx#1\undefined\relax\else\global#1=\z@\fi}
\def\resetcounters{%
  \gzero\chapternum     \gzero\sectionnum       \gzero\subsectionnum  
  \gzero\theoremnum     \gzero\lemmanum         \gzero\subsubsectionnum 
  \gzero\tabnum         \gzero\fignum           \gzero\definitionnum    
  \gzero\@BadRefs       \gzero\@BadTags         \gzero\@quoteflag  
  \gzero\@envDepth      \gzero\enumDepth        \gzero\enumcnt        
  \gzero\refnum         \gzero\eqnum            \gzero\corollarynum   
  \global\@firstrefnum=1\global\@lastrefnum=1                   
}
\def\@FileInit#1=#2[#3]{%
   \immediate\openout#1=#2 \relax
   \immediate\write#1{\@comment #3 for job \jobname\space - created: \runtime}%
   \immediate\write#1{\@comment ====================================}}
\newread\txsfile
\let\patchfile=\txsfile
\def\LoadSiteFile{%
  \immediate\openin\patchfile=TXSsite.tex
  \ifeof\patchfile
     \emsg{> No TXSsite.tex file found.}%
     \immediate\closein\patchfile
  \else
     \emsg{> Trying to read in TXSsite.tex...}%
     \immediate\closein\patchfile
     \input TXSsite.tex \relax
  \fi}
\def\ReadPatches{%
    \immediate\openin\patchfile=\TXSpatches.tex
    \ifeof\patchfile
         \closein\patchfile
    \else\immediate\closein\patchfile
       \input\TXSpatches.tex \relax
    \fi
    \immediate\openin\patchfile=\TXSmods.tex \relax
    \ifeof\patchfile
       \closein\patchfile
    \else\immediate\closein\patchfile
       \input\TXSmods.tex \relax
    \fi}
\def\loadstyle#1#2{%
   \def#1{\@loaderr{#1}}%
   \ATunlock
   \immediate\openin\txsfile=#2
   \ifeof\txsfile
      \emsg{> Trying to load the style file #2...}%
   \fi
   \closein\txsfile
   \input #2 \relax
   \ATlock
   #1}%
\newhelp\@utohelp{%
loadstyle: The macro named above was supposed to be defined^^M
In the style file that was just read, but I couldn't find^^M
the definition in that file.  Maybe you can learn something^^M
from the comments in that style file, or find someone who knows^^M
something about it.}
\def\@loaderr#1{%
   \newlinechar=`\^^M
   \errhelp=\@utohelp
   \errmessage{No definition of \string#1 in the style file.}}
\def\autoload#1#2{%
   \def#1{\loadstyle#1{#2}}}
\autoload\PhysRev{PhysRev.txs}%
\autoload\PhysRevLett{PhysRev.txs}%
\autoload\PhysRevManuscript{PhysRev.txs}%
\autoload\nuclproc{nuclproc.txs}%
\autoload\NorthHolland{Elsevier.txs}%
\autoload\NorthHollandTwo{Elsevier.txs}%
\autoload\WorldScientific{WorldSci.txs}%
\autoload\IEEEproceedings{IEEE.txs}%
\autoload\IEEEreduced{IEEE.txs}%
\autoload\AIPproceedings{AIP.txs}%
\autoload\CVformat{CVformat.txs}%
\autoload\idx{index.tex}\autoload\index{index.tex}\autoload\theindex{index.tex}
\autoload\markindexfalse{index.tex}\autoload\markindextrue{index.tex}
\autoload\makeindexfalse{index.tex}\autoload\makeindextrue{index.tex}
\autoload\spine{spine.txs}

% file: TXShead.tex - Running Headlines - TeXsis version 2.18
% @(#) $Id: TXShead.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Running Headlines.}
\newdimen\headlineoffset        \headlineoffset=0.0cm
\newdimen\footlineoffset        \footlineoffset=0.0cm
\newif\ifRunningHeads           \RunningHeadsfalse
\newif\ifbookpagenumbers        \bookpagenumbersfalse
\newif\ifrightn@m               \rightn@mtrue
\def\makeheadline{\vbox to 0pt{\vskip-22.5pt
   \vskip-\headlineoffset
   \line{\vbox to 8.5pt{}\the\headline}\vss}\nointerlineskip}
\def\makefootline{\baselineskip=24pt
   \vskip\footlineoffset
   \line{\the\footline}}
\def\HeadLine{%
   \edef\firstm{{\XA\iffalse\firstmark\fi}}%
   \edef\topm{{\XA\iffalse\topmark\fi}}%
   \ifRunningHeads
     \def\He@dText{{\HeadFont \HeadText}}%
   \else\def\He@dText{\relax}\fi
   \ifbookpagenumbers
      \ifodd\pageno\rightn@mtrue
      \else\rightn@mfalse\fi
   \else\rightn@mtrue\fi
   \tenrm
   \ifx\topm\firstm
     \ifrightn@m
        {\hss\He@dText\hss\llap{\HeadFont\rm\PageNumber}}%
     \else
        {\rlap{\HeadFont\rm\PageNumber}\hss\He@dText\hss}%
      \fi 
   \else \hfill \fi}%
\def\HeadText{\hfill}
\def\FootLine{%
   \edef\firstm{%
      {\expandafter\iffalse\firstmark\fi}}%
   \edef\topm{%
      {\expandafter\iffalse\topmark\fi}}%
   \ifx\topm\firstm \hss
    \else {\hss\HeadFont \FootText \hss} \fi}%
\def\FootText{\hfill}%
\def\HeadFont{\tenit}%
\begingroup
  \catcode`<=12 \catcode`>=12 \catcode`\"=12 
  \gdef\PageLinkto#1{%
        \html{<a href="\hash sect.TOC">}%
        \html{<a NAME="page.\the\pageno">}%
        {#1}\html{</a>}%
        \html{</a>}%
   }%
\endgroup
\def\PageNumber{\PageLinkto{\folio}}%
\def\nopagenumbers{\headline={\hfil}\footline={\hfil}}%
\def\pagenumbers{\headline={\HeadLine}\footline={\FootLine}}
\def\bottompagenumbers{\footline={\hfill{\rm\PageNumber}\hfill}%
                \headline={\hfill}}
\def\bookpagenumbers{\bookpagenumberstrue}
\def\plainoutput{%
  \makeBindingMargin
  \shipout\vbox{\makeheadline\pagebody\makefootline}%
  \advancepageno
  \ifnum\outputpenalty>-\@MM \else\dosupereject\fi}
\newdimen\BindingMargin \BindingMargin=0pt
\def\makeBindingMargin{%
   \ifdim\BindingMargin>0pt
   \ifodd\pageno\hoffset=\BindingMargin\else
   \hoffset=-\BindingMargin\fi\fi}

% file: TXSeqns.tex - Equation Numbering - TeXsis version 2.18
% @(#) $Id: TXSeqns.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Equation numbering.}
\newcount\eqnum         \eqnum=\z@
\def\@chaptID{}         \def\@sectID{}%
\newif\ifeqnotrace      \eqnotracefalse
\def\EQN{%
   \begingroup
   \quoteoff\offparens
   \@EQN}%
\def\@EQN#1$${%
   \endgroup
   \if ?#1? \EQNOparse *;;\endlist
   \else \EQNOparse#1;;\endlist\fi
   $$}%
\def\EQNOparse#1;#2;#3\endlist{%
  \if ?#3?\relax
    \global\advance\eqnum by\@ne
    \edef\tnum{\@chaptID\@sectID\the\eqnum}%
    \Eqtag{#1}{\tnum}%
    \@EQNOdisplay{#1}%
  \else\stripblanks #2\endlist
    \edef\p@rt{\tok}%
    \if a\p@rt\relax
      \global\advance\eqnum by\@ne\fi
    \edef\tnum{\@chaptID\@sectID\the\eqnum}%
    \Eqtag{#1}{\tnum}%
    \edef\tnum{\@chaptID\@sectID\the\eqnum\p@rt}%
    \Eqtag{#1;\p@rt}{\tnum}%
    \@EQNOdisplay{#1;#2}%
  \fi
  \global\let\?=\tnum
  \relax}%
\def\Eqtag#1#2{\tag{Eq.#1}{#2}}
\def\@EQNOdisplay#1{%
   \@eqno
   \ifeqnotrace
     \rlap{\phantom{(\tnum)}%
        \quad{\tenpoint\tt["#1"]}}\fi
     \linkname{Eq.#1}{(\tnum)}%
   }
\let\@eqno=\eqno
\def\endlist{\endlist}%
\def\Eq#1{\linkto{Eq.#1}{Eq.~($\use{Eq.#1}$)}}%
\def\Eqs#1{\linkto{Eq.#1}{Eqs.~($\use{Eq.#1}$)}}%
\def\Ep#1{\linkto{Eq.#1}{($\use{Eq.#1}$)}}%
\def\EQNdisplaylines#1{%
   \@EQNcr
   \displ@y
   \halign{%
      \hbox to\displaywidth{%
      $\@lign\hfil\displaystyle##\hfil$}%
      &\llap{$\@lign\@@EQN{##}$}\crcr
   #1\crcr}%
   \@EQNuncr}%
\long\def\EQNalign#1{%
   \@EQNcr
   \displ@y
     \tabskip=\centering
   \halign to\displaywidth{%
   \hfil$\relax\displaystyle{##}$
     \tabskip=0pt
   &$\relax\displaystyle{{}##}$\hfil
     \tabskip=\centering
   &\llap{$\relax\@@EQN{##}$}%
     \tabskip=0pt\crcr
    #1\crcr}%
   }
\def\@@EQN#1{\if ?#1? \EQNOparse *;;\endlist
         \else \EQNOparse#1;;\endlist\fi}%
\def\@EQNcr{%
   \let\EQN=&
   \let\@eqno=\relax}%
\def\@EQNuncr{%
   \let\EQN=\@EQN
   \let\@eqno=\eqno}%
\def\EQNdoublealign#1{%
   \@EQNcr
   \displ@y
   \tabskip=\centering
   \halign to\displaywidth{%
      \hfil$\relax\displaystyle{##}$
      \tabskip=0pt
   &$\relax\displaystyle{{}##}$\hfil
      \tabskip=0pt
   &$\relax\displaystyle{{}##}$\hfil
      \tabskip=\centering
   &\llap{$\relax\@@EQN{##}$}%
      \tabskip=0pt\crcr
   #1\crcr}%
   \@EQNuncr}%
%\def\displaylines#1{%
%   \displ@y                            
%   \halign{\hbox to \displaywidth{$\hfil\displaystyle##\hfil$}%
%           &\llap{$##$}\crcr           
%    #1\crcr}}                          
\def\eqn#1$${\edef\tok\string#1
   \xdef#1{\NX\use{Eq.\tok}}%
   \EQNOparse \tok;;\endlist $$}%
\def\eqnmarker{\triangleright}%
\def\eqnmark{\quoteoff\offparens\@eqnmark}
\def\@eqnmark#1$${\@@eqnmark#1\eqno\eqno\endlist}
\def\@@eqnmark#1\eqno#2\eqno#3\endlist{\def\EQN{\relax}%
   \if ?#3? \@EQNmark#1\EQN\EQN\endlist
   \else\displaylines{\hbox to 0pt{$\eqnmarker$\hss}\hfill{#1}\hfill
                      \hbox to 0pt{\hss$#2$}}\fi$$}
\def\@EQNmark#1\EQN#2\EQN#3\endlist{%
   \if ?#3?\displaylines{\hbox to 0pt{$\eqnmarker$\hss}\hfill{#1}\hfill}%
   \else \let\@eqno=\relax
      \EQNdisplaylines{\hbox to 0pt{$\eqnmarker$\hss}\hfill{#1}\hfill
                \hbox to 0pt{\hss$\EQNOparse#2;;\endlist$}}\fi}

% file: TXSprns.tex - Automatic Parnthesis Sizing - TeXsis version 2.18
% @(#) $Id: TXSprns.tex,v 18.0 1999/07/09 17:24:29 myers Exp $  
%%> {Auto-sizing of Parentheses.}
\catcode`@=11
\ifx\@left\undefined
 \let\@left=\left       \let\@right=\right
 \let\lparen=(          \let\rparen=)
 \let\lbrack=[          \let\rbrack=]
 \let\@vert=\vert
\fi
\begingroup
\catcode`\(=\active \catcode`\)=\active
\catcode`\[=\active \catcode`\]=\active
\gdef({\relax
   \ifmmode \push@delim{P}%
    \@left\lparen
   \else\lparen
   \fi}
\global\let\@lparen=(
\gdef){\relax
   \ifmmode\@right\rparen
     \pop@delim\@delim
     \if P\@delim \relax \else
       \if B\@delim\emsg{> Expecting \string] but got \string).}%
                   \@errmark{PAREN}%
       \else\emsg{> Unmatched \string).}\@errmark{PAREN}%
     \fi\fi
   \else\rparen
   \fi}
\gdef[{\relax
   \ifmmode \push@delim{B}%
     \@left\lbrack
   \else\lbrack
   \fi}
\global\let\@lbrack=[
\gdef]{\relax
   \ifmmode\@right\rbrack
     \pop@delim\@delim
     \if B\@delim \relax \else
       \if P\@delim\emsg{> Expecting \string) but got \string].}%
                   \@errmark{BRACK}%
       \else\emsg{> Unmatched \string].}\@errmark{BRACK}%
     \fi\fi
   \else\rbrack
   \fi}
\gdef\EZYleft{\futurelet\nexttok\@EZYleft}%
\gdef\@EZYleft#1{%
   \ifx\nexttok(  \let\nexttok=\lparen
   \else
   \ifx\nexttok[  \let\nexttok=\lbrack
   \fi\fi
   \@left\nexttok}%
\gdef\EZYright{\futurelet\nexttok\@EZYright}%
\gdef\@EZYright#1{%
   \ifx\nexttok)  \let\nexttok=\rparen
   \else
   \ifx\nexttok]  \let\nexttok=\rbrack
   \fi\fi
   \@right\nexttok}%
\endgroup
\toksdef\@CAR=0  \toksdef\@CDR=2
\def\push@delim#1{\@CAR={{#1}}%
     \@CDR=\XA{\@delimlist}%
    \edef\@delimlist{\the\@CAR\the\@CDR}}%
\def\pop@delim#1{\XA\pop@delimlist\@delimlist\endlist#1}%
\def\pop@delimlist#1#2\endlist#3{\def\@delimlist{#2}\def#3{#1}}    
\def\@delimlist{}%
\newif\ifEZparens   \EZparensfalse
\def\autoparens{\EZparenstrue
   \everydisplay={\@onParens}%
   }
\def\@onParens{%
   \ifEZparens
    \def\@delimlist{}%
    \let\left=\EZYleft
    \let\right=\EZYright
    \catcode`\(=\active \catcode`\)=\active
    \catcode`\[=\active \catcode`\]=\active
   \fi}
\def\offparens{%
   \EZparensfalse\@offParens
   \everymath={}\everydisplay={}}%
\def\@offParens{%
   \let\left=\@left
   \let\right=\@right
   \catcode`(=12 \catcode`)=12
   \catcode`[=12 \catcode`]=12
   }
\offparens
\def\onparens{%
   \EZparenstrue
   \everymath={\@onMathParens}%
   \everydisplay={\@onParens}%
   }
\def\easyparenson{\onparens}%
\def\@onMathParens#1{%
   \@SetRemainder#1\endlist
   \ifx#1\lparen\let\@remainder=\@lparen\fi
   \ifx#1\lbrack\let\@remainder=\@lbrack\fi
   \@onParens
   \@remainder}%
\def\@SetRemainder#1#2\endlist{%
   \ifx @#2@ \def\@remainder{#1}%
   \else  \def\@remainder{{#1#2}}%
   \fi}
\def\easyparensoff{\offparens}%
\def\pmatrix#1{\@left\lparen\matrix{#1}\@right\rparen}
\def\bordermatrix#1{\begingroup \m@th
  \setbox\z@\vbox{\def\cr{\crcr\noalign{\kern2\p@\global\let\cr\endline}}%
    \ialign{$##$\hfil\kern2\p@\kern\p@renwd&\thinspace\hfil$##$\hfil
      &&\quad\hfil$##$\hfil\crcr
      \omit\strut\hfil\crcr\noalign{\kern-\baselineskip}%
      #1\crcr\omit\strut\cr}}%
  \setbox\tw@\vbox{\unvcopy\z@\global\setbox\@ne\lastbox}%
  \setbox\tw@\hbox{\unhbox\@ne\unskip\global\setbox\@ne\lastbox}%
  \setbox\tw@\hbox{$\kern\wd\@ne\kern-\p@renwd\@left\lparen\kern-\wd\@ne
    \global\setbox\@ne\vbox{\box\@ne\kern2\p@}%
    \vcenter{\kern-\ht\@ne\unvbox\z@\kern-\baselineskip}\,\right\rparen$}%
  \;\vbox{\kern\ht\@ne\box\tw@}\endgroup}
\def\partitionmatrix#1{\,\vcenter{\offinterlineskip\m@th
   \def\tablerule{\noalign{\hrule}}
   \halign{\hfil\loosebox{$\mathstrut ##$}\hfil&&\quad\vrule##\quad&
      \hfil\loosebox{$##$}\hfil\crcr
   #1\crcr}}\,}
% TXSrefs.tex -  Citations and References - TeXsis version 2.18
% @(#) $Id: TXSrefs.tex,v 18.8 2000/05/16 22:46:08 myers Exp $
%%> {References and Citations.}
\catcode`@=11
\catcode`\"=12 \catcode`\(=12 \catcode`\)=12
\newcount\refnum        \refnum=\z@
\newcount\@firstrefnum  \@firstrefnum=1
\newcount\@lastrefnum   \@lastrefnum=1
\newcount\@BadRefs      \@BadRefs=0
\newif\ifrefswitch      \refswitchtrue
\newif\ifbreakrefs      \breakrefstrue
\newif\ifrefpunct       \refpuncttrue
\newif\ifmarkit         \markittrue
\newif\ifnullname
\newif\iftagit
\newif\ifreffollows
\def\refterminator{}%
\def\RefLabel{}%
\newdimen\refindent      \refindent= -100pt     
{\catcode`\%=11 \gdef\@comment{% }}
\newcount\CiteType     \CiteType=1
%\newif\ifsuperrefs    \superrefstrue  
\def\superrefstrue{\CiteType=1}%
\def\superrefsfalse{\CiteType=2}%
\newwrite\reflistout
\newread\reflistin
\def\@refinit{%
  \immediate\closeout\reflistout
  \ifrefswitch
    \@FileInit\reflistout=\jobname.ref[List of References]% yes: initialize
  \else
    \let\@refwrite=\@refwrong \let\@refNXwrite=\@refwrong  
  \fi
  \gdef\refinit{\relax}}%
\def\refReset{%
   \global\refnum=\z@
   \global\@firstrefnum=1
   \global\@lastrefnum=1
   \global\@BadRefs=0
   \gdef\refinit{\@refinit}}%
\refReset
\def\@refwrite#1{\refinit\immediate\write\reflistout{#1}}
\def\@refNXwrite#1{\refinit\unexpandedwrite\reflistout{#1}} 
\def\@refwrong#1{}%
\long\def\reference#1{%
  \markittrue
  \@tagref{#1}%
  \@GetRefText{#1}}%
\long\def\addreference#1{%
  \markitfalse
  \@tagref{#1}%
  \@GetRefText{#1}}%
\def\hiddenreference{\addreference}%
\def\@tagref#1{%
  \stripblanks #1\endlist
  \XA\ifstar\tok*\relax
  \ifnullname\relax\else
    \def\RefLabel{#1}%
%
    \ifnum\CiteType=4
       \ifnum\footnum>\refnum
          \global\refnum=\footnum \global\@firstrefnum=\refnum
          \global\advance\@firstrefnum by \@ne
        \fi
    \fi
%
    \global\advance\refnum by \@ne
    \global\@lastrefnum=\refnum
    \edef\rnum{\the\refnum}%
    \tag{Ref.#1}{\rnum}%
    \ifnum\CiteType>0
       \immediate\write16{(\the\refnum)% write comment to .LIS and terminal
          First reference to "#1" on page \the\pageno.}\fi
  \fi}%
\def\ifstar#1#2\relax{\ifx*#1\relax\nullnametrue\else\nullnamefalse\fi}
\def\@GetRefText#1#2{%
  \ifnum\CiteType=4\else
    \ifnullname
      \p@nctwrite{; }%
      \@refwrite{\@comment ... Reference text for%
                "#1" defined on page \number\pageno.}%
      \@refwrite{\@refbreak}%
    \else
      \ifnum\refnum>1\p@nctwrite{. }\fi
      \@refwrite{\@comment }%
      \@refwrite{\@comment (\the\refnum) Reference text for%
                "#1" defined on page \number\pageno.}%
      \@refwrite{\string\@refitem{\the\refnum}{#1}}%
    \fi
  \fi
%
  \begingroup
    \def\endreference{\NX\endreference}%
    \def\reference{\NX\reference}\def\ref{\NX\ref}%
    \seeCR\newlinechar=`\^^M
    \@copyref#2}%
\def\@copyref#1\endreference{%
  \endgroup
  \ifnum\CiteType=4
    \ifnum\footnum<\refnum\global\footnum=\refnum\fi
    \Vfootnote{\ifnullname\relax\else
        {\CiteStyle{\the\refnum}}\fi}% That space is needed! Why?
        {\hangindent=\parindent\hangafter=1\seeCR #1\@refpunct.}%
  \else
    \@refNXwrite{#1\@endrefitem}%
  \fi
  \@endreference}%
\def\@endrefitem#1{#1}%
\long\def\@endreference#1{%
  \reffollowsfalse
  \ifx#1\cite\reffollowstrue\fi
  \ifx#1\citerange\reffollowstrue\fi
  \ifx#1\refrange\reffollowstrue\fi
  \ifx#1\ref\reffollowstrue\fi
  \ifx#1\reference\reffollowstrue
     \ifnum\CiteType=3
        \xdef\@refmark{\linkto{Ref.\RefLabel}{\RefLabel}}\add@refmark\fi 
     \ifnum\CiteType=6
        \xdef\@refmark{\linkto{Ref.\RefLabel}{\RefLabel}}\add@refmark\fi
  \else
     \ifnum\@firstrefnum>\@lastrefnum\relax
     \else
       \ifnum\CiteType=3
          \xdef\@refmark{\linkto{Ref.\RefLabel}{\RefLabel}}%
       \else\ifnum\CiteType=6
          \xdef\@refmark{\linkto{Ref.\RefLabel}{\RefLabel}}%
       \else
         \ifnum\@firstrefnum=\@lastrefnum
           \xdef\@refmark{\linkto{Ref.\the\@lastrefnum}{\the\@lastrefnum}}%
         \else
            \xdef\@refmark{\linkto{Ref.\the\@firstrefnum}{\the\@firstrefnum}-
                        \linkto{Ref.\the\@lastrefnum}{\the\@lastrefnum}}%
         \fi
       \fi\fi
%
       \global\@firstrefnum=\refnum
       \global\advance\@firstrefnum by \@ne
       \add@refmark
     \fi
  \fi
  \flush@reflist{#1}}%
\def\endreference{%
  \emsg{>  Whoops! \string\endreference was called without
                first calling \string\reference.}\@errmark{REF?}%
  \emsg{>  I'll just ignore it.}%
  }%
\def\@refspace{\ }
\def\citemark#1{%
   \relax\let\@sf\empty
   \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
   \ifcase\CiteType\relax
   \or
       $\relax{}^{\hbox{$\scriptstyle\CiteStyle{#1\refterminator}$}}$\relax 
   \or {}~[{\CiteStyle{#1}}]\relax
   \or {}~[{\CiteStyle{#1}}]\relax
   \or
       $\relax{}^{\hbox{$\scriptstyle\CiteStyle{#1\refterminator}$}}$\relax
   \or {}~({\CiteStyle{#1}})\relax
   \or {}~({\CiteStyle{#1}})\relax
   \else\relax\fi
   \@sf}%
\def\CiteStyle{\relax}%
\def\referencelist{%
   \ifnum\CiteType=4
        \emsg{> Warning: \string\referencelist is not compatible with%
                footnoted reference citations.}\fi
   \begingroup
       \pageno=0\CiteType=0}%
\def\endreferencelist{%
   \endgroup}%
\def\CiteBySuperscript{\CiteType=1}%
\def\CiteByNumber{\CiteType=2}%
\def\CiteByTag{\CiteType=3}%
\def\CiteByLabel{\CiteType=3}%
\def\CiteByFootnote{\CiteType=4}%
\def\CiteByWhatever{\CiteType=5}%
\def\CiteByAuthor{\CiteType=6}%
\long\def\cite#1#2{%
  \def\RefLabel{#1}%
  \markittrue
  \reffollowsfalse
  \ifx#2\cite\reffollowstrue\fi
  \ifx#2\citerange\reffollowstrue\fi
  \ifx#2\refrange\reffollowstrue\fi
  \ifx#2\ref\reffollowstrue\fi
  \ifx#2\reference\reffollowstrue\fi
  \auxwritenow{\string\citation\string{#1\string}}%
  \make@refmark{#1}%
  \add@refmark
  \flush@reflist{#2}}%
\let\ref=\cite
\def\@refmarklist{}%
\def\nocite#1{%
  \auxwritenow{\string\citation\string{#1\string}}}%
\def\make@refmark#1{%
  \testtag{Ref.#1}\ifundefined
    \emsg{> UNDEFINED REFERENCE #1 ON PAGE \number\pageno.}%
    \global\advance\@BadRefs by 1
    \xdef\@refmark{{\tenbf #1}}%
    \@errmark{REF?}%
  \else
    \ifnum\CiteType=3
      \xdef\@refmark{\linkto{Ref.#1}{#1}}%
    \else
   \xdef\@refmark{\linkto{Ref.\csname\tok\endcsname}{\csname\tok\endcsname}}%
  \fi\fi}%
\def\add@refmark{%
  \ifmarkit
  \ifx\@refmarklist\empty\relax
     \xdef\@refmarklist{\@refmark}%
  \else
    \ifnum\CiteType=3
      \xdef\@refmarklist{\@refmarklist; \@refmark}%
    \else
      \xdef\@refmarklist{\@refmarklist,\@refmark}%
  \fi\fi\fi}%
\long\def\flush@reflist#1{%
  \ifmarkit
  \ifreffollows\else
    \citemark{\@refmarklist}%
    \gdef\@refmarklist{}%
    \ifx#1\par\else\space@head{#1}\fi
  \fi\fi
  \def\@next{#1}\ifcat.\NX#1\def\@next{#1 }\fi
  \@next}%
{\quoteon
\gdef\space@head#1{\def\next{\space}%
    \ifcat.\NX#1\relax\def\next{\relax}\fi
    \ifx)#1\def\next{\relax}\fi
    \ifx]#1\def\next{\relax}\fi
    \ifx"#1\def\next{\relax}\fi
   \next}}%
\def\Ref#1{%
   \ifnum\CiteType=3 \citemark{\linkto{Ref.#1}{\use{Ref.#1}}}%
   \else 
     \testtag{Ref.#1}\ifundefined
       Ref.~\use{Ref.#1}%
     \else 
       \linkto{Ref.\csname\tok\endcsname}{Ref.~\csname\tok\endcsname}%
   \fi\fi}
\long\def\refrange#1#2#3{%
  \ifnum\CiteType=3\emsg{> WARNING: \string\refrange\space%
                doesn't work with named citations.}\@errmark{REF?}\fi 
  \reffollowsfalse
  \ifx#3\cite\reffollowstrue\fi
  \ifx#3\ref\reffollowstrue\fi
  \ifx#3\reference\reffollowstrue\fi
  \ifx#3\refrange\reffollowstrue\fi
  \make@refmark{#2}%
  \xdef\@refmarktwo{\@refmark}%
  \make@refmark{#1}%
  \xdef\@refmark{\@refmark\hbox{--}\@refmarktwo}%
  \add@refmark
  \flush@reflist{#3}}%
\let\citerange=\refrange
\def\vol#1{\undertext{#1}}
\def\booktitle#1{{\sl #1}}
\newif\ifShowArticleTitle  \ShowArticleTitlefalse
\def\ArticleTitle#1{\ifShowArticleTitle{\sl #1},\fi}
\def\etal{{\it et al.}} \def\ie{{\it i.e.}}
\def\cf{{\it cf.}}      \def\ibid{{\it ibid.}}
\def\ListReferences{%
  \ifnum\CiteType>0
     \ifnum\CiteType=4\relax\else
         \@ListReferences
  \fi\fi}
\def\@ListReferences{\emsg{Reference List}%
  \ifnum\refnum>\z@ \p@nctwrite{.}%
    \@refwrite{\@comment>>> EOF \jobname.ref <<<}% and EOF marker comment
    \immediate\closeout\reflistout
  \fi
  \ifnum\@BadRefs>\z@
    \emsg{>}\emsg{> There were \the\@BadRefs\ undefined references.}%
    \emsg{> See the file \jobname.log for the citations, or try running}%
    \emsg{> TeXsis again to resolve forward references.}\emsg{>}%
  \fi
%
  \begingroup
    \offparens
    \immediate\openin\reflistin=\jobname.ref
    \ifeof\reflistin
       \closein\reflistin
       \emsg{> \string\ListReferences: no references in \jobname.ref}%
    \else
       \catcode`@=11
       \catcode`\^^M=10
       \def\reference{\@noendref}%
       \parindent=\z@
       \singlespaced
       \ifdim\refindent<0pt
          \setbox9\hbox{\the\refnum.\quad}%
          \refindent=\wd9
       \fi
       \refFormat
       \input\jobname.ref  \relax
       \vskip 0pt
    \fi
  \endgroup
  \refReset
} 
\def\References{\ListReferences}%
\def\refFormat{\relax}%
\def\@noendref#1{%
   \emsg{>  Whoops! \string\reference{#1} was given before the}%
   \emsg{>  \string\endreference for the previous \string\reference.}%
   \emsg{>  I'll just ignore it and run the two together.}%
   }%
\def\@refitem#1#2#3{\message{#1.}%
   \auxwritenow{\string\bibcite\string{#2\string}\string{#1\string}}%
   \parskip=\z@\parindent=\z@
   \leftskip=\refindent
   \refskip
   \par\noindent\hskip-\refindent
   \ifnum\CiteType=3
      \hbox{\linkname{Ref.#1}{\RefNumStyle{#2}{.\quad}}}%
   \else
      \ifnum\CiteType=6\else
         \hbox to \refindent{\hfil\linkname{Ref.#1}{\RefNumStyle{#1}{.\quad}}}%
   \fi\fi
   #3}
\def\refskip{\smallskip}%
\def\RefNumStyle{\relax}                
\def\@refpunct#1{\unskip#1}%
\def\p@nctwrite#1{%
   \ifrefpunct\@refwrite{\NX\@refpunct#1}\fi}
\def\@refbreak{\ifbreakrefs\hfill\break\fi}
\newif\ifEurostyle     \Eurostylefalse
\offparens
{\catcode`\.=\active \gdef.{\hbox{\p@riod\null}}}%
\def\p@riod{.}%
\def\journal{%
  \bgroup
   \catcode`\.=\active
   \offparens
   \j@urnal}%
 \def\j@urnal#1;#2,#3(#4){%
   \ifEurostyle
      {#1} {\vol{#2}} (\@fullyear{#4}) #3\relax
   \else
      {#1} {\vol{#2}}, #3 (\@fullyear{#4})\relax
   \fi
  \egroup}%
\def\@fullyear#1{%
  \begingroup
     \count255=\year
        \divide \count255 by 100 \multiply \count255 by 100
     \count254=\year
        \advance \count254 by -\count255 \advance \count254 by 1
     \count253=#1\relax
%
     \ifnum\count253<100
        \ifnum \count253>\count254
            \advance \count253 by -100\fi
        \advance \count253 by \count255
        \emsg{> WARNING: \string\@fullyear: possible Y2K problem.%
                  Year #1 interpreted as \the\count253.}%
        \emsg{> Please use 4 digits for years.}%
      \fi
      \number\count253
      \endgroup}%
\def\NP{Nucl.\ Phys.}   \def\PL{Phys.\ Lett.}
\def\PR{Phys.\ Rev.}    \def\PRL{Phys.\ Rev.\ Lett.}
\def\ao{Appl.\  Opt.\ }         \def\ap{Appl.\  Phys.\ }
\def\apl{Appl.\ Phys.\ Lett.\ } \def\apj{Astrophys.\ J.\ }
\def\jcp{J.\ Chem.\ Phys.\ }    \def\jmo{J.\ Mod.\ Opt.\ }
\def\josa{J.\ Opt.\ Soc.\ Am.\ }\def\josaa{J.\ Opt.\ Soc.\ Am.\ A }
\def\jpp{J.\ Phys.\ (Paris) }   \def\nat{Nature (London) }
\def\oc{Opt.\ Commun.\ }        \def\ol{Opt.\ Lett.\ }
\def\pl{Phys.\ Lett.\ }         \def\pra{Phys.\ Rev.\ A }
\def\prb{Phys.\ Rev.\ B }       \def\prc{Phys.\ Rev.\ C }
\def\prd{Phys.\ Rev.\ D }       \def\pre{Phys.\ Rev.\ E }
\def\prl{Phys.\ Rev.\ Lett.\ }  \def\rmp{Rev.\ Mod.\ Phys.\ }
\def\bell{Bell Syst.\ Tech.\ J.\ }
\def\jqe{IEEE J.\ Quantum Electron.\ }
\def\assp{IEEE Trans.\ Acoust.\ Speech Signal Process.\ }
\def\aprop{IEEE Trans.\ Antennas Propag.\ }
\def\mtt{IEEE Trans.\ Microwave Theory Tech.\ }
\def\iovs{Invest.\ Ophthalmol.\ Vis.\ Sci.\ }
\def\josab{J.\ Opt.\ Soc.\ Am.\ B }
\def\pspie{Proc.\ Soc.\ Photo-Opt.\ Instrum.\ Eng.\ }
\def\sjqe{Sov.\ J.\ Quantum Electron.\ }
%%> {BIBTeX support for TeXsis (macros and patches) v 0.92}
\def\citation#1{\relax} \def\bibdata#1{\relax}
\def\bibstyle#1{\relax} \def\bibcite#1#2{\relax}
\def\emdash{--}
\def\ReferenceStyle#1{\auxwritenow{\string\bibstyle\string{#1\string}}}
\let\bibliographystyle=\ReferenceStyle
\def\ReferenceFiles#1{%
    \auxwritenow{\string\bibdata\string{#1\string}}%
    \immediate\openin\reflistin=\jobname.bbl
    \ifeof\reflistin
         \closein\reflistin
    \else\immediate\closein\reflistin
       \input\jobname.bbl \relax
    \fi}
\let\bibliography=\ReferenceFiles

% file: TXSsects.tex - Chapters and Sections - TeXsis version 2.18
%  @(#) $Id: TXSsects.tex,v 18.1 2000/05/16 22:47:23 myers Exp $
%%> {Section and Chapter divisions.}
\catcode`@=11
\newcount\chapternum            \chapternum=\z@
\newcount\sectionnum            \sectionnum=\z@
\newcount\subsectionnum         \subsectionnum=\z@
\newcount\subsubsectionnum      \subsubsectionnum=\z@
\newif\ifshowsectID             \showsectIDtrue
\def\@sectID{}%
\newif\ifshowchaptID            \showchaptIDtrue
\def\@chaptID{}%
\newskip\sectionskip            \sectionskip=2\baselineskip
\newskip\subsectionskip         \subsectionskip=1.5\baselineskip
\newdimen\sectionminspace       \sectionminspace = 0.20\vsize
\long\def\chapter#1#2 {%
  \def\@aftersect{#2}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #2 }\fi
  \vfill\supereject
  \global\advance\chapternum by \@ne
  \global\sectionnum=\z@
  \global\def\@sectID{}%
  \edef\lab@l{\ChapterStyle{\the\chapternum}}%
  \ifshowchaptID
    \global\edef\@chaptID{\lab@l.}%
    \r@set
  \else\edef\@chaptID{}\fi
  \everychapter
  \ifx\Tbf\undefined\def\Tbf{\bf}\fi
  \ifshowchaptID
    \leftline{\Tbf{Chapter\ \@chaptID}}%
    \nobreak\smallskip\fi
  \begingroup
    \raggedright\pretolerance=2000\hyphenpenalty=2000
    \parindent=\z@ {\Tbf{#1}\bigskip}%
  \endgroup
  \nobreak\bigskip
  \begingroup
    \def\label##1{}%
    \xdef\ChapterTitle{#1}%
    \def\n{}\def\nl{}\def\mib{}%
    \setHeadline{#1}%
    \emsg{\@chaptID\space #1}%
    \def\@quote{\string\@quote\relax}%
    \addTOC{0}{\TOCcID{\lab@l.}#1}{\folio}%
  \endgroup
  \@Mark{#1}%
  \s@ction
  \afterchapter\@aftersect}%
\def\everychapter{\relax}%
\def\afterchapter{\relax}%
\def\ChapterStyle#1{#1}%
\def\setChapterID#1{\edef\@chaptID{#1.}}%
\def\r@set{%
  \global\subsectionnum=\z@
  \global\subsubsectionnum=\z@
  \ifx\eqnum\undefined\relax
    \else\global\eqnum=\z@\fi
  \ifx\theoremnum\undefined\relax
  \else
    \global\theoremnum=\z@    \global\lemmanum=\z@                
    \global\corollarynum=\z@  \global\definitionnum=\z@
    \global\fignum=\z@       
    \ifRomanTables\relax     
    \else\global\tabnum=\z@\fi
  \fi}
\long\def\s@ction{%
  \checkquote
  \checkenv
  \vskip -\parskip
  \nobreak\noindent}
\def\@aftersect{}
\def\@Mark#1{%
   \begingroup
     \def\label##1{}%
     \def\goodbreak{}%
     \def\mib{}\def\n{}%
     \mark{#1\NX\else\lab@l}%
   \endgroup}%
\def\@noMark#1{\relax}%
\def\setHeadline#1{\@setHeadline#1\n\endlist}%
\def\@setHeadline#1\n#2\endlist{%
   \def\@arg{#2}\ifx\@arg\empty
      \global\edef\HeadText{#1}%
   \else
      \global\edef\HeadText{#1\dots}%
   \fi
}
\long\def\section#1#2 {%
  \def\@aftersect{#2}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #2 }\fi
  \vskip\parskip\vskip\sectionskip
  \goodbreak\pagecheck\sectionminspace
  \global\advance\sectionnum by \@ne
  \edef\lab@l{\@chaptID\SectionStyle{\the\sectionnum}}%
  \ifshowsectID
    \global\edef\@sectID{\SectionStyle{\the\sectionnum}.}%
    \global\edef\@fullID{\lab@l.\space\space}%
    \r@set
  \else\gdef\@fullID{}\def\@sectID{}\fi
  \everysection
  \ifx\tbf\undefined\def\tbf{\bf}\fi
  \vbox{%
     \raggedright\pretolerance=2000\hyphenpenalty=2000
     \setbox0=\hbox{\noindent\tbf\@fullID}%
     \hangindent=\wd0 \hangafter=1
     \noindent\unhbox0{\tbf{#1}\medskip}}%
   \nobreak
   \begingroup
     \def\label##1{}%
     \global\edef\SectionTitle{#1}%
     \def\n{}\def\nl{}\def\mib{}%
     \ifnum\chapternum=0\setHeadline{#1}\fi
     \emsg{\@fullID #1}%
     \def\@quote{\string\@quote\relax}%
     \addTOC{1}{\TOCsID{\lab@l.}#1}{\folio}%
   \endgroup
   \s@ction
   \aftersection\@aftersect}%
\def\everysection{\relax}%
\def\aftersection{\relax}%
\def\setSectionID#1{\edef\@sectID{#1.}}%
\def\SectionStyle#1{#1}%
\long\def\subsection#1#2 {%
  \def\@aftersect{#2}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #2 }\relax\fi
  \vskip\parskip\vskip\subsectionskip
  \goodbreak\pagecheck\sectionminspace
  \global\advance\subsectionnum by \@ne
  \subsubsectionnum=\z@
  \edef\lab@l{\@chaptID\@sectID\SubsectionStyle{\the\subsectionnum}}%
  \ifshowsectID
     \global\edef\@fullID{\lab@l.\space}%
  \else\gdef\@fullID{}\fi
  \everysubsection
  \vbox{%
    {\raggedright\pretolerance=2000\hyphenpenalty=2000
    \setbox0=\hbox{\noindent\bf\@fullID}%
    \hangindent=\wd0 \hangafter=1
    \noindent\unhbox0{\bf{#1}\nobreak\medskip}}}%
  \begingroup
    \def\label##1{}%
    \global\edef\SubsectionTitle{#1}%
    \def\n{}\def\nl{}\def\mib{}%
   \emsg{\@fullID #1}%
    \def\@quote{\string\@quote\relax}%
    \addTOC{2}{\TOCsID{\lab@l.}#1}{\folio}%
  \endgroup
  \s@ction
  \aftersubsection\@aftersect}%
\def\everysubsection{\relax}%
\def\aftersubsection{\relax}%
\def\SubsectionStyle#1{#1}%
\long\def\subsubsection#1#2 {%
  \def\@aftersect{#2}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #2 }\fi
  \vskip\parskip\vskip\subsectionskip
  \goodbreak\pagecheck\sectionminspace
  \global\advance\subsubsectionnum by \@ne
   \edef\lab@l{\@chaptID\@sectID\SubsectionStyle{\the\subsectionnum}.%
           \SubsubsectionStyle{\the\subsubsectionnum}}%
   \ifshowsectID
     \global\edef\@fullID{\lab@l.\space\space}%
   \else\gdef\@fullID{}\fi
   \everysubsubsection
   \vbox{%
     {\raggedright\bf
     \setbox0=\hbox{\noindent\@fullID}%
     \hangindent=\wd0 \hangafter=1
     \noindent\@fullID\relax
     #1\nobreak\medskip}}%
   \begingroup
     \def\label##1{}%
     \global\edef\SubsectionTitle{#1}%
     \def\n{}\def\nl{}\def\mib{}%
     \emsg{\@fullID #1}%
     \def\@quote{\string\@quote\relax}%
     \addTOC{3}{\TOCsID{\lab@l.}#1}{\folio}%
   \endgroup
   \s@ction
   \aftersubsubsection\@aftersect}%
\def\everysubsubsection{\relax}%
\def\aftersubsubsection{\relax}%
\def\SubsubsectionStyle#1{#1}%
\long\def\Appendix#1#2#3 {%
  \def\@aftersect{#3}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #3 }\fi
  \def\@arg{#1}%
  \vfill\supereject
  \global\sectionnum=\z@
  \edef\lab@l{#1}%
  \gdef\@sectID{}%
  \ifshowchaptID
    \ifx\@arg\empty\else
      \global\edef\@chaptID{\lab@l.}\fi
    \r@set
  \else\def\@chaptID{}\fi
  \everychapter
  \ifx\Tbf\undefined\def\Tbf{\bf}\fi
  \leftline{\Tbf{Appendix\ \@chaptID}}%
  \begingroup
    \nobreak\smallskip
    \parindent=\z@\raggedright
    {\Tbf{#2}\bigskip}%
  \endgroup
  \nobreak\bigskip
  \begingroup
    \def\label##1{}%
    \global\edef\ChapterTitle{#2}%
    \def\n{}\def\nl{}\def\mib{}%
    \setHeadline{#2}%
    \emsg{Appendix \@chaptID\space #2}%
    \def\@quote{\string\@quote\relax}%
    \addTOC{0}{\TOCcID{\lab@l.}#2}{\folio}%
  \endgroup
  \@Mark{#2}%
  \s@ction
  \afterchapter\@aftersect}%
\long\def\appendix#1#2#3 {%
  \def\@aftersect{#3}%
  \ifx\@aftersect\empty\let\@aftersect=\@eatpar
  \else\def\@aftersect{\@eatpar #3 }\fi
   \vskip\parskip\vskip\sectionskip
   \goodbreak\pagecheck\sectionminspace
           \global\advance\sectionnum by \@ne
   \def\@arg{#1}%
   \gdef\@sectID{}\gdef\@fullID{}%
   \edef\lab@l{#1}%
   \ifshowsectID
     \r@set
     \ifx\@arg\empty\else
       \global\edef\@sectID{\lab@l.}%
       \global\edef\@fullID{\lab@l.\space\space}\fi
   \fi
   \everysection
   \ifx\tbf\undefined\def\tbf{\bf}\fi
   \vbox{%
     {\raggedright\tbf
     \setbox0=\hbox{\tbf\@fullID}%
     \hangindent=\wd0 \hangafter=1
     \noindent\@fullID
     {#2}\nobreak\medskip}}%
   \begingroup
     \def\label##1{}%
     \global\edef\SectionTitle{#2}%
     \def\n{}\def\nl{}\def\mib{}%
     \ifnum\chapternum=0\setHeadline{#2}\fi
     \emsg{appendix \@fullID #2}%
     \def\@quote{\string\@quote\relax}%
     \addTOC{1}{\TOCsID{\lab@l.}#2}{\folio}%
   \endgroup
   \s@ction
   \aftersection\@aftersect}%
\def\pagecheck#1{%
   \dimen@=\pagegoal
   \advance\dimen@ by -\pagetotal
   \ifdim\dimen@>0pt
   \ifdim\dimen@< #1\relax
      \vfil\break \fi\fi
   }
\def\nosechead#1{%
   \vskip\subsectionskip
   \goodbreak\pagecheck\sectionminspace
   \checkquote\checkenv
   \dosupereject
   \vbox{%
     {\raggedright\bf\noindent
     {#1}%
     \nobreak\medskip}}%
   }
\def\checkenv{%
   \ifx\@envdepth\undefined\relax
   \else\ifnum\@envdepth=\z@\relax
      \else\emsg{> Unclosed environment \@envname in the last section!}\fi 
   \fi}%

% file: TXStags.tex - Labels and Tags - TeXsis version 2.18
% @(#) $Id: TXStags.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Labels and tags.}
\newread\auxfilein
\newwrite\auxfileout
\newif\ifauxswitch      \auxswitchtrue
\let\XA=\expandafter    \let\NX=\noexpand
\catcode`"=12
\catcode`@=11
\newcount\@BadTags   \@BadTags= 0
\def\auxinit{%
  \ifauxswitch
    \@FileInit\auxfileout=\jobname.aux[Auxiliary File]%
  \else \gdef\auxwritenow##1{}\gdef\auxwrite##1{} \fi
  \gdef\auxinit{\relax}}%
\def\auxwritenow#1{\auxinit
   \immediate\write\auxfileout{#1}}
\def\auxwrite#1{\auxinit\write\auxfileout{#1}}%
\def\auxoutnow#1#2{\auxwritenow{\string\newlabel{#1}{{#2}{\folio}}}}
\def\auxout#1#2{\auxwrite{\string\newlabel{#1}{{#2}{\folio}}}}
\def\ReadAUX{%
   \openin\auxfilein=\jobname.aux
   \ifeof\auxfilein\closein\auxfilein
   \else\closein\auxfilein
     \begingroup
        \def\@tag##1##2{\endgroup
           \edef\@@temp{##2}%
           \testtag{##1}\XA\xdef\csname\tok\endcsname{\@@temp}}%
       \unSpecial\ATunlock
       \input\jobname.aux \relax
     \endgroup
   \fi}%
\def\tag{%
   \begingroup\unSpecial
    \@tag}%
\def\@tag#1#2{%
   \endgroup
   \ifx\folio#2
     \auxout{#1}{#2}%
   \else
     \edef\@@temp{#2}%
     \stripblanks @#1@\endlist
     \XA\xdef\csname\tok\endcsname{\@@temp}%
     \auxoutnow{#1}{\@@temp}%
   \fi}
\def\label{\begingroup\unSpecial\@label}
\def\@label#1{\endgroup\tag{#1}{\lab@l}}
\def\lab@l{\relax}%
\def\newlabel{\begingroup\unSpecial\@newlabel}
\def\@newlabel#1#2{\endgroup\do@label#2\label{#1}}
\def\do@label#1#2{\def\lab@l{#1}\def\lab@lpage{#2}}
\def\use{%
   \begingroup\unSpecial\@use}          
\def\@use#1{\endgroup
   \stripblanks @#1@\endlist
   \XA\ifx\csname\tok\endcsname\relax\relax
     \emsg{> UNDEFINED TAG #1 ON PAGE \folio.}%
     \global\advance\@BadTags by 1
     \@errmark{UNDEF}%
     \edef\tok{{\bf\tok}}%
   \else
     \edef\tok{\csname\tok\endcsname}%
   \fi
   \tok}%
\def\unSpecial{%
     \catcode`@=12 \catcode`"=12 \catcode``=12  \catcode`'=12
     \catcode`[=12 \catcode`]=12 \catcode`(=12  \catcode`)=12
     \catcode`<=12 \catcode`>=12 \catcode`\&=12 \catcode`\#=12 
     \catcode`/=12}
\def\stripblanks{%
   \let\tok=\empty\@stripblanks}
\def\@stripblanks#1{\def\next{#1}\@striplist}
\def\@striplist{%
   \ifx\next\stripblanks\message{>\NX\@striplist: Oops!}\next=\endlist\fi
   \ifx\next\endlist\let\next=\relax
   \else\@stripspace\let\next=\@stripblanks\fi
   \next}
\def\@stripspace{\XA\if\space\next\else\edef\tok{\tok\next}\fi}
\def\endlist{\endlist}%
\newif\ifundefined      \undefinedfalse
\def\testtag#1{\stripblanks @#1@\endlist 
   \XA\ifx\csname\tok\endcsname\relax\undefinedtrue
      \else\undefinedfalse\fi}
\def\checktags{%
  \ifnum\@BadTags>\z@
    \emsg{>}\emsg{> There were \the\@BadTags\ references to undefined tags.}%
    \emsg{> See the file \jobname.log for the citations, or try running}%
    \emsg{> TeXsis again to resolve forward references.}\emsg{>}%
  \fi}
\def\LabelParse#1;#2;#3\endlist{%
  \def\@TagName{\@prefix#1}%
  \if ?#3?\relax
    \global\advance\@count by\@ne
  \else
    \stripblanks #2\endlist
    \edef\@arg{\tok}\if a\@arg\relax
      \global\advance\@count by\@ne\fi
    \xdef\@ID{\@chaptID\@sectID\the\@count\@arg}%
    \tag{\@prefix#1;\@arg}{\@ID}%
  \fi
  \xdef\@ID{\@chaptID\@sectID\the\@count}%
  \tag{\@prefix#1}{\@ID}%
}%
\def\@ID{}%
\newif\ifhtml   \htmlfalse
\def\html{\begingroup\htmlChar\@html}
\def\linkto{\begingroup\htmlChar\@linkto}
\def\linkname{\begingroup\htmlChar\@linkname}
\def\href{\begingroup\htmlChar\@href}
\def\URL{\begingroup\htmlChar\@URL}
\def\xxxcite{\begingroup\htmlChar\@xxxcite}
\def\notie{\def~{\Tilde}}
\def\urlChar{\def\/{\discretionary{}{/}{/}}\def\.{\discretionary{.}{}{.}}}
\def\@htmlChar{\def\/{/}}
\begingroup
  \catcode`\~=12  \catcode`"=12     \catcode`\/=12
  \catcode`<=12   \catcode`>=12  
  \begingroup
     \catcode`\%=12 \catcode`\#=12 
     \gdef\htmlChar{\notie
        \catcode`@=12 \catcode`"=12  \catcode``=12  \catcode`'=12
        \catcode`[=12 \catcode`]=12  \catcode`(=12  \catcode`)=12
        \catcode`<=12 \catcode`>=12  \catcode`_=12  \catcode`^=12  
        \catcode`$=12 \catcode`\&=12 \catcode`\#=12 \catcode`%=12 
        \catcode`~=12 \catcode`/=12  \catcode`/=12  \@htmlChar}
     \gdef\hash{#}\gdef\Tilde{~}
  \endgroup
  \gdef\@html#1{\ifhtml\special{html:#1}\fi\endgroup}%
  \gdef\@linkto#1{\endgroup\@@linkto{#1}}%
  \gdef\@@linkto#1#2{\html{<a href="\hash#1">}{#2}\html{</a>}}
  \gdef\@linkname#1{\endgroup\@@linkname{#1}}
  \gdef\@@linkname#1#2{\html{<a name="#1">}{#2}\html{</a>}}
  \gdef\@href#1{\endgroup\@@href{#1}}%
  \gdef\@@href#1#2{\html{<a href="#1">}\urlChar{#2}\html{</a>}}%
  \gdef\@URL#1{\html{<a href="#1">}\urlChar{\tt #1}\html{</a>}\endgroup}%
  \gdef\@xxxcite#1{\href{http://xxx.lanl.gov/abs/#1}%
        \urlChar{#1}\relax}
\endgroup
\let\hypertarget=\linkname  \let\hname=\linkname

% file: TXStitle.tex - Title Page Macros - TeXsis version 2.18
% @(#) $Id: TXStitle.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Title Page macros.}
\catcode`@=11
\def\pubcode#1{\gdef\@DOCcode{#1}}
\def\PUBcode#1{\gdef\@DOCcode{#1}}%
\def\DOCcode#1{\PUBcode{#1}}%
\def\BNLcode#1{\PUBcode{#1}\banner}%
\def\@DOCcode{\TeXsis~\fmtversion}%
\def\pubdate#1{\gdef\@PUBdate{#1}}
\def\PUBdate#1{\gdef\@PUBdate{#1}}%
\def\@PUBdate{\monthname{\month},~\number\year}%
\def\ORGANIZATION{}%
\def\banner{%
   \line{\hfil
      \vbox to 0pt{\vss \hbox{\twelvess \ORGANIZATION}}%
      \hfil}%
   \vskip 12pt
   \hrule height 0.6pt \vskip 1pt \hrule height 0.6pt
   \vskip 4pt \relax
   \line{\twelvepoint\rm\@PUBdate \hfil \@DOCcode}%
   \vskip 3pt
   \hrule height 0.6pt \vskip 1pt \hrule height 0.6pt
   \vskip 0pt plus 1fil
   \vskip 1.0cm minus 1.0cm
   \relax}
\def\titlepage{%
   \bgroup
   \pageno=1
   \hbox{\space}%
   \let\title=\Title
   \let\endmode=\relax
   }
\def\endtitlepage{%
   \endmode
   \vfil\eject
   \egroup}%
\def\title{%
   \endmode
   \vskip 0pt
   \mark{Title Page\NX\else Title Page}% mark page so no \HeadLine
   \bgroup
   \let\endmode=\endTitle
   \center\Tbf}%
\let\Title=\title
\def\endtitle{%
   \endcenter
   \bigskip
   \gdef\title{%
      \emsg{> Please use \NX\booktitle instead of \NX\title.}%
      \@errmark{OLD!}%
      \booktitle}%
   \egroup}%
\def\endTitle{\endtitle}%
\def\Tbf{\sixteenpoint\bf}%
\def\author{%
  \endmode
  \bgroup
   \let\endmode=\endauthor
   \singlespaced\parskip=0pt
   \obeylines\def\\{\par}%
   \@getauthor}%
{\obeylines\gdef\@getauthor#1
  #2
  {#1\bigskip\def\n{\egroup\centerline\bgroup\bf}%
   \centerline{\bf #2}%
   \medskip\center}%
}
\def\endauthor{\endcenter\egroup\bigskip}
\def\authors{%
   \endmode
   \bigskip
   \bgroup
    \let\endmode=\endauthors
    \let\@uthorskip=\medskip
    \raggedcenter\singlespaced}%
\def\endauthors{%
   \endraggedcenter
   \egroup
   \bigskip}%
\def\note#1#2{%
  ${}^{\hbox{#1}}\ $
  \space@head#2
  #2}%
\def\institution#1#2{%
   \@uthorskip\let\@uthorskip=\relax
   \raggedcenter
      ${}^{\rm #1}$\space #2%                  
   \endraggedcenter
   }
\let\@uthorskip=\medskip
\long\def\titlenote#1#2{%
   \footnote{}{%
   \llap{\hbox to \parindent{\hfil
   ${}^{\rm #1}$\space}}#2}}%
\def\and{\centerline{and}\medskip}
\def\AbstractName{ABSTRACT}%
\def\abstract{%
   \endmode
   \bigskip\bigskip
    \centerline{\AbstractName}%
    \medskip
    \bgroup
    \let\endmode=\endabstract
    \narrower\narrower
    \singlespaced
    \everyabstract}%
\def\everyabstract{}%
\def\endabstract{\smallskip\egroup}
\def\pacs#1{\medskip\centerline{PACS numbers: #1}\smallskip}
\def\submit#1{\bigskip\centerline{Submitted to {\sl #1}}}
\def\submitted#1{\submit{#1}}%
\def\toappear#1{\bigskip\raggedcenter
     To appear in {\sl #1}
     \endraggedcenter}
\def\disclaimer#1{\footnote{}\bgroup\tenrm\singlespaced
   This manuscript has been authored under contract number #1
   \@disclaimer\par}
\def\disclaimers#1{\footnote{}\bgroup\tenrm\singlespaced
   This manuscript has been authored under contract numbers #1
   \@disclaimer\par}
\def\@disclaimer{%
with the U.S. Department of Energy.  Accordingly, the U.S.
Government retains a non-exclusive, royalty-free license to publish
or reproduce the published form of this contribution,
or allow others to do so, for U.S. Government purposes.
\egroup}

% file: TXSenvmt.tex - Special Text Environments - TeXsis version 2.18
% @(#) $Id: TXSenvmt.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Environments.}
\catcode`@=11
\chardef\other=12
\def\center{%
   \flushenv
   \advance\leftskip \z@ plus 1fil
   \advance\rightskip \z@ plus 1fil
   \obeylines\@eatpar}%
\def\flushright{%
    \flushenv
    \advance\leftskip \z@ plus 1fil
    \obeylines\@eatpar}%
\def\flushleft{%
   \flushenv
   \advance\rightskip \z@ plus 1fil
   \obeylines\@eatpar}%
\def\flushenv{%
    \vskip \z@
    \bgroup
     \def\flushhmode{F}%
     \parindent=\z@  \parfillskip=\z@}%
\def\endcenter{\endflushenv}
\def\endflushleft{\endflushenv}
\def\endflushright{\endflushenv}
\def\@eatpar{\futurelet\next\@testpar}
\def\@testpar{\ifx\next\par\let\@next=\@@eatpar\else\let\@next=\relax\fi\@next}
\long\def\@@eatpar#1{\relax}
\def\raggedcenter{%
    \flushenv
    \advance\leftskip\z@ plus4em
    \advance\rightskip\z@ plus 4em
    \spaceskip=.3333em \xspaceskip=.5em
    \pretolerance=9999 \tolerance=9999
    \hyphenpenalty=9999 \exhyphenpenalty=9999
    \@eatpar}%
\def\endraggedcenter{\endflushenv}%
\def\hcenter{\hflushenv
   \advance\leftskip \z@ plus 1fil
   \advance\rightskip \z@ plus 1fil
   \obeylines\@eatpar}%
\def\hflushright{\hflushenv
    \advance\leftskip \z@ plus 1fil
    \obeylines\@eatpar}%
\def\hflushleft{\hflushenv
    \advance\rightskip \z@ plus 1fil
    \obeylines\@eatpar}%
\def\hflushenv{%
   \def\par{\endgraf\indent}%
   \hbox to \z@ \bgroup\hss\vtop
   \flushenv\def\flushhmode{T}}%
\def\endflushenv{%
   \ifhmode\endgraf\fi
   \if T\flushhmode \egroup\hss\fi
   \egroup}%
\def\flushhmode{U}     
\def\endhcenter{\endflushenv}
\def\endhflushleft{\endflushenv}
\def\endhflushright{\endflushenv}
\newskip\EnvTopskip     \EnvTopskip=\medskipamount
\newskip\EnvBottomskip  \EnvBottomskip=\medskipamount
\newskip\EnvLeftskip    \EnvLeftskip=2\parindent
\newskip\EnvRightskip   \EnvRightskip=\parindent
\newskip\EnvDelt@skip   \EnvDelt@skip=0pt
\newcount\@envDepth     \@envDepth=\z@
\def\beginEnv#1{%
   \begingroup
     \def\@envname{#1}%
     \ifvmode\def\@isVmode{T}%
     \else\def\@isVmode{F}\vskip 0pt\fi
     \ifnum\@envDepth=\@ne\parindent=\z@\fi
     \advance\@envDepth by \@ne
     \EnvDelt@skip=\baselineskip
     \advance\EnvDelt@skip by-\normalbaselineskip
     \@setenvmargins\EnvLeftskip\EnvRightskip
     \setenvskip{\EnvTopskip}%
     \vskip\skip@\penalty-500
   }
\def\endEnv#1{%
   \ifnum\@envDepth<1
      \emsg{> Tried to close ``#1'' environment, but no environment open!}%
      \begingroup
   \else
      \def\test{#1}%
      \ifx\test\@envname\else
         \emsg{> Miss-matched environments!}%
         \emsg{> Should be closing ``\@envname'' instead of ``\test''}%
      \fi
   \fi
   \vskip 0pt
   \setenvskip\EnvBottomskip
   \vskip\skip@\penalty-500
   \xdef\@envtemp{\@isVmode}%
   \endgroup
   \if F\@envtemp\vskip-\parskip\par\noindent\fi
   }
\def\setenvskip#1{\skip@=#1 \divide\skip@ by \@envDepth}
\def\@setenvmargins#1#2{%
   \advance \leftskip  by #1    \advance \displaywidth by -#1
   \advance \rightskip by #2    \advance \displaywidth by -#2
   \advance \displayindent by #1}%
\def\itemize{\beginEnv{itemize}%
   \let\itm=\itemizeitem
%   \if F\@isVmode 
      \vskip-\parskip
%   \fi    
   }
\def\itemizeitem{%
   \par\noindent
   \hbox to 0pt{\hss\itemmark\space}}%
\def\enditemize{\endEnv{itemize}}%
\def\itemmark{$\bullet$}%
\newcount\enumDepth     \enumDepth=\z@
\newcount\enumcnt
\def\enumerate{\beginEnv{enumerate}%
   \global\advance\enumDepth by \@ne
   \setenumlead
   \enumcnt=\z@
   \let\itm=\enumerateitem
   \if F\@isVmode\vskip-\parskip\fi
   }
\def\enumerateitem{%
    \par\noindent                 
    \advance\enumcnt by \@ne
    \edef\lab@l{\enumlead \enumcur}%
    \hbox to \z@{\hss \lab@l \enummark
       \hskip .5em\relax}%
    \ignorespaces}%
\def\endenumerate{%
   \global\advance\enumDepth by -\@ne
   \endEnv{enumerate}}%
\def\enumPoints{%
   \def\setenumlead{\ifnum\enumDepth>1
          \edef\enumlead{\enumlead\enumcur.}%
      \else\def\enumlead{}\fi}%
   \def\enumcur{\number\enumcnt}%
   }
\def\enumpoints{\enumPoints}%
\def\enumOutline{%
   \def\setenumlead{\def\enumlead{}}%
   \def\enumcur{\ifcase\enumDepth
     \or\uppercase{\XA\romannumeral\number\enumcnt}%
     \or\LetterN{\the\enumcnt}%
     \or\XA\romannumeral\number\enumcnt
     \or\letterN{\the\enumcnt}%
     \or{\the\enumcnt}%
     \else $\bullet$\space\fi}%
   }
\def\enumoutline{\enumOutline}%
\def\enumNumOutline{%
   \def\setenumlead{\def\enumlead{}}%
   \def\enumcur{\ifcase\enumDepth
      \or{\XA\number\enumcnt}%
      \or\letterN{\the\enumcnt}%
      \or{\XA\romannumeral\number\enumcnt}%
      \else $\bullet$\space\fi}%
   }
\def\enumnumoutline{\enumNumOutline}%
\def\LetterN#1{\count@=#1 \advance\count@ 64 \XA\char\count@}
\def\letterN#1{\count@=#1 \advance\count@ 96 \XA\char\count@}
\def\enummark{.}%
\def\enumlead{}%
\enumpoints
\newbox\@desbox
\newbox\@desline
\newdimen\@glodeswd
\newcount\@deslines
\newif\ifsingleline \singlelinefalse
\def\description#1{\beginEnv{description}%
   \setbox\@desbox=\hbox{#1}%
   \@glodeswd=\wd\@desbox
   \@setenvmargins{\@glodeswd}{0pt}%
   \let\itm=\descriptionitem
   \if F\@isVmode\vskip-\parskip\fi
  }%
\def\descriptionitem#1{%
   \goodbreak\noindent
   \setbox\@desline=\vtop\bgroup
      \hfuzz=100cm\hsize=\@glodeswd
      \rightskip=\z@ \leftskip=\z@
      \raggedright
      \noindent{#1}\par
      \global\@deslines=\prevgraf
      \egroup
   \ifsingleline
     \ifnum\@deslines>1
        \@deslineitm{#1}%
     \else
        \setbox\@desline=\hbox{#1}%
        \ifdim \wd\@desline>\wd\@desbox
            \@deslineitm{#1}%
        \else\@desitm\fi
     \fi
   \else
     \@desitm
   \fi
   \ignorespaces}
\def\@desitm{%
   \noindent
   \hbox to \z@{\hskip-\@glodeswd
     \hbox to \@glodeswd{\vtop to \z@{\box\@desline\vss}%
     \hss}\hss}}%
\def\@deslineitm#1{%
   \hbox{\hskip-\@glodeswd {#1}\hss}%
   \vskip-\parskip\nobreak\noindent
   }
\def\enddescription{\ifhmode\par\fi
   \@setenvmargins{-\wd\@desbox}{0pt}%
   \endEnv{description}}
\def\example{\beginEnv{example}%
   \parskip=\z@ \parindent=\z@
   \baselineskip=\normalbaselineskip
   }%
\def\endexample{\endEnv{example}%
   \noindent}%
\let\blockquote=\example
\let\endblockquote=\endexample
\def\Listing{%
   \beginEnv{Listing}%
   \vskip\EnvDelt@skip
   \baselineskip=\normalbaselineskip
   \parskip=\z@ \parindent=\z@
   \def\\##1{\char92##1}%
   \catcode`\{=\other \catcode`\}=\other
   \catcode`\(=\other \catcode`\)=\other
   \catcode`\"=\other \catcode`\|=\other
   \catcode`\%=\other \catcode`\&=\other        
   \catcode`\-=\other \catcode`\==\other
   \catcode`\$=\other \catcode`\#=\other
   \catcode`\_=\other \catcode`\^=\other
   \catcode`\~=\other
   \obeylines
   \tt\Listingtabs
   \everyListing}%
\def\endListing{\endEnv{Listing}}%
\def\everyListing{\relax}
\def\ListCodeFile#1{%
   \Listing
   \rightskip=\z@ plus 5cm		
   \catcode`\\=\other
   \input #1\relax
   \endListing}
{\catcode`\^^I=\active\catcode`\ =\active
\gdef\Listingtabs{\catcode`\^^I=\active\let^^I\@listingtab
\catcode`\ =\active\let \@listingspace}%
}%
\def\@listingspace{\hskip 0.5em\relax}%
\def\@listingtab{\hskip 4em\relax}%
\def\TeXexample{\beginEnv{TeXexample}%
   \vskip\EnvDelt@skip
   \parskip=\z@ \parindent=\z@
   \baselineskip=\normalbaselineskip
   \def\par{\leavevmode\endgraf}%
   \obeylines
   \catcode`|=\z@
   \ttverbatim
   \@eatpar}%
\def\endTeXexample{%
   \vskip 0pt
   \endgroup
   \endEnv{TeXexample}}%
\def\ttverbatim{\begingroup
   \catcode`\(=\other \catcode`\)=\other
   \catcode`\"=\other \catcode`\[=\other 
   \catcode`\]=\other \catcode`\~=\other
   \let\do=\uncatcode \dospecials 
   \obeyspaces\obeylines
   \def\n{\vskip\baselineskip}%
   \tt}%
\def\uncatcode#1{\catcode`#1=\other}%
{\obeyspaces\gdef {\ }}%
\def\TeXquoteon{\catcode`\|=\active}%
\let\TeXquoteson=\TeXquoteon
\def\TeXquoteoff{\catcode`\|=\other}%
\let\TeXquotesoff=\TeXquoteoff
{\TeXquoteon\obeylines% active "|" calls \ttverbatim
   \gdef|{\ifmmode\vert\else% | is \vert in math mode, but
     \ttverbatim\spaceskip=\ttglue% to use \tt type
     \let^^M=\ \relax% and to ignore ^^M
     \let|=\endgroup\fi}%
}     
\def\ttvert{\hbox{\tt\char`\|}}
\outer\def\begintt{$$\let\par=\endgraf \ttverbatim \parskip=0pt
   \catcode`\|=0 \rightskip=-5pc \ttfinish}
{\catcode`\|=0 |catcode`|\=\other% | is temporary escape character
   |obeylines% end of line is active
   |gdef|ttfinish#1^^M#2\endtt{#1|vbox{#2}|endgroup$$}%
}
\def\beginlines{\par\begingroup\nobreak\medskip\parindent=0pt
   \hrule\kern1pt\nobreak \obeylines \everypar{\strut}}
\def\endlines{\kern1pt\hrule\endgroup\medbreak\noindent}
\def\beginproclaim#1#2#3#4#5{\medbreak\vskip-\parskip
   \global\XA\advance\csname #2\endcsname by \@ne
   \edef\lab@l{\@chaptID\@sectID
      \number\csname #2\endcsname}%
   \tag{#4#5}{\lab@l}%
   \noindent{\bf #1 \lab@l.\space}%
   \begingroup #3}%
\def\endproclaim{%
   \par\endgroup\ifdim\lastskip<\medskipamount
   \removelastskip\penalty55\medskip\fi}%
\newcount\theoremnum           \theoremnum=\z@
\def\theorem#1{\beginproclaim{Theorem}{theoremnum}{\sl}{Thm.}{#1}}
\let\endtheorem=\endproclaim
\def\Theorem#1{Theorem~\use{Thm.#1}}
\newcount\lemmanum             \lemmanum=\z@
\def\lemma#1{\beginproclaim{Lemma}{lemmanum}{\sl}{Lem.}{#1}}
\let\endlemma=\endproclaim
\def\Lemma#1{Lemma~\use{Lem.#1}}
\newcount\corollarynum         \corollarynum=\z@
\def\corollary#1{\beginproclaim{Corollary}{corollarynum}{\sl}{Cor.}{#1}}
\let\endcorollary=\endproclaim
\def\Corollary#1{Corollary~\use{Cor.#1}}
\newcount\definitionnum        \definitionnum=\z@
\def\definition#1{\beginproclaim{Definition}{definitionnum}{\rm}{Def.}{#1}}
\let\enddefinition=\endproclaim
\def\Definition#1{Definition~\use{Def.#1}}
\def\proof{\medbreak\vskip-\parskip\noindent{\it Proof. }}
\def\blackslug{%
   \setbox0\hbox{(}%
   \vrule width.5em height\ht0 depth\dp0}%
\def\QED{\blackslug}%
\def\endproof{\quad\blackslug\par\medskip}

% file: TXSfmts.tex - Special Document Formats - TeXsis version 2.18
% @(#) $Id: TXSfmts.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Layout macros.}
\catcode`@=11
\def\paper{%
   \auxswitchtrue
   \refswitchtrue
   \texsis
   \def\titlepage{%
      \bgroup
      \let\title=\Title
      \let\endmode=\relax
      \pageno=1}%
   \def\endtitlepage{%
      \endmode
      \goodbreak\bigskip
      \egroup}%
   \autoparens
   \quoteon
   }
\def\Tbf{\fourteenpoint\bf}%
\def\tbf{\twelvepoint\bf}%
\def\preprint{%
   \auxswitchtrue
   \refswitchtrue
   \texsis
   \def\titlepage{%
      \bgroup
      \pageno=1
      \let\title=\Title
      \let\endmode=\relax
      \banner}%
   \def\endtitlepage{%
      \endmode
      \vfil\eject
      \egroup}%
   \autoparens
   \quoteon
   }
\def\Manuscript{%
   \preprint
   \showsectIDfalse
   \showchaptIDfalse
   \def\SectionStyle##1{\uppercase
         \expandafter{\romannumeral ##1}}%
   \RomanTablestrue
   \TablesLast
   \FiguresLast
   \TrueDoubleSpacing
   \def\everyabstract{\TrueDoubleSpacing}
   \def\Tbf{\fourteenpoint\bf\TrueDoubleSpacing}%
   \def\refFormat{\TrueDoubleSpacing}%
   }
\autoload\PhysRevManuscript{PhysRev.txs}%
\def\book{%
   \ContentsSwitchtrue
   \refswitchtrue
   \auxswitchtrue
   \texsis
   \RunningHeadstrue
   \bookpagenumbers
   \def\titlepage{%
      \bgroup
      \pageno=-1
      \let\title=\Title
      \let\endmode=\relax
      \def\FootText{\relax}}%
   \def\endtitlepage{%
      \endmode
      \vfil\eject
      \egroup
      \pageno=1}%
   \def\abstract{%
      \endmode
      \bigskip\bigskip\medskip
      \bgroup\singlespaced
         \let\endmode=\endabstract
         \narrower\narrower
         \everyabstract}%
   \def\endabstract{%
      \medskip\egroup\bigskip}%
   \def\FootText{--\ \tenrm\folio\ --}%
   \def\Tbf{\sixteenpoint\bf}%
   \def\tbf{\fourteenpoint\bf}%
   \twelvepoint
   \doublespaced
   \autoparens
   \quoteon
   }%
\autoload\thesis{thesis.txs}
\autoload\UTthesis{thesis.txs}
\autoload\YaleThesis{thesis.txs}
\def\Letter{%
   \ContentsSwitchfalse
   \refswitchfalse
   \auxswitchfalse
   \texsis
   \singlespaced
   \LetterFormat}%
\def\letter{\Letter}%
\def\Memo{%
   \ContentsSwitchfalse
   \refswitchfalse
   \auxswitchfalse
   \texsis
   \singlespaced
   \MemoFormat}%
\def\memo{\Memo}%
\def\Referee{%
   \ContentsSwitchfalse
   \auxswitchfalse
   \refswitchfalse
   \texsis
   \RefReptFormat}%
\def\referee{\Referee}%
\def\Landscape{%
   \texsis
   \hsize=9in
   \vsize=6.5in
   \voffset=.5in
   \nopagenumbers
   \LandscapeSpecial
}
\def\landscape{\Landscape}%
\def\LandscapeSpecial{\special{papersize=11in,8.5in}}
\def\slides{%
   \quoteon
   \autoparens
   \ATlock
   \pageno=1
   \twentyfourpoint
   \doublespaced
   \raggedright\tolerance=2000
   \hyphenpenalty=500
   \raggedbottom
   \nopagenumbers
   \hoffset=-.25in \hsize=7.0in
   \voffset=-.25in \vsize=9.0in
   \parindent=30pt
   \def\bl{\vskip\normalbaselineskip}%
   \def\np{\vfill\eject}%
   \def\nospace{\nulldelimiterspace=0pt
      \mathsurround=0pt}%
   \def\big##1{{\hbox{$\left##1
      \vbox to2ex{}\right.\nospace$}}}%
   \def\Big##1{{\hbox{$\left##1
      \vbox to2.5ex{}\right.\nospace$}}}%
   \def\bigg##1{{\hbox{$\left##1
       \vbox to3ex{}\right.\nospace$}}}%
   \def\Bigg##1{{\hbox{$\left##1
      \vbox to4ex{}\right.\nospace$}}}%
  }
\autoload\twinout{twin.txs}%
\def\twinprint{%
   \preprint
   \let\t@tl@=\title
   \def\title{\vskip-1.5in\t@tl@}%
   \let\endt@tlep@ge=\endtitlepage
   \def\endtitlepage{\endt@tlep@ge
       \twinformat}%
}
\def\twinformat{%
   \tenpoint\doublespaced
   \def\Tbf{\twelvebf}\def\tbf{\tenbf}%
   \headlineoffset=0pt
   \twinout}%

% file: TXSfigs.tex - Figures and Tables - TeXsis version 2.18
% @(#) $Id: TXSfigs.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Figures and Tables.}
\catcode`\@=11
\let\NX=\noexpand\let\XA=\expandafter
\offparens
\newcount\tabnum        \tabnum=\z@
\newcount\fignum        \fignum=\z@
\newif\ifRomanTables    \RomanTablesfalse
\newif\ifCaptionList    \CaptionListfalse
\newif\ifFigsLast       \FigsLastfalse
\newif\ifTabsLast       \TabsLastfalse
\def\FiguresLast{\FigsLasttrue}\def\FiguresNow{\FigsLastfalse}
\def\TablesLast{\TabsLasttrue}\def\TablesNow{\TabsLastfalse}
\newwrite\fgout         \newwrite\tbout 
\newwrite\figlist       \newwrite\tablelist     \newwrite\caplist       
\long\def\figure{\@figure\topinsert}
\long\def\topfigure{\@figure\topinsert}%
\long\def\midfigure{\@figure\midinsert}
\long\def\fullfigure{\@figure\pageinsert}
\long\def\bottomfigure{\@figure\bottominsert}
\long\def\heavyfigure{\@figure\heavyinsert}
\long\def\widefigure{\@figure\widetopinsert}
\long\def\widetopfigure{\@figure\widetopinsert}
\long\def\widefullfigure{\@figure\widepageinsert}
\def\FigureName{Figure}%
\def\TableName{Table}%
\def\@figure#1#2{%
  \vskip 0pt
  \begingroup
    \def\CaptionName{\FigureName}%
    \def\@prefix{Fg.}%
    \let\@count=\fignum
    \let\@FigInsert=#1\relax
    \def\@arg{#2}\ifx\@arg\empty\def\@ID{}%
      \else\LabelParse #2;;\endlist\fi
    \ifFigsLast
      \emsg{\CaptionName\space\@ID. {#2} [storing in \jobname.fg]}%
      \@fgwrite{\@comment> \CaptionName\space\@ID.\space{#2}}%
      \@fgwrite{\string\@FigureItem{\CaptionName}{\@ID}{\NX#1}}%
      \seeCR\let\@next=\@copyfig
    \else
      \emsg{\CaptionName\ \@ID.\ {#2}}%
      \let\endfigure=\@endfigure
      \setbox\@capbox\vbox to 0pt{}%
      \def\@whereCap{N}%
      \let\@next=\@findcap
      \ifx\@FigInsert\midinsert\goodbreak\fi
      \@FigInsert
    \fi \@next}
\def\@endfigure{\relax
   \if B\@whereCap\relax
     \vskip\normalbaselineskip
     \centerline{\box\@capbox}%
   \fi 
   \endinsert \endgroup}%
\def\endfigure{\emsg{> \string\endfigure before \string\figure!}}
\def\figuresize#1{\vglue #1}%
\def\@copyfig#1#2\endfigure{\endgroup
   \ifx#1\par\@fgNXwrite{#2\@endfigure}\else\@fgNXwrite{#1#2\@endfigure}\fi}
\def\@FGinit{\@FileInit\fgout=\jobname.fg[Figures]\gdef\@FGinit{\relax}}
\def\@fgwrite#1{\@FGinit\immediate\write\fgout{#1}}
\long\def\@fgNXwrite#1{\@FGinit\unexpandedwrite\fgout{#1}}
\def\PrintFigures{\ifFigsLast\@PrintFigures\fi}
\def\@PrintFigures{%
   \@fgwrite{\@comment>>> EOF \jobname.fg <<<}%
   \immediate\closeout\fgout
   \begingroup
      \FigsLastfalse
      \vbox to 0pt{\hbox to 0pt{\ \hss}\vss}%
      \offparens
      \catcode`@=11
      \emsg{[Getting figures from file \jobname.fg]}%
      \Input\jobname.fg \relax
   \endgroup}%
\def\@FigureItem#1#2#3{%
   \begingroup
    #3\relax
    \def\@ID{#2}%
    \def\CaptionName{#1}%
    \setbox\@capbox\vbox to 0pt{}\def\@whereCap{N}%
    \@findcap}%
\long\def\table{\@table\topinsert}
\long\def\toptable{\@table\topinsert}%
\long\def\midtable{\@table\midinsert}
\long\def\fulltable{\@table\pageinsert}
\long\def\bottomtable{\@table\bottominsert}
\long\def\heavytable{\@table\heavyinsert}
\long\def\widetable{\@table\widetopinsert}
\long\def\widetoptable{\@table\widetopinsert}
\long\def\widefulltable{\@table\widepageinsert}
\def\@table#1#2{%
  \vskip 0pt
  \begingroup
    \def\CaptionName{\TableName}%
    \def\@prefix{Tb.}%
    \let\@count=\tabnum
    \let\@FigInsert=#1\relax
    \def\@arg{#2}\ifx\@arg\empty\def\@ID{}%
    \else\ifRomanTables
         \global\advance\@count by\@ne
         \edef\@ID{\uppercase\expandafter
            {\romannumeral\the\@count}}%
         \tag{\@prefix#2}{\@ID}%
    \else
        \LabelParse #2;;\endlist\fi
    \fi
    \ifTabsLast
      \emsg{\CaptionName\space\@ID. {#2} [storing in \jobname.tb]}%
      \@tbwrite{\@comment> \CaptionName\space\@ID.\space{#2}}%
      \@tbwrite{\string\@FigureItem{\CaptionName}{\@ID}{\NX#1}}%
      \seeCR\let\@next=\@copytab
    \else
      \emsg{\CaptionName\ \@ID.\ {#2}}%
      \let\endtable=\@endfigure
      \setbox\@capbox\vbox to 0pt{}%
      \def\@whereCap{N}%
      \let\@next=\@findcap
      \ifx\@FigInsert\midinsert\goodbreak\fi
      \@FigInsert
    \fi \@next}
\def\endtable{\emsg{> \string\endtable before \string\table!}}
\def\@copytab#1#2\endtable{\endgroup
    \ifx#1\par\@tbNXwrite{#2\@endfigure}\else\@tbNXwrite{#1#2\@endfigure}\fi}
\def\@TBinit{\@FileInit\tbout=\jobname.tb[Tables]\gdef\@TBinit{\relax}}
\def\@tbwrite#1{\@TBinit\immediate\write\tbout{#1}}
\long\def\@tbNXwrite#1{\@TBinit\unexpandedwrite\tbout{#1}}
\def\PrintTables{\ifTabsLast\@PrintTables\fi}
\def\@PrintTables{%
   \@tbwrite{\@comment>>> EOF \jobname.tb <<<}%
   \immediate\closeout\tbout
   \begingroup
     \TabsLastfalse
     \catcode`@=11
     \offparens
     \emsg{[Getting tables from file \jobname.tb]}%
     \Input\jobname.tb \relax
   \endgroup}%
\newbox\@capbox
\newcount\@caplines
\def\CaptionName{}%
\def\@ID{}%
\def\captionspacing{\normalbaselines}%
\def\@inCaption{F}%
\long\def\caption#1{%
   \def\lab@l{\@ID}%
   \global\setbox\@capbox=\vbox\bgroup
     \def\@inCaption{T}%
     \captionspacing\seeCR
     \dimen@=20\parindent
     \ifdim\colwidth>\dimen@\narrower\narrower\fi
     \noindent{\bf \linkname{\@TagName}{\CaptionName~\@ID}:\space}%
     #1\relax
     \vskip 0pt
     \global\@caplines=\prevgraf
   \egroup
   \ifnum\@caplines=\@ne
     \global\setbox\@capbox=\vbox{\noindent\seeCR
         \hfil{\bf \linkname{\@TagName}{\CaptionName~\@ID}:\space}%
         #1\hfil}\fi
   \if N\@whereCap\def\@whereCap{B}\fi
   \if T\@whereCap
     \centerline{\box\@capbox}%
     \vskip\baselineskip\medskip
   \fi}%
\def\Caption{\begingroup\seeCR\@Caption}%
\long\def\@Caption#1\endCaption{\endgroup
   \ifCaptionList
%      \def\@arg{Figure}\ifx\CaptionName\@arg\let\caplist=\figlist\fi
%      \def\@arg{Table}\ifx\CaptionName\@arg\let\caplist=\tablelist\fi
      \incaplist{#1}\fi 
   \caption{#1}}%
\def\endCaption{\emsg{> \string\endCaption\ called before \string\Caption.}}
\long\def\@findcap#1{%
   \ifx #1\Caption \def\@whereCap{T}\fi
   \ifx #1\caption \def\@whereCap{T}\fi
   #1}%
\def\@whereCap{N}%
\def\ListCaptions{\@ListCaps\caplist=\jobname.cap[List of Captions]
        {\let\FIGLitem=\CAPLitem}}
\def\ListFigureCaptions{%
    \@ListCaps\figlist=\jobname.fgl[List of Figure Captions]
    {\let\FIGLitem=\CAPLitem}}
\def\ListTableCaptions{%
    \@ListCaps\tablelist=\jobname.tbl[List of Table Captions]
    {\let\FIGLitem=\CAPLitem}}
\def\CAPLitem#1#2#3\@endFIGLitem#4{%
   \bigskip
   \begingroup
     \raggedright\tolerance=1700
     \hangindent=1.41\parindent\hangafter=1
     \noindent #1\ #2
     #3 \hskip 0pt plus 10pt
     \vskip 0pt
   \endgroup}%
\def\infiglist{\begingroup\seeCR
     \@infiglist\figlist}
\def\intablelist{\begingroup\seeCR
     \@infiglist\tablelist}
\def\incaplist{\begingroup\seeCR
     \@infiglist\caplist}
\def\FigListWrite#1#2{%
  \ifx#1\figlist\relax   \FigListInit\fi
  \ifx#1\tablelist\relax \TabListInit\fi
  \ifx#1\caplist\relax   \CapListInit\fi
  \edef\@line@{{#2}}%
  \write#1\@line@}%
\def\FigListInit{\@FileInit\figlist=\jobname.fgl[List of Figures]%
        \gdef\FigListInit{\relax}}
\def\TabListInit{\@FileInit\tablelist=\jobname.tbl[List of Tables]%
        \gdef\TabListInit{\relax}}  
\def\CapListInit{\@FileInit\caplist=\jobname.cap[List of Captions]%
        \gdef\CapListInit{\relax}}  
\def\FigListWriteNX#1#2{\writeNX#1{#2}} 
\def\@infiglist#1#2{%
     \FigListWrite#1{\@comment > \CaptionName\space\@ID:}%
     \FigListWrite#1{\string\FIGLitem{\CaptionName} {\@ID.\space}}%
     \@copycap#1#2\endlist
     \FigListWrite#1{{\NX\folio}}%
   \endgroup}%
\def\@copycap#1#2#3\endlist{%
   \ifx#2\space\writeNX#1{#3\@endFIGLitem}%
   \else\writeNX#1{#2#3\@endFIGLitem}\fi}
\def\ListFigures{\@ListCaps\figlist=\jobname.fgl[List of Figures]{}}
\def\ListTables{\@ListCaps\tablelist=\jobname.tbl[List of Tables]{}}
\def\@ListCaps#1=#2[#3]#4{%
   \immediate\closeout#1
   \openin#1=#2 \relax
   \ifeof#1\closein#1
   \else\closein#1\emsg{[Getting #3]}%
     \begingroup
      \showsectIDtrue
      \ATunlock\quoteoff\offparens
      #4
      \input #2 \relax
     \endgroup
   \fi}
\long\def\FIGLitem#1#2#3\@endFIGLitem#4{%
   \medskip
   \begingroup
     \raggedright\tolerance=1700
     \ifx\TOCmargin\undefined\skip0=\parindent
     \else\skip0=\TOCmargin\fi
     \advance\rightskip by \skip0
     \parfillskip=-\skip0
     \hangindent=1.41\parindent\hangafter=1
     \noindent \ifshowsectID #1\ \fi #2
        #3 \hskip 0pt plus 10pt
     \leaddots
     \hbox to 2em{\hss\linkto{page.#4}{#4}}%
     \vskip 0pt
   \endgroup}
\def\Fig#1{\linkto{Fg.#1}{Fig.~\use{Fg.#1}}}    
\def\Fg#1{\linkto{Fg.#1}{\use{Fg.#1}}}
\def\Tab#1{\linkto{Tb.#1}{Table~\use{Tb.#1}}}
\def\Tbl#1{\linkto{Tb.#1}{Table~\use{Tb.#1}}}
\def\Tb#1{\linkto{Tb.#1}{\use{Tb.#1}}}
\autoload\Tablebody{Tablebod.txs}\autoload\Tablebodyleft{Tablebod.txs}
\autoload\tablebody{Tablebod.txs}
\autoload\epsffile{epsf.tex}    \autoload\epsfbox{epsf.tex}
\autoload\epsfxsize{epsf.tex}   \autoload\epsfysize{epsf.tex}
\autoload\epsfverbosetrue{epsf.tex}\autoload\epsfverbosefalse{epsf.tex}
\obsolete\topFigure\figure \obsolete\midFigure\midfigure
\obsolete\fullFigure\fullfigure \obsolete\TOPFIGURE\figure
\obsolete\MIDFIGURE\midfigure \obsolete\FULLFIGURE\fullfigure
\obsolete\endFigure\endfigure \obsolete\ENDFIGURE\endfigure
\obsolete\topTable\toptable \obsolete\midTable\midtable
\obsolete\fullTable\fulltable \obsolete\TOPTABLE\toptable
\obsolete\MIDTABLE\midtable \obsolete\FULLTABLE\fulltable
\obsolete\endTable\endtable \obsolete\ENDTABLE\endtable
\def\FIG{\@obsolete\FIG\Fig\Fig}%
\def\TBL{\@obsolete\TBL\Tbl\Tbl}%

% file: TXSruled.tex - Ruled Tables - TeXsis version 2.18
% @(#) $Id: TXSruled.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
\catcode`@=11
\catcode`\|=12
\catcode`\&=4
\newcount\ncols         \ncols=\z@
\newcount\nrows         \nrows=\z@
\newcount\curcol        \curcol=\z@
\let\currow=\nrows
\newdimen\thinsize      \thinsize=0.6pt
\newdimen\thicksize     \thicksize=1.5pt
\newdimen\tablewidth    \tablewidth=-\maxdimen
\newdimen\parasize      \parasize=4in
\newif\iftableinfo      \tableinfotrue
\newif\ifcentertables   \centertablestrue
\def\centeredtables{\centertablestrue}%
\def\noncenteredtables{\centertablesfalse}%
\def\nocenteredtables{\centertablesfalse}%
\let\plaincr=\cr
\let\plainspan=\span
\let\plaintab=&
\def\ampersand{\char`\&}%
\let\lparen=(
\let\NX=\noexpand
\def\ruledtable{\relax
    \@BeginRuledTable
    \@RuledTable}%
\def\@BeginRuledTable{%
   \ncols=0\nrows=0
   \begingroup
    \offinterlineskip
    \def~{\phantom{0}}%
    \def\span{\plainspan\omit\relax\colcount\plainspan}%
    \let\cr=\crrule
    \let\CR=\crthick
    \let\nr=\crnorule
    \let\|=\Vb
    \def\hfill{\hskip0pt plus1fill\hbox{}}%
    \ifx\tablestrut\undefined\relax
    \else\let\tstrut=\tablestrut\fi
    \catcode`\|=13 \catcode`\&=13\relax
    \TableActive
    \curcol=1
    \ifdim\tablewidth>-\maxdimen\relax
      \edef\@Halign{\NX\halign to \NX\tablewidth\NX\bgroup\TablePreamble}%
      \tabskip=0pt plus 1fil
    \else
      \edef\@Halign{\NX\halign\NX\bgroup\TablePreamble}%
      \tabskip=0pt
    \fi
    \ifcentertables
       \ifhmode\vskip 0pt\fi
       \line\bgroup\hss
    \else\hbox\bgroup
    \fi}%
\long\def\@RuledTable#1\endruledtable{%
   \vrule width\thicksize
     \vbox{\@Halign
       \thickrule
       #1\killspace
       \tstrut
       \linecount
       \plaincr\thickrule
     \egroup}%
   \vrule width\thicksize
   \ifcentertables\hss\fi\egroup
  \endgroup
  \global\tablewidth=-\maxdimen
  \iftableinfo
      \immediate\write16{[Nrows=\the\nrows, Ncols=\the\ncols]}%
   \fi}%
\def\TablePreamble{%
   \TableItem{####}%
   \plaintab\plaintab
   \TableItem{####}%
   \plaincr}%
\def\@TableItem#1{%
   \hfil\tablespace
   #1\killspace
   \tablespace\hfil
    }%
\def\@tableright#1{%
   \hfil\tablespace\relax
   #1\killspace
   \tablespace\relax}%
\def\@tableleft#1{%
   \tablespace\relax
   #1\killspace
   \tablespace\hfil}%
\let\TableItem=\@TableItem
\def\RightJustifyTables{\let\TableItem=\@tableright}%
\def\LeftJustifyTables{\let\TableItem=\@tableleft}%
\def\NoJustifyTables{\let\TableItem=\@TableItem}%
\def\LooseTables{\let\tablespace=\quad}%
\def\TightTables{\let\tablespace=\space}%
\LooseTables
\def\TrailingSpaces{\let\killspace=\relax}%
\def\NoTrailingSpaces{\let\killspace=\unskip}%
\TrailingSpaces
\def\setRuledStrut{%
   \dimen@=\baselineskip
   \advance\dimen@ by-\normalbaselineskip
   \ifdim\dimen@<.5ex \dimen@=.5ex\fi
   \setbox0=\hbox{\lparen}%
   \dimen1=\dimen@ \advance\dimen1 by \ht0% space above line
   \dimen2=\dimen@ \advance\dimen2 by \dp0% space below line
   \def\tstrut{\vrule height\dimen1 depth\dimen2 width\z@}%
   }%
\def\tstrut{\vrule height 3.1ex depth 1.2ex width 0pt}%
\def\bigitem#1{%
   \dimen@=\baselineskip
   \advance\dimen@ by-\normalbaselineskip
   \ifdim\dimen@<.5ex \dimen@=.5ex\fi
   \setbox0=\hbox{#1}%
   \dimen1=\dimen@ \advance\dimen1 by \ht0
   \dimen2=\dimen@ \advance\dimen2 by \dp0
   \vrule height\dimen1 depth\dimen2 width\z@
   \copy0}%
\def\vctr#1{\hfil\vbox to 0pt{\vss\hbox{#1}\vss}\hfil}%
\def\nextcolumn#1{%
   \plaintab\omit#1\relax\colcount
   \plaintab}%
\def\tab{%
   \nextcolumn{\relax}}%
\let\novb=\tab
\def\vb{%
   \nextcolumn{\vrule width\thinsize}}%
\def\Vb{%
   \nextcolumn{\vrule width\thicksize}}%
\def\dbl{%
   \nextcolumn{\vrule width\thinsize
   \hskip 2\thinsize \vrule width\thinsize}}%
{\catcode`\|=13 \let|0
 \catcode`\&=13 \let&0
 \gdef\TableActive{\let|=\vb \let&=\tab}%
}%
\def\crrule{\killspace
   \tstrut
   \linecount
   \plaincr\tablerule
  }%
\def\crthick{\killspace
   \tstrut
   \linecount
   \plaincr\thickrule
  }%
\def\crnorule{\killspace
   \tstrut
   \linecount
   \plaincr
   }%
\def\crpart{\killspace
   \linecount
   \plaincr}%
\def\tablerule{\noalign{\hrule height\thinsize depth 0pt}}%
\def\thickrule{\noalign{\hrule height\thicksize depth 0pt}}%
\def\cskip{\omit\relax}%
\def\crule{\omit\leaders\hrule height\thinsize depth0pt\hfill}%
\def\Crule{\omit\leaders\hrule height\thicksize depth0pt\hfill}%
\def\linecount{%
   \global\advance\nrows by1
   \ifnum\ncols>0
      \ifnum\curcol=\ncols\relax\else
      \immediate\write16
      {\NX\ruledtable warning: Ncols=\the\curcol\space for Nrow=\the\nrows}%
      \fi\fi
   \global\ncols=\curcol
   \global\curcol=1}%
\def\colcount{\relax
   \global\advance\curcol by 1\relax}%
\long\def\para#1{%
   \vtop{\hsize=\parasize
   \normalbaselines
   \noindent #1\relax
   \vrule width 0pt depth 1.1ex}%
}%
\def\begintable{\relax
    \@BeginRuledTable
    \@begintable}%
\long\def\@begintable#1\endtable{%
   \@RuledTable#1\endruledtable}%

% file: TXSsymb.tex - Special Symbols - TeXsis version 2.18
% @(#) $Id: TXSsymb.tex,v 18.0 1999/07/09 17:24:29 myers Exp $
%%> {Extended math/physics symbols,}
\def\E#1{\hbox{$\times 10^{#1}$}}
\def\square{\hbox{{$\sqcup$}\llap{$\sqcap$}}}%
\def\grad{\nabla}%
\def\del{\partial}%
\def\frac#1#2{{#1\over#2}}
\def\smallfrac#1#2{{\scriptstyle {#1 \over #2}}}
\def\half{\ifinner {\scriptstyle {1 \over 2}}%
          \else {\textstyle {1 \over 2}}\fi}
\def\bra#1{\langle#1\vert}%
\def\ket#1{\vert#1\/\rangle}%
\def\vev#1{\langle{#1}\rangle}%
\def\simge{%
    \mathrel{\rlap{\raise 0.511ex 
        \hbox{$>$}}{\lower 0.511ex \hbox{$\sim$}}}}
\def\simle{%
    \mathrel{\rlap{\raise 0.511ex 
        \hbox{$<$}}{\lower 0.511ex \hbox{$\sim$}}}}
\def\gtsim{\simge}%
\def\ltsim{\simle}%
\def\therefore{%
   \setbox0=\hbox{$.\kern.2em.$}\dimen0=\wd0
   \mathrel{\rlap{\raise.25ex\hbox to\dimen0{\hfil$\cdotp$\hfil}}%
   \copy0}}
\def\|{\ifmmode\Vert\else \char`\|\fi}          
\def\sterling{{\hbox{\it\char'44}}}     
\def\degrees{\hbox{$^\circ$}}%
\def\degree{\degrees}%
\def\real{\mathop{\rm Re}\nolimits}%
\def\imag{\mathop{\rm Im}\nolimits}%
\def\tr{\mathop{\rm tr}\nolimits}%
\def\Tr{\mathop{\rm Tr}\nolimits}%
\def\Det{\mathop{\rm Det}\nolimits}%
\def\mod{\mathop{\rm mod}\nolimits}%
\def\wrt{\mathop{\rm wrt}\nolimits}%
\def\diag{\mathop{\rm diag}\nolimits}%
\def\TeV{{\rm TeV}}%
\def\GeV{{\rm GeV}}%
\def\MeV{{\rm MeV}}%
\def\keV{{\rm keV}}%
\def\eV{{\rm eV}}%
\def\Ry{{\rm Ry}}%
\def\mb{{\rm mb}}%
\def\mub{\hbox{\rm $\mu$b}}%
\def\nb{{\rm nb}}%
\def\pb{{\rm pb}}%
\def\fb{{\rm fb}}%
\def\cmsec{{\rm cm^{-2}s^{-1}}}%
\def\units#1{\hbox{\rm #1}} 
\let\unit=\units
\def\dimensions#1#2{\hbox{$[\hbox{\rm #1}]^{#2}$}}
\def\parenbar#1{{\null\!
   \mathop{\smash#1}\limits
   ^{\hbox{\fiverm(--)}}%
   \!\null}}%
\def\nunubar{\parenbar{\nu}}
\def\ppbar{\parenbar{p}}
\def\buildchar#1#2#3{{\null\!
   \mathop{\vphantom{#1}\smash#1}\limits
   ^{#2}_{#3}%
   \!\null}}%
\def\overcirc#1{\buildchar{#1}{\circ}{}}
\def\sun{{\hbox{$\odot$}}}\def\earth{{\hbox{$\oplus$}}}
\def\slashchar#1{\setbox0=\hbox{$#1$}%
   \dimen0=\wd0
   \setbox1=\hbox{/} \dimen1=\wd1
   \ifdim\dimen0>\dimen1
      \rlap{\hbox to \dimen0{\hfil/\hfil}}%
      #1
   \else
      \rlap{\hbox to \dimen1{\hfil$#1$\hfil}}%
      /
   \fi}%
\def\subrightarrow#1{%
  \setbox0=\hbox{%
    $\displaystyle\mathop{}%
    \limits_{#1}$}%
  \dimen0=\wd0
  \advance \dimen0 by .5em
  \mathrel{%
    \mathop{\hbox to \dimen0{\rightarrowfill}}%
       \limits_{#1}}}%
\newdimen\vbigd@men
\def\vbigl{\mathopen\vbig}
\def\vbigm{\mathrel\vbig}
\def\vbigr{\mathclose\vbig}
\def\vbig#1#2{{\vbigd@men=#2\divide\vbigd@men by 2
   \hbox{$\left#1\vbox to \vbigd@men{}\right.\n@space$}}}
\def\Leftcases#1{\smash{\vbigl\{{#1}}}
\def\Rightcases#1{\smash{\vbigr\}{#1}}}
%% file: mtexsis.post - core TeXsis macros - TeXsis version 2.18
%  @(#) $Id: mtexsis.post,v 18.3 2001/04/21 16:47:12 myers Exp $
%======================================================================*
% First, null definitions for ``missing'' things from other parts of TeXsis
%
% Make double column stuff do nothing nicely:
%
\def\doublecolumns{\relax}\def\enddoublecolumns{\relax}
\def\leftcolrule{\relax}\def\rightcolrule{\relax}
\def\longequation{\relax}\def\endlongequation{\relax}
\def\newcolumn{\relax}
\def\widetopinsert{\topinsert}\def\widepageinsert{\pageinsert}
\def\forceleft{\relax}\def\forceright{\relax}   
\def\SetDoubleColumns#1{%
  \imsg{The double column macros are not a part of mTeXsis.}
  \imsg{If you want to use double column mode, get TXSdcol.tex}
  \imsg{and add \string\input\space TXSdcol.tex to your .tex file.}
}

% ...and other stuff that's not in mTeXsis:

\def\addTOC#1#2#3{\relax}\def\Contents{\relax}  % disable table of contents
\newif\ifContents                               % disable table of contents
\def\ContentsSwitchtrue{\Contentstrue}\def\ContentsSwitchfalse{\Contentsfalse}

\def\obsolete#1#2{\let#1=#2\relax #2}		% \obsolete is silent here

\let\Input=\input                               % TeXsis synonym
\newdimen\colwidth      \colwidth=\hsize        % default column width
\def\ORGANIZATION{}%                            % default is empty

% You shouldn't use style files that might not be around when using
% mTeXsis.  But we will try to be friendly about it...

\newhelp\@utohelp{%
loadstyle: The definition of the macro named above is actually contained^^J%
in a style file, and so it cannot be used with mTeXsis.  If you really^^J%
need to load the definition from that file, you should do so explicitly^^J%
at the begining of your manuscript file, with %
    '\string\input\space stylefilename.txs'^^J}

\Ignore
\def\loadstyle#1#2{% disable \loadstyle in mTeXsis
   \newlinechar=10                              % ^^J is line break
   \errhelp=\@utohelp                           % longer help message
   \emsg{> Whoops! Trying to load \string#1\space from style file #2.}%
   \errmessage{You cannot use macro definitions from style files in mTeXsis}}
\endIgnore

% -- These make mtexsis more friendly than TeX or TeXsis when printing
%    e-prints, but you won't find your errors as easily.

\hbadness=10000         % don't complain about overfull hboxes!
\overfullrule=0pt       % and don't mark them in the output!
\vbadness=10000         % and don't complain about vboxes either.

% -- Run time setup (in place of \everyjob):

\ATunlock
\SetDate				% sets \adate and \edate
\ReadAUX				% reads .aux file, if it exists
\def\fmtname{TeXsis}\def\fmtversion{2.18}% 
\def\revdate{21 April 2001}%   
\def\imsg#1{\emsg{\@comment #1}}%
\imsg{=========================================================== \@comment}
\imsg{This is mTeXsis, the core macros from TeXsis. }
\imsg{You can get the complete TeXsis package (and avoid this annoying}
\imsg{advertisement) from http://www.texsis.org/ or from CTAN.}
\imsg{============================================================ \@comment}
\emsg{m\fmtname\space version \fmtversion\space (\revdate)  loaded.}%
\ATlock					% lock internal @ macros
\texsis					% assumed, since they asked for it
%%>>> EOF mtexsis.tex <<<