Appended to the end of this message you will find four files used to create
a TeX abstract for electronic submission to the American Mathematical
Society.

The beginning of each file is marked by "%+++START OF FILE:xxx" where "xxx"
is the file name of that particular file.  Divide this message into the
four files and name them as indicated. The instructions in these files will
describe how to input your abstract into a file which can be submitted to
the AMS, and instructions for how to submit the file electronically.

--------------------------------cut here----------------------------------

%+++START OF FILE: readme.doc

                      AMS Electronic Abstract Submission
			     Plain TeX Submissions


There are four files provided to aid you in the preparation of an AMS
abstract to be submitted in electronic form. They are:

     1).  readme.doc   --- the file you are now reading, which gives 
                           an overview of the submission process

     2).  amsabs.tex   --- the abstract header macro file---DO NOT
                           MAKE ANY CHANGES TO THIS FILE!!!

     3).  instruct.tex --- the TeX source file for documentation on using
                           the abstract header macros

     4).  example.tex  --- the file containing the AMS Electronic Abstract
                           Processing Information Section (necessary for the
                           processing of your abstract) and a template for 
                           preparing an electronic abstract file.


The actual macro definitions are contained in the file, amsabs.tex. First
copy this file to your TeX directory. NO changes should ever be made to it.

The instruct.tex file should be TeXed and printed to give you the instruc-
tions for preparing an abstract to submit electronically to the American
Mathematical Society (AMS).

To type your abstract, copy the example.tex file to another file name, for
example, abstract.tex. Then edit the new file (abstract.tex) and fill in
the  necessary data pertinent to you and the abstract. Make sure the top
section (Processing Information Section) is filled in completely, or the
processing of your abstract may be delayed.

It is very important that each line of your abstract be kept to less than
80 characters.

When your abstract is in its final form and ready to be sent to the AMS,
either send your abstract file (abstract.tex) via an electronic network
system  (e-mail) using the following INTERNET address:  
                                                ABS-SUBMIT@MATH.AMS.COM

or mail a diskette (IBM or Macintosh) containing your abstract.tex file to:

                        Abstracts
                        Editorial Department
                        American Mathematical Society
                        201 Charles Street
                        Providence, RI  02904   USA

If you have questions or problems with the electronic abstract header file,
you may contact the AMS Technical Support Group at 800-321-4AMS (321-4267)
or 401-455-4000.


%+++START OF FILE: instruct.tex
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%                                                                       %%
%%                     American Mathematical Society                     %%
%%               Plain TeX Electronic Abstract Instructions              %%
%%                                                                       %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%  instruct.tex							August 1990
%
%  This file contains instructions for plain TeX electronic submissions to
%  Abstracts of papers presented to the American Mathematical Society.
%
%  American Mathematical Society, Technical Support Group, P. O. Box 6248,
%        Providence, RI 02940
%  800-321-4AMS or 401-455-4080;  Internet: Tech-Support@Math.AMS.com
%
%  TeXing this file requires the following files:
%
%	amsabs.tex
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\immediate\write16{}
\immediate\write16{*********************************************************}
\immediate\write16{}
\immediate\write16{WARNING:}
\immediate\write16{Please keep all submissions under 80 characters per line!}
\immediate\write16{}
\immediate\write16{*********************************************************}
\immediate\write16{}



