% BIMA NSF Proposal Document Style
%
% History:
%   06 Feb 96 jm  Original version
%   08 Mar 96 jm  Removed unnecessary argument in \reference definition.
%
%  This is based on:
% REPORT STANDARD DOCUMENT STYLE -- Released 14 January 1992
%    for LaTeX version 2.09
% Copyright (C) 1992 by Leslie Lamport

\typeout{BIMA NSF Proposal Document Style <06 Feb 96>.}

\def\contentsname{Table of Contents}
\def\listfigurename{List of Figures}
\def\listtablename{List of Tables}
\def\bibname{Bibliography}
\def\indexname{Index}
\def\figurename{Figure}
\def\tablename{Table}
\def\chaptername{Chapter}
\def\appendixname{Appendix}
\def\partname{Part}
\def\abstractname{Abstract}

\def\@ptsize{0}
\@namedef{ds@11pt}{\def\@ptsize{1}}
\@namedef{ds@12pt}{\def\@ptsize{2}}

\def\ds@twoside{\@twosidetrue
           \@mparswitchtrue}
\def\ds@draft{\overfullrule 5pt}

\def\ds@twocolumn{\@twocolumntrue}

\@options

%%\input bima1\@ptsize.sty\relax
%%--------------------------------------------------------------------%%
% BIMA NSF Proposal Document Style
%
% History:
%   06 Feb 96 jm  Original version
%
%  This is based on:
% REPORT STANDARD DOCUMENT STYLE -- Released 14 Jan 1992
%    for LaTeX version 2.09
% Copyright (C) 1992 by Leslie Lamport

\lineskip 1pt
\normallineskip 1pt
\def\baselinestretch{1}

\def\@normalsize{\@setsize\normalsize{14.5pt}\xiipt\@xiipt
\abovedisplayskip 12\p@ plus3\p@ minus7\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip  \z@ plus3\p@
\belowdisplayshortskip  6.5\p@ plus3.5\p@ minus3\p@
\let\@listi\@listI}

\def\small{\@setsize\small{13.6pt}\xipt\@xipt
\abovedisplayskip 11\p@ plus3\p@ minus6\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip  \z@ plus3\p@
\belowdisplayshortskip  6.5\p@ plus3.5\p@ minus3\p@
\def\@listi{\leftmargin\leftmargini
\parsep 4.5\p@ plus2\p@ minus\p@
            \itemsep \parsep
            \topsep 9\p@ plus3\p@ minus5\p@}}

\def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
\abovedisplayskip 10\p@ plus2\p@ minus5\p@
\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip  \z@ plus3\p@
\belowdisplayshortskip  6\p@ plus3\p@ minus3\p@
\def\@listi{\leftmargin\leftmargini
\topsep 6\p@ plus2\p@ minus2\p@\parsep 3\p@ plus2\p@ minus\p@
\itemsep \parsep}}

\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
\def\large{\@setsize\large{18pt}\xivpt\@xivpt}
\def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
\def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
\def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
\let\Huge=\huge

\newfont{\ss@font}{cmbxsl10 scaled\magstep1}

\normalsize

\if@twoside
   \oddsidemargin 0pt  %% 21pt
   \evensidemargin 0pt %% 59pt
   \marginparwidth 0pt %% 85pt
\else
   \oddsidemargin 0pt  %% 39.5pt
   \evensidemargin 0pt %% 39.5pt
   \marginparwidth 0pt %% 68pt
\fi
\marginparsep 10pt

\topmargin  0pt %% 27pt

\headheight 0pt %% 12pt
\headsep 0pt    %% 25pt
\topskip = 12pt

\footskip 30pt

\textheight = 43\baselineskip   %% 36\baselineskip
\advance\textheight by \topskip
\textwidth 470pt                %% 390pt

\columnsep 10pt
\columnseprule 0pt

\footnotesep 8.4pt

\skip\footins 10.8pt plus 4pt minus 2pt

\floatsep 14pt plus 2pt minus 4pt

\textfloatsep 20pt plus 2pt minus 4pt

\intextsep 14pt plus 4pt minus 4pt

\@maxsep 20pt

\dblfloatsep 14pt plus 2pt minus 4pt

\dbltextfloatsep 20pt plus 2pt minus 4pt

