% ****************************************************************************
% format for preprints of papers (for use with plain TeX)
% ****************************************************************************

% basic page layout

\magnification=\magstep0
\vsize=9.0truein
\hsize=6.0truein
\hoffset=0.3truein
\voffset=0.0truein
\baselineskip=6.0truemm
\def\doublespaced{\global\baselineskip=2\baselineskip}

% macros for section headings and equation numbers
 
\newcount\secnum
\secnum=0
\newcount\subsecnum
\newcount\eqnum

\def\sectionskip{\vfill\eject\vglue 0.0truein plus 1.0truein}
\def\section#1{\global\advance\secnum by 1 \subsecnum=96 \eqnum=0
    \sectionskip\noindent{\bf\the\secnum. #1}\nobreak\medskip\nobreak}

\def\nobreakatsection{\gdef\sectionskip{\goodbreak\vskip \baselineskip
    \vglue 0.0truein plus 0.2truein minus 0.2truein}}

\def\subsectionskip{\goodbreak\bigskip}
\def\subsection#1{\global\advance\subsecnum by 1
    \subsectionskip\noindent{\it \char\subsecnum. #1}\nobreak\medskip\nobreak}

\def\neweq{\global\advance\eqnum by 1 \the\secnum.\the\eqnum}
\def\sameq{\the\secnum.\the\eqnum}
\def\saveq#1{\xdef#1{\sameq}}

\def\extra#1{\vfill\eject\vglue 0.5truein plus 3.0truein minus 0.5truein
    \centerline{#1}\medskip}

\def\begintitlepage{\vglue 1.0truein plus 3.0truein minus 0.5truein
    \nopagenumbers
    \bgroup\parindent=0pt\leftskip=0pt plus1fill\rightskip=0pt plus1fill
    \obeylines}
\def\endtitlepage{\vglue 1.0truein plus 3.0truein minus 0.5truein
    \egroup\vfill\eject\footline={\hss\rm\folio\hss}}
\def\begintitle{\bgroup\parskip=\medskipamount\bf}
\def\endtitle{\egroup}
\def\author{\vskip 1.0truein plus 1.0truein minus 0.5truein}
\def\address{\bigskip}
\def\date{\vskip 1.0truein plus 1.0truein minus 0.5truein\today}

\def\beginabstract{\extra{ABSTRACT}}
\def\endabstract{\vfill\eject}

\newbox\figurebox\setbox\figurebox=\hbox{Figure 1.\enspace}
\newdimen\figwidth\figwidth=\wd\figurebox

\def\beginreferences{\extra{REFERENCES}
    \bgroup\leftskip=\figwidth\parindent=-\figwidth\parskip=\bigskipamount
    \tolerance=500
\def\ibid{\vrule height2.5pt depth-2pt width\figwidth}}
\def\endreferences{\egroup}

\def\begincaptions{\extra{FIGURE CAPTIONS}
    \bgroup\leftskip=\figwidth\parindent=-\figwidth\parskip=\bigskipamount}
\def\endcaptions{\egroup}

\def\acknowledgments{\goodbreak\vskip \baselineskip
    {\it Acknowledgments} }

% other macros and definitions
 
\def\text#1{{\rm #1}}
\def\frac#1#2{{{#1}\over{#2}}}
\def\bmatrix#1{\left[\matrix{#1}\right]}
\def\today{\number\day\space\ifcase\month\or
    January\or February\or March\or April\or May\or June\or
    July\or August\or September\or October\or November\or December\fi
    \space\number\year}