\font\bi=cmbxti10
\font\typew=cmtt10
\def\car{{\typew\char'136}}
\def\\{{\typew\char'134}}
\def\{{{\typew\char'173}}
\def\}{{\typew\char'175}}
\def\lbr{\hfill\break}
\def\command{\par\bgroup\leftskip=.5in\rightskip=.5in\bgroup\typew\noindent}
\def\endcommand{\egroup\par\egroup}
\def\filnam#1{{\tt#1}}

\overfullrule=0pt
\parskip=4pt plus2pt

\centerline{\bf Instructions for \TeX{}  Electronic Submissions to}
\vskip2pt
\centerline{\bi Abstracts of papers presented to the}
\vskip1pt
\centerline{\bi American Mathematical Society}
\footnote{}{\hskip-2em American Mathematical Society, April, 1989}

\vskip14pt
An electronic American Mathematical Society (AMS) abstract consists of
three main sections: the processing information section, the heading (or
topmatter) section, and the text (or document) section. The processing
information section is for AMS office use only and will not print when the
abstract file is \TeX{}ed. The topmatter section is printed in twelve-point
type with single line spacing and a left indentation of 1.5 inches. The
document section is also twelve point, but it has one-and-one-half line
spacing and no left indentation. Before the final publication, the abstract
will be reduced to 65\%.

The \TeX{} header file (\filnam{amsabs.tex}) contains macros that are
defined to typeset the abstract in the AMS abstract format when the
necessary commands are entered. This header file sets the {\typew\\hsize}
and {\typew\\vsize} so your abstract must fit on a single page after it is
\TeX{}ed using the \filnam{amsabs.tex} header. If your \TeX{}ed abstract is
more than one page, it is too long and should be rewritten to meet the AMS
requirements.

\vskip4pt

Preparing an abstract source file using the \TeX{} header is relatively
simple. If you have not already done so, copy the \filnam{example.tex} file
provided to a file called \filnam{abstract.tex}. Once you have an
\filnam{abstract.tex} file, you can edit it and enter the information for
the three sections.

\vskip3pt
\noindent{\bf The Processing Information Section}

The first section in the \filnam{abstract.tex} file is the processing
information section, which must be filled in completely. When you enter the
data in this section, be careful not to delete any of the percent signs
({\typew\%}) at the beginning of each line.  This information will not
print when the abstract file is \TeX{}ed; it is for AMS office use only.

\vskip3pt
\noindent{\bf The Topmatter Section}

The next section is the beginning of the actual \TeX{} file, and contains
the heading or topmatter section. The first two lines of this section are:

\command
\\input amsabs\lbr
\%\\proof
\endcommand

The {\typew\\input amsabs} imports the AMS abstract macros which will
format your \filnam{abstract.tex} file according to the AMS abstract style.
The {\typew\%\\proof} line is explained below, under the section called
``Special Cases.''

The next line, the {\typew\\topmatter} line, indicates the beginning of the
information specific to your abstract. The text entered between the
{\typew\\topmatter} and {\typew\\endtopmatter} lines will be set in the
author/address section of the typeset abstract. All the necessary commands
are included in the file, but the appropriate information will need to be
typed within the curly braces of each command. Punctuation must be entered
as part of the text of the appropriate commands. The general rules
regarding the use of punctuation within the author/address information are
given in the section called ``Author/address Punctuation.''

Type the author's name (and the appropriate punctuation) on the
{\typew\\author} line.
\command
\\author\{John E. Doe,\}
\endcommand

After the author's name, enter his/her address on the {\typew\\address}
line.
\command
\\address\{University of North State, Somewhere, NY 02001.\}
\endcommand
\noindent
Again, the ending punctuation must be supplied.

In the example file, there are commands provided for two authors and two
addresses. If there is only one author, delete the extra {\typew\\author}
and {\typew\\address} lines, or type a {\typew\%} before each of the
superfluous lines. If more than two authors and/or addresses are needed,
simply type additional {\typew\\author} and/or {\typew\\address} lines in
your file. (See the ``Special Cases'' section below.)

The final part of the topmatter
section is the title of the paper. Type the paper's title between the curly
braces on the {\typew\\title} line,
\command
\\title\{The title of the paper.\}
\endcommand
\noindent
with the ending period included as part of the title.

If this is a preliminary report, the {\typew\%} before the {\typew\\prelim}
command must be deleted.

The topmatter section is now complete and ends with the
{\typew \\endtopmatter} line.

\vskip3pt
\noindent{\bf The Text Section}

The final section, the text of the abstract, begins with the {\typew
\\document} line. Type the abstract, using whatever \TeX{} commands you
wish to use, between the {\typew\\document} line and the {\typew
\\enddocument} line. When all the text is entered, the final line of the
file must be the {\typew \\enddocument} line.

\vskip4pt plus 1pt
\noindent{\bf Author/address Punctuation}

\null\vbox{\parindent=0pt
\halign{#\hskip1.5em&\hbox{\vtop{\hsize=2.75in #}}\qquad
  &\hbox{\vtop{\hsize=3.25in\hfuzz=12pt\typew #}}\cr
%
\multispan2 For one author:\hfil\cr
&a comma always follows the author's last name and a period ends his/her
address.&\\author\{John Smith,\}\lbr
\\address\{University of State, Atown, NY  00111.\}\cr
\noalign{\vskip12pt}
\multispan2 For two authors and two addresses:\hfil\cr
&a comma follows each author's last name, a comma follows the address of
the first author and a period ends the second author's address.
&\\author\{John Smith,\}\lbr
\\address\{University of State, Atown, NY  00011,\}
\\author\{Joan Johnson,\}\lbr
\\address\{State University, Anytown, CA  90001.\}\cr
\noalign{\vskip3pt}
\multispan2 For two authors with the same address:\hfil\cr
&no comma after the first author's last name, but there should be a comma
following the second author's name. A period ends the address.
&\\author\{John Smith\}\lbr
\\author\{Joan Johnson,\}\lbr
\\address\{State University, Anytown, CA  90001.\}\cr
\noalign{\vskip12pt}
\multispan2 For three authors with three addresses:\hfil\cr
&a comma follows the last name of each author, a comma follows the
addresses of the first two authors, and a period follows the address of
the third author.&\\author\{John Smith,\}\lbr
\\author\{Joan Johnson,\}\lbr
\\author\{Mark Brown,\}\lbr
\\address\{University of State, Atown, NY  00011,\}
\\address\{State University, Anytown, CA  90001,\}
\\address\{Central College, Midtown, KS  22000.\}\cr
\noalign{\vskip3pt}
\multispan2 For three authors with two addresses:\hfil\cr
&list the author with the unique address first; a comma follows the
first author's last name and his/her address.
Do not enter any punctuation after the last name of the second
author. A comma follows the third author's last name. An empty address is
entered for the second author and the third address ends with a period.
&\\author\{John Smith,\}\lbr
\\author\{Joan Johnson\}\lbr
\\author\{Mark Brown,\}\lbr
\\address\{University of State, Atown, NY  00011,\}
\\address\{\}\lbr
\\address\{Central College, Midtown, KS  22000.\}\cr
}}

\break\vskip3pt
\noindent{\bf Special Cases}

For more than two authors and/or addresses in the topmatter section, enter
each additional author/address with a separate {\typew\\author}\{Author
Name\} command.  Do not type the word ``and'' in any of the {\typew
\\author} entries---\TeX{} will insert an ``and'' in the proper place when
the file is printed.

If both multiple authors and addresses occur, be sure to list the addresses
in the same order as the authors. This is true whenever there are two or
more authors and/or addresses. Multiple authors and address may be entered
either as

\vskip6pt
\tabskip=2em plus1fil
\halign{{\typew #\hfill}&\hfill #\hfill&{\typew #\hfill}\cr
      \\author\{First Author,\}&&\\author\{First Author,\}\cr
      \\address\{First Author's address,\}&or& \\author\{Second Author,\}\cr
      \\author\{Second Author,\}&& \\address\{First Author's address,\}\cr
      \\address\{Second Author's address.\}&&
        \\address\{Second Author's address.\}\cr
}

\noindent
Both of the last two examples of input will result in the same \TeX{}ed
output.

\noindent{\bf DO NOT TYPE:}


{\obeylines\obeyspaces
\typew\parskip=1pt

         \\author\{First Author,\}
         \\author\{Second Author,\}
         \\address\{Second Author's address.\}
         \\address\{First Author's address,\}
 }

\vskip2pt
\noindent
This would typeset the second author's address after the first author's
name and the first author's address after the second author's name.

The final printed abstract will be reduced, so the initial line length is
$8 {1\over 2}$ inches. Because of the margins required on most printers,
the lines of the abstract dvi files will run off the page when printed
unless the paper is printed in ``landscape'' mode (rotated 90$^\circ$). If
you wish to print your abstract for proofing purposes, but do not have a
printer that can print ``landscape'' copy, delete the \%\ before the
{\typew \\proof} command in your source file. In ``proof'' mode, \TeX{}
will set line lengths proportional for $8{1\over 2}''\times 11''$ paper, so
the printed abstract still must fit on one page. $\underline{\hbox{\bf
NOTE:}}$ Line endings will {\bf *not*} be the same in proof mode as they
will be in the final mode.

Following are two examples of \TeX{} abstract source files which were
formatted in proof mode. Both examples are from {\it Abstracts of papers
presented to the American Mathematical Society} (1988), Volume 9, Number 5.

\vfill\eject

{\obeylines\obeyspaces
\typew\baselineskip=12pt
\parskip=1pt
\\input amsabs
\\proof
\\topmatter
\\author\{David C. Fisher,\}
\\author\{Daniel C. Burnett\}
\\author\{Patricia D. Jungers,\}
\\address\{University of Colorado, Denver, CO 80202,\}
\\address\{\}
\\address\{Harvey Mudd College, Claremont, CA 91711.\}
\\title\{Fair Cost Allocation on a Parallel Processor.\}
\%\\prelim
\\endtopmatter
\\document

A method is proposed for fairly charging for the use of a parallel
processor. We used the following principle: \{\\it A fair scheme bills
users proportionally to the average increase in execution time caused by
inserting their job into a long job list.\} This charges both for the
resources used plus (or minus) the idle resources created (or consumed).
\null To obtain answers, simplifications are made. Jobs are assumed to be
time-sliced into subjobs of equal length which are scheduled by the
``next-fit'' bin packing algorithm. Also assume the resources required by
the jobs are independent and identically distributed.... \\enddocument }

\vskip.5in plus 2pt
\input amsabs
\def\pagelength{\vsize=9in}  
			% this is included only so example will print on
                        % same page as input--do not use in real abstract!
\proof
\topmatter
\author{David C. Fisher,}
\author{Daniel C. Burnett}
\author{Patricia D. Jungers,}
\address{University of Colorado, Denver, CO 80202,}
\address{}
\address{Harvey Mudd College, Claremont, CA 91711.}
\title{Fair Cost Allocation on a Parallel Processor.}
\endtopmatter
\document
A method is proposed for fairly charging for the use of a parallel
processor. We used the following principle: {\it A fair scheme bills users
proportionally to the average increase in execution time caused by
inserting their job into a long job list.} This charges both for the
resources used plus (or minus) the idle resources created (or consumed).

To obtain answers, simplifications are made. Jobs are assumed to be
time-sliced into subjobs of equal length which are scheduled by the
``next-fit'' bin packing algorithm. Also assume the resources required by
the jobs are independent and identically distributed....

\vfill\eject

{\obeylines\obeyspaces
\typew\baselineskip=12pt
\parskip=1pt
\\input amsabs
\\proof
\\topmatter
\\author\{W. E. Fitzgibbon,\}
\\address\{University of Houston, TX 77204,\}
\\author\{J. J. Morgan,\}
\\address\{Texas A\\\& M University, College Station, TX 77843,\}
\\author\{S. J. Waggoner,\}
\\address\{Furman University, Greenville, SC 29613.\}
\\title\{Quasilinear Systems of Reaction Diffusion Equations.\}
\\prelim
\\endtopmatter
\\document
We are concerned with the existence of solutions to systems of quasilinear
parabolic equations and the corresponding quasilinear elliptic systems.
Speaking in the roughest possible terms we emply the properties of a convex
function to control the growth of the reaction vector field. This in turn
allows the use of a scalar comparision function to dominate the summation
of the components of the system and thereby provides a-priori bounds for
the system. Classical arguments now guarantee the existence of solutions.
\\enddocument
}

\vskip.65in plus 2pt
\parindent=0pt
\topmatter
\author{W. E. Fitzgibbon,}
\address{University of Houston, TX 77204,}
\author{J. J. Morgan,}
\address{Texas A\&M University, College Station, TX 77843,}
\author{S. J. Waggoner,}
\address{Furman University, Greenville, SC 29613.}
\title{Quasilinear Systems of Reaction Diffusion Equations.}
\prelim
\endtopmatter

\document
We are concerned with the existence of solutions to systems of quasilinear
parabolic equations and the corresponding quasilinear elliptic systems.
Speaking in the roughest possible terms we emply the properties of a convex
function to control the growth of the reaction vector field. This in turn
allows the use of a scalar comparision function to dominate the summation
of the components of the system and thereby provides a-priori bounds for
the system. Classical arguments now guarantee the existence of solutions.
\enddocument


%+++START OF FILE: example.tex
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                      8/90
%                                                             (TeX Version)
%
%                            AMS ELECTRONIC ABSTRACT
%
%  PROCESSING INFORMATION SECTION
%
%                 (Place an X in appropriate [ ] where needed)
%
%
%   Method of Presentation:   [ ] in person at a meeting [ ] by title
%
%   Author [ ] is / [ ] is not willing to mail preprints.
%   [ ] Resubmission /[ ] Revision of an abstract previously submitted.
%
%   FOR A PAPER TO BE PRESENTED AT A MEETING*, PLEASE SUPPLY THE FOLLOWING:
%
%  To be presented in person by:
%                               -----------------------------------------
%  Place of meeting:
%                   -----------------------------------------------------
%  Date of meeting:                   Number of meeting:
%                  -------------------                  -----------------
%  (see inside front cover of "Notices" or "Abstracts" for details)
%
%
%  [ ] Member AMS    Member Code:
%                                 -----------------------------------------
%  [ ] Nonmember** (sponsored by member:                                  )
%                                        ----------------------------------
%
%  [ ] Contributed ten-minute paper     [ ] Invited address
%
%  [ ] Invited Paper for Special Session organized by:
%                                                      --------------------
%  Title of Special Session:
%                            ---------------------------------------------
%  [ ] Paper submitted for consideration in the Special Session named above;
%      if this paper cannot be scheduled in the Special Session, please
%
%   [ ] consider it for presentation in a session for contributed 10-minute
%       papers.
%   [ ] do not consider it for presentation in a session for contributed
%       10-minute papers.
%
%   [ ] MAA Contributed Paper for Session on 				   ,
%					    -------------------------------
%       organized by
%		    ------------------------------------
%
%  *Please notify the Associate Secretary or the Providence office as soon
%   as you can if it becomes impossible to make the presentation in person.
%
% **The sponsoring member must send verification of sponsorship to the
%   American Mathematical Society within one week of receipt of nonmember's
%   abstract. Verification may be in writing sent via surface mail or via
%   an electronic message sent to the AMS Abstract's INTERNET address:
%   ABS-SUBMIT@MATH.AMS.COM
%
% +-----------------------------------------------------------------------+
% |                                                                       |
% | Name of presenter:                                                    |
% |                   --------------------------------------------------  |
% |                                                                       |
% | Address*:                                                             |
% |         ------------------------------------------------------------  |
% |                                                                       |
% |         ------------------------------------------------------------  |
% |                                                                       |
% |         ------------------------------------------------------------  |
% |                                                                       |
% |         ------------------------------------------------------------  |
% |                                                                       |
% | Presenter's electronic address:                                       |
% |                                -------------------------------------  |
% |                                                                       |
% | *If no department is specified, Dept of Math will be assumed.         |
% +-----------------------------------------------------------------------+
%
%             Subject Classification Number (see Math. Reviews for listing)
%  ----------
%
***************************************************************************
%  [ ] Lecture at the Joint Summer Research Conference on 
%							  -----------------
%
%      --------------------------------------------------------------------
***************************************************************************
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


% TOPMATTER SECTION STARTS HERE

\input amsabs
%\proof

\topmatter
\author{ }
\address{ }
\author{ }
\address{ }
\title{ }
%\prelim
\endtopmatter

% TEXT SECTION STARTS HERE

\document
% Abstract text begins here


\enddocument

%+++END OF FILES
%+++START OF FILE: amsabs.tex
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%                                                                       %%
%%                     American Mathematical Society                     %%
%%               Plain TeX Electronic Abstract Header File               %%
%%                                                                       %%
%%                                                                       %%
%%            DO NOT ADD TO, DELETE FROM, OR ALTER IN *ANY* WAY          %%
%%                                                                       %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%  amsabs.tex                                                   August 1990
%
%  This file is the document definition (`style file') for the Abstracts
%  of papers presented to the American Mathematical Society.  It defines
%  only features which are specific to the Abstracts.
%
%  American Mathematical Society, Technical Support Group, P. O. Box 6248,
%        Providence, RI 02940
%  800-321-4AMS or 401-455-4080;  Internet: Tech-Support@Math.AMS.com
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\font\twelverm=cmr12
\font\twelveit=cmti12
\font\twelvei=cmmi12   \skewchar\twelvei='177
\font\twelvesl=cmsl12
\font\twelvebf=cmbx12
\font\twelvett=cmtt12
\font\twelvesy=cmsy10 scaled\magstep1  \skewchar\twelvesy='60
\font\ninerm=cmr9
\font\nineit=cmti9
\font\ninei=cmmi9    \skewchar\ninei='177
\font\ninesy=cmsy9   \skewchar\ninesy='60
\font\ninesl=cmsl9
\font\ninebf=cmbx9

\def\twelvepoint{\def\rm{\fam0\twelverm}%
  \textfont0=\twelverm \scriptfont0=\ninerm \scriptscriptfont0=\sevenrm
  \textfont1=\twelvei  \scriptfont1=\ninei  \scriptscriptfont1=\seveni
  \textfont2=\twelvesy \scriptfont2=\ninesy \scriptscriptfont2=\sevensy
  \textfont3=\tenex \scriptfont3=\tenex   \scriptscriptfont3=\tenex
  \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}%
  \normalbaselineskip=16pt
  \setbox\strutbox=\hbox{\vrule height8.5pt depth3.5pt width0pt}%
  \let\sc=\ninerm   \normalbaselines\rm}

\twelvepoint

\newif\iffinalmode      \finalmodetrue
\newif\ifabsnum         \absnumfalse

\def\final{\global\finalmodetrue\pagewidth\pagelength}
\def\proof{\global\finalmodefalse\pagewidth\pagelength}

\parindent=0pt
\parskip=0pt

\def\pagewidth{\iffinalmode \hsize=51.5pc
   \else \hsize=6.4in    % for 8 1/2" x 11" format
   \fi}

\def\pagelength{\iffinalmode  \vsize=24pc
   \else \vsize=5.36in   % for 8 1/2" x 11" format
   \fi}


\def\printheading{\printnum\setaddress\tit\prel}

\def\topmatter{\begingroup
   \iffinalmode
          \bigskip\leftskip=1.5in
   \else %%  for 8 1/2"x11":
          \bigskip\leftskip=1.2in\baselineskip=13pt
   \fi
   \baselineskip=14pt}
\def\endtopmatter{\par}

\def\printnum{\ifabsnum\leavevmode\llap{\hbox to 1.5in{\absnum\hfil}}\fi}

\def\prel{}
\def\rec{}
\def\tit{}
\def\received#1{\gdef\rec{\rm (Received #1)}}
\def\amsabsnum#1{\global\absnumtrue\gdef\absnum{\rm #1}}

\newcount\addresscount
\newcount\addressnum
\addresscount=0
\def\authorfont{\rm}
\def\address#1{\global\advance\addresscount by 1
   \expandafter\gdef\csname address\romannumeral\addresscount\endcsname
      {\rm\ignorespaces#1 }}

%       this current address macro will allow multiple authors
%
\newcount\authorcount
\newcount\tempcount
\newcount\authornum
\authorcount=0
\def\author #1{\global\advance\authorcount by 1
   \expandafter\gdef\csname author\romannumeral\authorcount\endcsname
      {\bf\ignorespaces#1\ }}


\def\setaddress{\nobreak
   \global\addressnum=0
   \global\authornum=0
   \global\tempcount=\authorcount
   \ifnum\tempcount>1 \advance\tempcount by -1 \fi
   \loop
      \ifnum\authornum<\tempcount \global\advance\authornum by 1
            \csname author\romannumeral\authornum\endcsname
         \ifnum\authorcount=\addresscount
            \csname address\romannumeral\authornum\endcsname\fi
   \repeat
   \loop
      \ifnum\authornum<\authorcount\global\advance\authornum by 1
         {\authorfont and}
         \csname author\romannumeral\authornum\endcsname
      \ifnum\authornum=\addresscount
            \csname address\romannumeral\authornum\endcsname \fi
         \ifnum\authornum>\addresscount
            \advance\addresscount by 1 \advance\addressnum by 1
            \csname address\romannumeral\addressnum\endcsname\fi
   \repeat
   \global\addresscount=0\global\authorcount=0}


\def\title#1{\gdef\tit{\it #1\ \rm}}
\def\prelim{\gdef\prel{\rm Preliminary report.}}

\def\document{\printheading\par\endgroup\parindent=2em\par\noindent\rm}
\def\enddocument{\rec\theend}

\let\theend=\bye

\nopagenumbers
\final

\endinput