\@dblmaxsep 20pt

\@fptop 0pt plus 1fil

\@fpsep 10pt plus 2fil
\@fpbot 0pt plus 1fil

\@dblfptop 0pt plus 1fil

\@dblfpsep 10pt plus 2fil% Space between floats on float page.
\@dblfpbot 0pt plus 1fil

\marginparpush 7pt

\parskip 0pt plus 1pt

\parindent 2.0em   %% 1.5em

\partopsep 3pt plus 2pt minus 2pt

\@lowpenalty   51
\@medpenalty  151
\@highpenalty 301

\@beginparpenalty -\@lowpenalty

\@endparpenalty   -\@lowpenalty

\@itempenalty     -\@lowpenalty

\def\section{
   \par\addvspace{2.0ex plus-1ex minus -.2ex}
   \@afterindenttrue
   \secdef\@section\@ssection}

\def\@section[#1]#2{\ifnum \c@secnumdepth >\@ne
        \refstepcounter{section}%
        \addcontentsline{toc}{section}{\protect
        \numberline{\thesection}#1}\else
      \addcontentsline{toc}{section}{#1}\fi
   \sectionmark{#1}%
   {\centering
    \interlinepenalty \@M
    \reset@font\normalsize\bf #2\par}
    \nobreak
    \addvspace{2.3ex plus.2ex}
    \@afterheading
   }

\def\@ssection#1{
   {\centering
    \interlinepenalty \@M
    \reset@font\normalsize\bf #1\par}
    \nobreak
    \addvspace{2.3ex plus.2ex}
    \@afterheading
   }

%%+  Added chapter definition.
\def\chapter{\@startsection {chapter}{0}{\parindent}{3.5ex plus-1ex minus
     -.2ex}{2.3ex plus.2ex}{\reset@font\normalsize\bf}}

%% \def\section{\@startsection {section}{1}{\z@}{3.5ex plus-1ex minus
%%     -.2ex}{2.3ex plus.2ex}{\reset@font\Large\bf}}
%% \def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus-1ex
%%     minus-.2ex}{1.5ex plus.2ex}{\reset@font\large\bf}}
\def\subsection{\@startsection{subsection}{2}{\parindent}{3.25ex plus-1ex
    minus-.2ex}{-1.5em}{\reset@font\ss@font}}
%%    minus-.2ex}{-1.5em}{\reset@font\bf}}
\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
    -1ex minus-.2ex}{1.5ex plus.2ex}{\reset@font\normalsize\bf}}
\def\paragraph{\@startsection
    {paragraph}{4}{\z@}{3.25ex plus1ex minus.2ex}{-1em}{\reset@font
    \normalsize\bf}}
\def\subparagraph{\@startsection
    {subparagraph}{4}{\parindent}{3.25ex plus1ex minus
     .2ex}{-1em}{\reset@font\normalsize\bf}}

\def\chaptermark#1{}

\setcounter{secnumdepth}{0}   %% {2}

\def\appendix{\par
  \setcounter{chapter}{0}%
  \setcounter{section}{0}%
  \def\@chapapp{\appendixname}%
  \def\thechapter{\Alph{chapter}.}}

\leftmargini 2.5em
\leftmarginii 2.2em
\leftmarginiii 1.87em
\leftmarginiv 1.7em
\leftmarginv 1em
\leftmarginvi 1em

\leftmargin\leftmargini
\labelsep .5em
\labelwidth\leftmargini\advance\labelwidth-\labelsep

\def\@listI{\leftmargin\leftmargini \parsep 5\p@ plus2.5\p@ minus\p@
\topsep 10\p@ plus4\p@ minus6\p@
\itemsep 5\p@ plus2.5\p@ minus\p@}

\let\@listi\@listI
\@listi

\def\@listii{\leftmargin\leftmarginii
   \labelwidth\leftmarginii\advance\labelwidth-\labelsep
   \topsep 5\p@ plus2.5\p@ minus\p@
   \parsep 2.5\p@ plus\p@ minus\p@
   \itemsep \parsep}

\def\@listiii{\leftmargin\leftmarginiii
    \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
    \topsep 2.5\p@ plus\p@ minus\p@
    \parsep \z@ \partopsep \p@ plus\z@ minus\p@
    \itemsep \topsep}

\def\@listiv{\leftmargin\leftmarginiv
     \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}

\def\@listv{\leftmargin\leftmarginv
     \labelwidth\leftmarginv\advance\labelwidth-\labelsep}

\def\@listvi{\leftmargin\leftmarginvi
     \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}

%%\endinput
%%--------------------------------------------------------------------%%

\def\labelenumi{\theenumi.}
\def\theenumi{\arabic{enumi}}

\def\labelenumii{(\theenumii)}
\def\theenumii{\alph{enumii}}
\def\p@enumii{\theenumi}

\def\labelenumiii{\theenumiii.}
\def\theenumiii{\roman{enumiii}}
\def\p@enumiii{\theenumi(\theenumii)}

\def\labelenumiv{\theenumiv.}
\def\theenumiv{\Alph{enumiv}}
\def\p@enumiv{\p@enumiii\theenumiii}

\def\labelitemi{$\m@th\bullet$}
\def\labelitemii{\bf --}
\def\labelitemiii{$\m@th\ast$}
\def\labelitemiv{$\m@th\cdot$}

\def\verse{\let\\=\@centercr
  \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent
          \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
\let\endverse\endlist

\def\quotation{\list{}{\listparindent 1.5em
    \itemindent\listparindent
    \rightmargin\leftmargin\parsep \z@ plus\p@}\item[]}
\let\endquotation=\endlist

\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
\let\endquote=\endlist

\def\descriptionlabel#1{\hspace\labelsep \bf #1}
\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
       \let\makelabel\descriptionlabel}}

\let\enddescription\endlist

\newdimen\descriptionmargin
\descriptionmargin=3em

\def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
     \else \newpage \fi \thispagestyle{empty}\c@page\z@}

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

\arraycolsep 5pt

\tabcolsep 6pt

\arrayrulewidth .4pt
\doublerulesep 2pt

\tabbingsep \labelsep

\skip\@mpfootins = \skip\footins

\fboxsep = 3pt

\fboxrule = .4pt

\newcounter {part}
\newcounter {chapter}
\newcounter {section}[chapter]
\newcounter {subsection}[section]
\newcounter {subsubsection}[subsection]
\newcounter {paragraph}[subsubsection]
\newcounter {subparagraph}[paragraph]

\def\thepart          {\Roman{part}.}
\def\thechapter       {\arabic{chapter}.}
\def\thesection       {\thechapter\arabic{section}}
\def\thesubsection    {\thesection.\arabic{subsection}}
\def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
\def\theparagraph     {\thesubsubsection.\arabic{paragraph}}
\def\thesubparagraph  {\theparagraph.\arabic{subparagraph}}

\def\@chapapp{\chaptername}

\def\part{   %% \cleardoublepage
%%   \thispagestyle{plain}%
  \if@twocolumn
     \onecolumn
     \@tempswatrue
    \else \@tempswafalse
  \fi
  \global\@topnum\z@    %%++
  \@afterindenttrue     %%++
%%  \hbox{}\vfil
  \vspace{27\p@}        %%++
  \secdef\@part\@spart}

\def\@part[#1]#2{\ifnum \c@secnumdepth >-2\relax
        \refstepcounter{part}%

        \addcontentsline{toc}{part}{\thepart
        \hspace{1em}#1}\else

        \addcontentsline{toc}{part}{#1}\fi
   \markboth{}{}%
   {  %% \centering
    \parindent \z@ \raggedright %%+
    \interlinepenalty \@M
    \ifnum \c@secnumdepth >-2\relax
%%   \Huge \bf
      \normalsize\bf \thepart
      \hskip 1em                %%+
      \fi                       %%+
%%    \par
%%    \vskip 20\p@\fi
%%    \Huge \bf
    \normalsize\bf              %%+
    #2\par}\@endpart}

\def\@endpart{  %% \vfil\newpage
   \nobreak
   \vskip 12\p@       %%++
   \@afterheading     %%++
   \if@twoside
       \hbox{}%
       \thispagestyle{empty}%
       \newpage
   \fi
   \if@tempswa
     \twocolumn
   \fi}

\def\@spart#1{{  %% \centering
   \interlinepenalty \@M
%%   \Huge \bf
   \normalsize\bf
   #1\par}\@endpart}

\def\@pnumwidth{1.55em}
\def\@tocrmarg {2.55em}
\def\@dotsep{4.5}
\setcounter{tocdepth}{2}

\def\tableofcontents{\@restonecolfalse
  \if@twocolumn\@restonecoltrue\onecolumn\fi
  \chapter*{\contentsname
        \@mkboth{\uppercase{\contentsname}}{\uppercase{\contentsname}}}%
  \@starttoc{toc}\if@restonecol\twocolumn\fi}

\def\l@part#1#2{\addpenalty{-\@highpenalty}%
   \addvspace{2.25em plus\p@}% space above part line
   \begingroup
   \@tempdima 3em
     \parindent \z@ \rightskip \@pnumwidth
     \parfillskip -\@pnumwidth
     {\large \bf
     \leavevmode
     #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
     \nobreak
    \global\@nobreaktrue
    \everypar{\global\@nobreakfalse\everypar{}}%% suggested by

   \endgroup}

\def\l@chapter#1#2{\addpenalty{-\@highpenalty}%
   \vskip 1.0em plus\p@
   \@tempdima 1.5em
   \begingroup
     \parindent \z@ \rightskip \@pnumwidth
     \parfillskip -\@pnumwidth
     \bf
     \leavevmode
      \advance\leftskip\@tempdima
      \hskip -\leftskip
     #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par
     \penalty\@highpenalty
   \endgroup}

\def\l@section{\@dottedtocline{1}{1.5em}{2.3em}}
\def\l@subsection{\@dottedtocline{2}{3.8em}{3.2em}}
\def\l@subsubsection{\@dottedtocline{3}{7.0em}{4.1em}}
\def\l@paragraph{\@dottedtocline{4}{10em}{5em}}
\def\l@subparagraph{\@dottedtocline{5}{12em}{6em}}

\def\listoffigures{\@restonecolfalse
  \if@twocolumn\@restonecoltrue\onecolumn\fi
  \chapter*{\listfigurename\@mkboth{\uppercase{\listfigurename}}%
     {\uppercase{\listfigurename}}}\@starttoc{lof}\if@restonecol
    \twocolumn\fi}

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

\def\listoftables{\@restonecolfalse
  \if@twocolumn\@restonecoltrue\onecolumn\fi
  \chapter*{\listtablename\@mkboth{\uppercase{\listtablename}}%
   {\uppercase{\listtablename}}}\@starttoc{lot}\if@restonecol
  \twocolumn\fi}

\let\l@table\l@figure

\def\thebibliography#1{\chapter*{\bibname\@mkboth
  {\uppercase{\bibname}}{\uppercase{\bibname}}}\list
  {\@biblabel{\arabic{enumiv}}}{\settowidth\labelwidth{\@biblabel{#1}}%
    \leftmargin\labelwidth
    \advance\leftmargin\labelsep
    \usecounter{enumiv}%
    \let\p@enumiv\@empty
    \def\theenumiv{\arabic{enumiv}}}%
    \def\newblock{\hskip .11em plus.33em minus.07em}%
    \sloppy\clubpenalty4000\widowpenalty4000
    \sfcode`\.=\@m}

\def\endthebibliography{%
  \def\@noitemerr{\@warning{Empty `thebibliography' environment}}%
  \endlist}

\newif\if@restonecol

\def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
\columnseprule \z@
\columnsep 35\p@\twocolumn[\@makeschapterhead{\indexname}]%
    \@mkboth{\uppercase{\indexname}}{\uppercase{\indexname}}%
    \thispagestyle{plain}\parindent\z@
    \parskip\z@ plus .3\p@\relax\let\item\@idxitem}

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

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

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

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

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

\def\footnoterule{\kern-3\p@
  \hrule width .4\columnwidth
  \kern 2.6\p@}

\@addtoreset{footnote}{chapter}

\long\def\@makefntext#1{\parindent 1em\noindent
            \hbox to 1.8em{\hss$\m@th^{\@thefnmark}$}#1}

\setcounter{topnumber}{2}
\def\topfraction{.7}
\setcounter{bottomnumber}{1}
\def\bottomfraction{.3}
\setcounter{totalnumber}{3}
\def\textfraction{.2}
\def\floatpagefraction{.5}
\setcounter{dbltopnumber}{2}
\def\dbltopfraction{.7}
\def\dblfloatpagefraction{.5}

\long\def\@makecaption#1#2{%
   \vskip 5\p@   %% 10\p@
   \setbox\@tempboxa\hbox{#1: #2}%
%%   \ifdim \wd\@tempboxa >\hsize
   \@tempdimb\hsize\relax \advance\@tempdimb by -4em   %%+
   \advance\leftskip by 2em \advance\rightskip by 2em  %%+
   \ifdim \wd\@tempboxa >\@tempdimb                    %%+
       #1: #2\par
     \else
%%       \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
       \hbox to\@tempdimb{\box\@tempboxa\hfil}%        %%+
   \fi}

%%\newcounter{figure}[chapter]
%%\def\thefigure{\thechapter\@arabic\c@figure}
\newcounter{figure}
\def\thefigure{\@arabic\c@figure}

%%\def\fps@figure{tbp}
\def\fps@figure{htbp}
\def\ftype@figure{1}
\def\ext@figure{lof}
\def\fnum@figure{\figurename~\thefigure}
\def\figure{\@float{figure}}
\let\endfigure\end@float
\@namedef{figure*}{\@dblfloat{figure}}
\@namedef{endfigure*}{\end@dblfloat}

%%\newcounter{table}[chapter]
%%\def\thetable{\thechapter\@arabic\c@table}
\newcounter{table}
\def\thetable{\@arabic\c@table}

%%\def\fps@table{tbp}
\def\fps@table{htbp}
\def\ftype@table{2}
\def\ext@table{lot}
\def\fnum@table{\tablename~\thetable}
\def\table{\@float{table}}
\let\endtable\end@float
\@namedef{table*}{\@dblfloat{table}}
\@namedef{endtable*}{\end@dblfloat}

\input titlepag.sty

\mark{{}{}}

\if@twoside
\def\ps@headings{\let\@mkboth\markboth
 \def\@oddfoot{}\def\@evenfoot{}%       No feet.
 \def\@evenhead{\rm \thepage\hfil \sl \leftmark}%        Left heading.
 \def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}% Right heading.
 \def\chaptermark##1{\markboth {\uppercase{\ifnum \c@secnumdepth >\m@ne
      \@chapapp\ \thechapter \ \fi ##1}}{}}%
 \def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\z@
   \thesection. \ \fi ##1}}}}
\else
\def\ps@headings{\let\@mkboth\markboth
\def\@oddfoot{}\def\@evenfoot{}%     No feet.
\def\@oddhead{{\sl \rightmark}\hfil \rm\thepage}% Heading.
\def\chaptermark##1{\markright {\uppercase{\ifnum \c@secnumdepth >\m@ne
  \@chapapp\ \thechapter \ \fi ##1}}}}
\fi

\def\ps@myheadings{\let\@mkboth\@gobbletwo
 \def\@oddhead{{\sl\rightmark}\hfil \rm\thepage}%
 \def\@oddfoot{}\def\@evenhead{\rm \thepage\hfil\sl\leftmark}%
 \def\@evenfoot{}\def\chaptermark##1{}\def\sectionmark##1{}%
 \def\subsectionmark##1{}}

%%+ Create a bima page style.
\def\ps@bimapage{\let\@mkboth\@gobbletwo
     \let\@oddhead\@empty\def\@oddfoot{\reset@font\rm
     \hfil--\space\thepage\space--\hfil}
     \let\@evenhead\@empty\let\@evenfoot\@oddfoot}

\def\today{\ifcase\month\or
  January\or February\or March\or April\or May\or June\or
  July\or August\or September\or October\or November\or December\fi
  \space\number\day, \number\year}

\@addtoreset{equation}{chapter}

%%\def\theequation{\thechapter\arabic{equation}}
\def\theequation{\arabic{equation}}

%% \ps@plain
\ps@bimapage
\pagenumbering{arabic}
\if@twoside\else\raggedbottom\fi

\if@twocolumn
 \@@input twocolum.sty\relax
\else
 \onecolumn
\fi

%%+ The following was directly included from the AAS 4.0 macros
%%+ The macros were modified to include the ability to actually
%%+   include plot or not (addition of the macro \noplots).
%  ****************************************
%  *           EPS INCLUSIONS             *
%  ****************************************

% Include Rokicki's epsf.sty file explicitly.

\@ifundefined{epsfbox}{\@input{epsf.sty}}{\relax}

% Simplified EPS inclusion macros so we can see how this goes...
% These are layered on Rokicki's dvips material, and are dependent
% on the author's use of that DVI driver.
%
%    \plotone{EPSFILE}
%    \plottwo{EPSFILE}{EPSFILE}
%    \plotfiddle{EPSFILE}{VSIZE}{ROT}{HSF}{VSF}{HTRANS}{VTRANS}
%
% \plotone inserts the plot in a space that is \columnwidth wide; the
% plot is scaled so the horizontal dimension fits in the text width,
% and the vertical dimension is scaled to maintain the aspect ratio.
% \plottwo inserts two plots next to each other in one \columnwidth,
% sort of like "two-up" mode.
%
%    EPSFILE    name of file with EPS
%
% The following arguments are for the \plotfiddle macro which formats
% the \special itself, prepares vspace, etc.  This completely bypasses
% Rokicki's macros that attempt to rationalize the EPS BoundingBox with
% the LaTeX page dimensions.
%
%    VSIZE      vertical white space to allow for plot
%    ROT        rotation angle
%    HSF        horiz scale factor
%    VSF        vert scale factor
%    HTRANS     horiz translation
%    VTRANS     vert translation

%\epsfverbosetrue

%%+  Set up a macro to disable plotting for rough drafts.
\newif\if@bimaNoPlot \@bimaNoPlotfalse
\def\noplots{\global\@bimaNoPlottrue}
%%+

\def\eps@scaling{.95}
\def\epsscale#1{\gdef\eps@scaling{#1}}

%% \def\plotone#1{\centering \leavevmode
\def\plot@ne#1[#2]{\centering
    \if@bimaNoPlot
    \fbox{\vbox to #2{\vfil
    {\rm The figure of {\tt #1} has been omitted by the 'noplots' command}
    \vfil}}
    \else
    \leavevmode
    \epsfxsize=\eps@scaling\columnwidth \epsfbox{#1}
    \fi
}
\def\plotone#1{\@ifnextchar[{\plot@ne{#1}}{\plot@ne{#1}[1.0in]}}

%% \def\plottwo#1#2{\centering \leavevmode
\def\plottw@#1#2[#3]{\centering
    \if@bimaNoPlot
    \fbox{\vbox to #3{\vfil
    {\rm Figures {\tt #1} and {\tt #2} have been omitted by the 'noplots' command}
    \vfil}}
    \else
    \leavevmode
    \epsfxsize=.45\columnwidth \epsfbox{#1} \hfil
    \epsfxsize=.45\columnwidth \epsfbox{#2}
    \fi
}
\def\plottwo#1#2{\@ifnextchar[{\plottw@{#1}{#2}}{\plottw@{#1}{#2}[1.0in]}}

%% \def\plotfiddle#1#2#3#4#5#6#7{\centering \leavevmode
\def\plot@fiddle#1#2#3#4#5#6#7[#8]{\centering
    \if@bimaNoPlot
    \fbox{\vbox to #8{\vfil
    {\rm The figure of {\tt #1} has been omitted by the 'noplots' command}
    \vfil}}
    \else
    \leavevmode
    \vbox to#2{\rule{0pt}{#2}}
    \special{psfile=#1 voffset=#7 hoffset=#6 vscale=#5 hscale=#4 angle=#3}
    \fi
}
\def\plotfiddle#1#2#3#4#5#6#7{\@ifnextchar[{\plot@fiddle{#1}{#2}{#3}{#4}{#5}{#6}{#7}}{\plot@fiddle{#1}{#2}{#3}{#4}{#5}{#6}{#7}[1.0in]}}

%%
%% REFERENCES
%%
%    \begin{references}
%      \reference{ENTRY}
%    \end{references}
%
\def\references{
    \bgroup\parindent=\z@\parskip=\itemsep
    \advance \rightskip by 1em
    \def\refpar{\par\hangindent=3em\hangafter=1}}
\def\endreferences{\refpar\egroup}
\def\reference{\relax\refpar}

\endinput
