Here is what they are:

(For LaTeX users)
CPELATEX.STY     (blank LaTeX header file)

(For TeX users)
CPETEX.TEX       (blank article with header/footer info etc)
EMSTANFT.TEX     (standard times fonts)
STANMACS.TEX     (standard Wiley macros)
CPSTANMC.TEX     (standard CPE macros)
CPMAC011.TEX     (general style file for CPE)
EPSF.TEX         (needed to call in .eps figure files)

Content-Disposition: attachment; filename="CPELATEX.STY"

%trcom03.sty is version used for Vol1(2)

%Copy of epodd.sty amended for Transputer Communications Journal
%Amended by: Geeti Granger
%Date: 14 February 1993

%Amended by: Geeti Granger
%Date:       6 June 1993
%Action:     added \supinfsize for superior/inferior lower case letters

%Amended by: Geeti Granger
%Date:       13 June 1993
%Action:     added \occam

%Amended by: Geeti Granger
%Date:       21 July 1993
%Action:     change figure caption style 
%	     add occamsmall for use in footnotes
%	     add ISSN details

%Amended by: Geeti Granger
%Date:       25 July 1993
%Action:     add courier fonts

%Amended by: Geeti Granger
%Date:       31 October 1993
%Action:     add details of call for ttcverb.sty file

%Amended by: Geeti Granger
%Date:       13 February 1994
%Action:     to call in revised version of trueital that should achieve
             %Times italics in maths mode

%Amended by: Geeti Granger
%Date:       27 February 1994
%Action:     change font for \occam macros from bold Times to san serif
%Action:     change catchline to read CCC 1070--454 etc and 
%            not to include price of reproducing article


%**************************************
%To call in verbatim style to set text in 9pt courier
%**************************************
%use style file ttcverb.sty

%Font calls for Courier
\font\coursmall=pcrr at 7pt
\font\courviii=pcrr at 8pt
\font\courviiib=pcrb at 8pt
\font\courix=pcrr at 9pt
\font\courixb=pcrb at 9pt
\font\cour=pcrr at 10pt
\font\courb=pcrb at 10pt

%Font calls for bold Times in 8pt
\font\timesviiib=ptmb at 8pt

% I call this file trcom01.sty and I use it in my LaTeX file as
%       \documentstyle[trcom01,times]{article}
% There is also an trcom01.bst, invoked as
%       \bibliographystyle{trcom01}
% Also specify
%       \titlehead{Short title for paper}
%       \authorhead{Author Name(s)}
% The fields of \maketitle are further redefined:  
% \date is eliminated and \affiliation is added.
%
% Richard Furuta December 9, 1987
% Esther Lim revised July 1989
% Generalisations by David Evans, November 1989
% Revised by Richard Furuta, January 1990
% Revised by Geeti Granger and David Evans, 
% John Wiley & Sons, Chichester, April 1990 (version 1.1)

\typeout {LaTeX style for Transputer Communications, $Version: 1.00 $, $Date: 93/02/14 13:45:35 $ }

\@twosidetrue

% Usage is as shown below:
%
% \documentstyle[times,trcom01]{article}
% \title{Transputer Communications Sample Paper}
% \author{GEETI GRANGER}
% \titlehead{TRANSPUTER COMMUNICATIONS SAMPLE PAPER}
% \authorhead{G. GRANGER}
% \received{12 January 1993}
% \revised{4 February 1993}
% \trcom{1}{1}{AUGUST}{93}{1}{64}

% The following style file is also needed if you are using dvips with
% encapsulated PostScript inserts.
% \input epsf	  % EPSF (encapsulated PostScript) style for 
%                   including PS figures

\frenchspacing

% size requirements
\def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
\abovedisplayskip 10pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt}
\def\small{\@setsize\small{9pt}\ixpt\@ixpt}
\abovedisplayskip 10pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@\belowdisplayshortskip 6pt

\def\footnotesize{\@setsize\footnotesize{9pt}\viiipt\@viiipt
\abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
2pt
\def\@listi{\topsep 6pt\parsep0pt
\itemsep \parsep}}

\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
\def\Tiny{\@setsize\tiny{8pt}\viipt\@viipt}
\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
\normalsize 

% baseline for section is set at 12 because I need 13 and can't get it
% easily another way (see redefinition of section, etc.)
\def\headsize{\@setsize\sectsize{11pt}\ixpt\@ixpt}      % for page header
\def\footsize{\@setsize\sectsize{9pt}\viiipt\@viiipt}   % for page footer
\def\sectsize{\@setsize\sectsize{12pt}\xpt\@xpt\bf\appendixstr}     % for section heads
\def\subsectsize{\@setsize\subsectsize{12pt}\xpt\@xpt\bf} % for section heads
\def\subsubsectsize{\@setsize\subsubsectsize{12pt}\xpt\@xpt\it} % for section heads
\def\summsize{\@setsize\summsize{10pt}\ixpt\@ixpt\bf}   % for summary
\def\abstsize{\@setsize\abstsize{10pt}\ixpt\@ixpt\bf}   % for abstract
\def\captsize{\@setsize\captsize{9pt}\ixpt\@ixpt}      % for captions
\def\titlesize{\@setsize\titlesize{16pt}\xviipt\@xviipt\bf} %for title
\def\authsize{\@setsize\authsize{9pt}\viiipt\@viiipt}  % author size
\def\affilsize{\@setsize\affilsize{9pt}\viiipt\@viiipt\it}      % affiliation
\def\refsize{\@setsize\refsize{10pt}\ixpt\@ixpt}        % references
\def\keysize{\@setsize\affilsize{9pt}\viiipt\@viiipt}   % key words
\def\supinfsize{\@setsize\supinfsize{8pt}\viipt\@viipt}   % superiors/inferiors
\def\progsize{\@setsize\progsize{10pt}\ixpt\@ixpt} %for program listings
\def\tablesize{\@setsize\progsize{9pt}\ixpt\@ixpt} %for tables
\setcounter{secnumdepth}{3}

% define medium rule
\def\medline{\noalign{\hrule height .75pt}}
\def\tmedline{\noalign{\hrule height 0.25pt}}
\def\tspace#1{\noalign{\vskip #1}}
\def\ds{\cr\noalign{\vskip 5pt}}

% - redefine the citation style to put spaces after the commas
% redefine the citation style to put spaces after the commas
\def\@citex[#1]#2{\if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi
  \def\@citea{}\@cite{\@for\@citeb:=#2\do
    {\@citea\def\@citea{,}\@ifundefined
       {b@\@citeb}{{\bf ?}\@warning
       {Citation `\@citeb' on page \thepage \space undefined}}%
\hbox{\csname b@\@citeb\endcsname}}}{#1}}

% new field for the title
\def\affiliation#1{\gdef\@affiliation{#1}}

%title's spacing
\def\titlesp{\list{}{\leftmargin0pc}\item[]}
\let\endtitlesp=\endlist

% Alas we have to modify \maketitle to avoid resetting the footnote counter
% The original definition was from 
% article.sty 16-Mar-88
\def\@makefnmark{\hbox to 0pt{$^{\rm \@thefnmark}$\hss}}
\def\maketitle{\par
 \begingroup
%\def\thefootnote{\fnsymbol{footnote}}
\def\@makefnmark{\hbox
 to 0pt{$^{\rm \@thefnmark}$\hss}}
 \if@twocolumn 
 \twocolumn[\@maketitle] 
 \else \newpage
 \global\@topnum\z@ \@maketitle \fi\thispagestyle{plain}\@thanks
 \endgroup
% \setcounter{footnote}{0}
 \let\maketitle\relax
 \let\@maketitle\relax
 \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax}

% title needs adjusting, no date in title
\def\@maketitle{\newpage
 \null
% \vskip 48pt                   % Vertical space above title.  65pt - 17pt
%                               % (adjust for following baseline)
 \vspace*{-30pt}                % ? assume 24 point after heading rule
 \begin{titlesp}
  {\titlesize \@title \par}
  \vskip 10pt                   % Vertical space after title. 18 pt (24-14)
  {\authsize \@author \par}
% there should be 18 pts between author and affiliation baselines
  \vskip 3pt                    % Vertical space after author.  12pt - 9pt
  {\affilsize\it \@affiliation \par}
  \vskip 11.6pt                 % 12pt = 11.6 + 0.4rule
  \hrule                        %  point rule
\end{titlesp}
 \par
 \vskip 20pt}                   % Vertical space after title.  26pt - 10pt
%******
\def\maketitle{\relax}
\def\title#1{{\titlesize #1 \par}
	\vskip 10pt           % Vertical space after title. 24 pt (24-14)
}
\def\author#1{{\authsize #1 \par}
% there should be 18 pts between author and affiliation baselines
%% for some reason adding this \vskip puts in too much space; leave it
%% out for now
%RKF  \vskip 3pt                    % Vertical space after author.  12pt - 9pt
}
\def\affiliation#1{{\affilsize\it #1 \par}}
\def\twoauthor{%
% begin title
% this first part was extracted from \maketitle
\par
 \begingroup
% \def\thefootnote{\fnsymbol{footnote}}
\def\@makefnmark{\hbox
 to 0pt{$^{\@thefnmark}$\hss}}
% this comes from \@maketitle
\newpage
 \null
% \vskip 48pt                   % Vertical space above title.  65pt - 17pt
%                               % (adjust for following baseline)
 \vspace*{-30pt}                % ? assume 24 point after heading rule
 \begin{titlesp}
}
\def\endtwoauthor{%
% end title
% this part comes from \@maketitle
  \vskip 11.6pt                 % 12pt = 11.6 + 0.4rule
  \hrule                        %  point rule
\end{titlesp}
 \par
 \vskip 20pt
% this part was extracted from \maketitle
\thispagestyle{plain}\@thanks
 \endgroup
% \setcounter{footnote}{0}
 \let\maketitle\relax
 \let\@maketitle\relax
 \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax}

%******
% modify the sectioning commands as is appropriate for style.  Adjusting
% for baselines again to get 18 pt above and 6 pt below
\def\thesection {\arabic{section}.}
\def\thesubsection {\thesection \arabic{subsection}.}
\def\thesubsubsection {\thesubsection  \arabic{subsubsection}.}
\def\theparagraph {\thesubsubsection.\arabic{paragraph}}
\def\thesubparagraph {\theparagraph.\arabic{subparagraph}}

\def\section{\@startsection {section}{1}{\z@}{-18pt}{6pt}{\sectsize}}  %18 above 6 below
\def\subsection{\@startsection{subsection}{2}{\z@}{-18pt}{6pt}{\subsectsize}}  %18 above, 6 below
\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-18pt}{6pt}{\subsubsectsize}}  %18 above, 6 below
\def\paragraph{\@startsection
{paragraph}{4}{\z@}{6pt plus 2pt minus 2pt}{-1em}{\normalsize\bf}}
\def\subparagraph{\@startsection
{subparagraph}{4}{\parindent}{6pt plus 2pt minus
2pt}{-1em}{\normalsize\bf}}

% modify the appendix command to change the style of the subsequent sections
\def\appendixstr{}
\def\appendix{\par\noindent\ignorespaces
 \setcounter{section}{0}
 \setcounter{subsection}{0}
 \def\thesection{\Alph{section}}
 \def\appendixstr{\noindent\ignorespaces APPENDIX }}

% define a new environment for use in setting the summary
\def\summary{\summsize{\noindent SUMMARY}\par\vspace{2pt}%
{\leftmargin0pc}\noindent\ignorespaces}
\def\endsummary{\endlist}%\vskip-7pt

% for old versions:
\def\summ{\summary}
\def\endsumm{\endsummary}

% make abstract the same as the summary
\def\abstract{\summary}
\def\endabstract{\endsummary}

% define a new environment for use in setting the abstract
\def\abst{\list{}{\leftmargin0pc}\abstsize\item[]}
\def\endabst{\endlist\vskip-7pt}

% for acknowledgements
\def\acknowledgements{\section*{\bf ACKNOWLEDGEMENTS}}
\def\ack{\acknowledgements}

% need a period after section numbers
\def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth
     \def\@svsec{}\else 
     \refstepcounter{#1}\edef\@svsec{\csname the#1\endcsname{}\hskip 1em }\fi
     \@tempskipa #5\relax
      \ifdim \@tempskipa>\z@ 
        \begingroup #6\relax
          \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty \@M #8\par}
        \endgroup
       \csname #1mark\endcsname{#7}\addcontentsline
         {toc}{#1}{\ifnum #2>\c@secnumdepth \else
                      \protect\numberline{\csname the#1\endcsname}\fi
                    #7}\else
        \def\@svsechd{#6\hskip #3\@svsec #8\csname #1mark\endcsname
                      {#7}\addcontentsline
                           {toc}{#1}{\ifnum #2>\c@secnumdepth \else
                             \protect\numberline{\csname the#1\endcsname}\fi
                       #7}}\fi
     \@xsect{#5}}

% bibliography stuff

\def\thebibliography#1{\section*{\bf REFERENCES\@mkboth
 {\eightrm REFERENCES}{\eightrm REFERENCES}}\refsize\list
 {\arabic{enumi}.~}{\settowidth\labelwidth{0#1.~}\leftmargin\labelwidth
 \itemsep0pt% plus 1pt
% \parindent=0pt  %made no difference
%\advance\leftmargin-1em   %made no difference  %\labelsep
 \parsep0pt\itemsep0pt
 \usecounter{enumi}}
 \def\newblock{\hskip .11em plus .33em minus .07em}
 \sloppy\clubpenalty4000\widowpenalty4000\interlinepenalty=100
 \sfcode`\.=1000\relax}
\let\endthebibliography=\endlist
\def\@biblabel#1{#1.\hfill}
%\def\@cite#1{\thinspace[{#1}]}

% here is a useful little macro that lets you access citation numbers
% use it as in \citestr{CiteKey}
\def\citestr#1{\nocite{#1}\csname b@#1\endcsname}

% here is a useful little macro that lets you access citation numbers
% use it as in \citestr{CiteKey}
\def\citestr#1{\nocite{#1}\csname b@#1\endcsname}

% figure spacings
%    ONE-COLUMN MODE OR SINGLE-COLUMN FLOATS IN TWO-COLUMN MODE:
%\textfloatsep 13pt plus 2pt minus 4pt    % Space between main text and floats
%                                         % at top or bottom of page.
%\@maxsep 13pt                            % The maximum of \floatsep, 
                                         % \textfloatsep and \intextsep (minus
                                         % the stretch and shrink).



% figure spacings
%    ONE-COLUMN MODE OR SINGLE-COLUMN FLOATS IN TWO-COLUMN MODE:
\textfloatsep 0pt plus 0pt minus 0pt    % Space between main text and floats
                                         % at top or bottom of page.
\@maxsep 0pt                            % The maximum of \floatsep, 
                                         % \textfloatsep and \intextsep (minus
                                         % the stretch and shrink).



\def\fnum@table{\captsize\rm Table \thetable}
\def\fnum@figure{\captsize\it Figure \thefigure}

% Modified by DRE 6-1-1995
% caption is fully justified, except last line which is centred
\long\def\@makecaption#1#2{%
  {\vspace{-12pt}\trivlist\parsep\parskip\parindent\z@\item[]%
  \setbox0=\vbox{\baselineskip=10pt{\captsize\it #1.\hspace{9pt}#2\normalsize}}%
  \setbox0=\vbox{\unvbox0 \setbox1=\lastbox%
  \setbox1=\hbox to \textwidth{\hfill \unhbox1\hfill}\box1}%
  \box0\endtrivlist}}


% figure placement modifications
\setcounter{topnumber}{1}
\def\bottomfraction{0.01}



% header title for lefthand pages
\def\titlehead#1{\gdef\@titlehead{#1}}

% author title for righthand pages
\def\authorhead#1{\gdef\@authorhead{#1}}

% print integer as a zero filled 2 digit field
\def\twodigits#1{\ifnum #1 < 10{0#1}\else{#1}\fi}

% print integer as a zero filled 4 digit field
\def\fourdigits#1{\ifnum #1 < 10{000#1}\else
  \ifnum #1 < 100{00#1}\else
    \ifnum #1 < 1000{0#1}\else{#1}\fi
  \fi
\fi}

% price is US $5 plus $0.50 per page

\def\price#1{\count200=50 \multiply\count200 by #1%
\count201=\count200
\divide\count201 by 100% dollars
\advance\count201 by 5
\divide\count200 by 10
\ifodd\count200 \count200=50\else\count200=0\fi
\def\dollars{\the\count201}%
\def\cents{\the\count200}%
{\dollars.\twodigits{\cents}}%
}

%Macro copied fron lplain and amended to give Times c
%\def\copyright{{\ooalign{\hfil\raise.07ex\hbox{\sevenrm c}\hfil\crcr\mathhexbox20D}}}

% trcom: args are: volume, number, month, year (2 digits), first page number,
%         last page number

\def\trcom#1#2#3#4#5#6{
\gdef\mymainhead{\headsize CONCURRENCY: PRACTICE AND EXPERIENCE, VOL. #1(#2), #5--#6 (#3 19#4)\hfil}
\setcounter{page}{#5}
\newcounter{pageone}
\setcounter{pageone}{#5}
\newcounter{lastpage}
\setcounter{lastpage}{#6}
\newcounter{pages}
\setcounter{pages}{461}
\addtocounter{pages}{\thelastpage}
\addtocounter{pages}{-\thepageone}
\gdef\@myref{\footsize CCC 1040--3108/#4/%
  \twodigits{#2}\fourdigits{#5}--{20}}
%  \twodigits{#2}\fourdigits{#5}--\twodigits{\thepages}}
\gdef\@mycopyright{\footsize\copyright 19#4 by John Wiley \& Sons, Ltd.}
}

%footer stuff
\gdef\received#1{\gdef\@myreceive{\footsize\it Received #1}}
\gdef\revised#1{\gdef\@myrevise{\footsize\it Revised #1}}
\gdef\accepted#1{\gdef\@myrevise{\footsize\it Accepted #1}}

\def\myfootnote{%
\vbox{\footnotesize
\hbox{\vrule height 0pt depth 0pt width0pt}
\ifodd\count202\relax\else\ifnum\thepageone=\thepage%
\hbox to \textwidth{\leaders\hrule height 0.8pt\hfill}%
\fi%
%\else\vskip 24pt%
\fi
\hbox to \textwidth{\noindent
\@myref\hfill\@myreceive}
\hbox to \textwidth{\noindent \@mycopyright \hfill
\@myrevise}}}

%\def\myfootnote{\footnotesize\vbox{
%\hbox{\vrule height 0pt depth 0pt width0pt}
%\hbox to \textwidth{\leaders\hrule height 0.8pt\hfill}
%\hbox to \textwidth{\noindent 
%\@myref\hfill\@myreceive} 
%\hbox to \textwidth{\noindent \@mycopyright \hfill
%\@myrevise}}}

% pagestyle
% the definition of \@oddfoot below is a hack to try and get the
% page length right after the first page.  It seems to work.
\def\ps@trcomfirst{\let\@mkboth\@gobbletwo%
     \def\@oddhead{\mymainhead}%
     \def\@oddfoot{\myfootnote\global\textheight\ntextheight}%
     \def\@evenhead{\mymainhead}}%
%     \let\@evenfoot\@oddfoot}
\let\ps@empty\ps@trcomfirst
\let\ps@plain\ps@trcomfirst

\def\ps@trcom{\let\@mkboth\@gobbletwo%
     \def\@oddhead{\normalsize\rm{\viiipt\@titlehead}\hfil\xpt\thepage}%
     \def\@oddfoot{\sysdetails}
     \def\@evenhead{\normalsize\rm\xpt\thepage\viiipt\hfil{\@authorhead}}%
     \let\@evenfoot\@oddfoot}

% Original from LATEX VERSION 2.09 <4 Aug 1988>
\def\@outputpage{\begingroup\catcode`\ =10 
     \let\-\@dischyph \let\'\@acci \let\`\@accii \let\=\@acciii
    \if@specialpage 
     \global\@specialpagefalse\@nameuse{ps@\@specialstyle}\fi
     \if@twoside 
       \ifodd\count\z@ \let\@thehead\@oddhead \let\@thefoot\@oddfoot
            \let\@themargin\oddsidemargin
          \else \let\@thehead\@evenhead
          \let\@thefoot\@evenfoot \let\@themargin\evensidemargin
     \fi\fi
     \shipout
     \vbox{\normalsize \baselineskip\z@ \lineskip\z@ 
           \let\par\@@par %% 15 Sep 87
           \vskip \topmargin \moveright\@themargin
           \vbox{\setbox\@tempboxa
                   \vbox to\headheight{\vfil \hbox to\textwidth
                                       {\let\label\@gobble \let\index\@gobble
                                         \@thehead}
                                        \vskip 22pt %added RKF
                                        \hbox to\textwidth %added RKF
                                        {\leaders\hrule height 0.8pt\hfill}%added RKF
                                                } %% 22 Feb 87
                 \dp\@tempboxa\z@
                 \box\@tempboxa
                 \vskip \headsep
                 \box\@outputbox
                 \baselineskip\footskip
                 \hbox to\textwidth{\let\label\@gobble 
                           \let\index\@gobble  %% 22 Feb 87
                           \@thefoot}}}\global\@colht\textheight
           \endgroup\stepcounter{page}\let\firstmark\botmark
           }

% heading needs a bar

\headheight 32pt \headsep 14pt

% text area is 127 mm wide by 166 mm high.  Use 11pt on 14.
\marginparwidth 0pt
\oddsidemargin  45pt
\evensidemargin  45pt
\marginparsep 0pt
% \footskip 0pt
% \footheight 0pt

\topmargin   0pt

\newdimen\ftextheight
\newdimen\ntextheight
% height is 588 points - (28+14) + 14 (baseline adjustment)
\textwidth 360pt \ntextheight 564pt%%%why was this commented out?
\ftextheight\ntextheight
\advance\ftextheight -24pt

\parindent 1em
% should be unnecessary because of redefinition of normalsize
% \baselineskip 13pt

\pagestyle{trcom}

\count202=0
\def\footnoterule{\global\advance\count202 by 1\kern-3\p@
  \hrule height 0.8pt\kern 2.2\p@} % this \hrule is .8pt high

\long\def\@makefntext#1{\ifnum\thefootnote<10\hangindent7pt\else\hangindent9pt\fi
$^{\rm\@thefnmark}$ #1}

% Print system details in footline -- first calculate time!
%\newcount\hour
%\newcount\minute
%\hour=\time
%\divide\hour by 60
%\minute=\hour
%\multiply\minute by 60
%\advance\minute by -\time
%\minute=-\minute

%\def\sysdetails{\hss\number\day/\number\month/\number\year\ %
%\twodigits{\number\hour}:\twodigits{\number\minute}\ \stage\ \jobname\hss}
%\def\stage{\hbox{PAGE PROOFS}}

% Figure space modifications
\def\figbreak{\break\vspace{-24pt}}
\def\figfill{\vspace{-36pt}\vfill}

% Macro for keywords -- separate key words by \quad space.
\def\keywords#1{{\vskip 16pt\par\keysize{\noindent\rm KEY WORDS\ksp}#1%
  \vskip 12pt \normalsize\par\noindent}}
\def\ksp{\quad}

\thispagestyle{trcomfirst}
\textheight\ftextheight

% let more of the page be taken up with figures
\def\topfraction{.9}
\def\dbltopfraction{.9}
\def\textfraction{.1}
\def\bottomfraction{.9}

% THE \LaTeX LOGO IS DEFINED HERE.
%
\def\LaTeX{{\rm L\kern-.36em\raise.3ex\hbox{\sc A}\kern-.15em
    T\kern-.1667em\lower.7ex\hbox{E}\kern-.125emX}}

%Macros for standard terms likely to be used a lot.

\def\occamthrtitle{{\LARGE\sf occam3}}
\def\occam{{\sf occam}}
\def\occamtw{{\sf occam2}}
\def\occamthr{{\sf occam3}}
\def\occamsmall{{\Tiny\sf occam}}
\def\occamtwsmall{{\Tiny\sf occam2}}
\def\occamthrsmall{{\Tiny\sf occam3}}

%Macro for :=
\def\colequal{:\lower0.1ex\hbox{=}}

%For variable spacing
\def\flexiblehalf{\vspace{6pt plus 3pt minus 3pt}}
\def\flexible{\vspace{12pt plus 3pt minus 3pt}}
\def\flexibleless{\vspace{-12pt plus 3pt minus 3pt}}

%**************************************
%To achieve Times italic in maths mode
%**************************************
\input trueital





\newcount\@enumdepth \@enumdepth = 0
 
\@definecounter{enumi}
\@definecounter{enumii}
\@definecounter{enumiii}
\@definecounter{enumiv}
 
\def\enumerate{\ifnum \@enumdepth >3 \@toodeep\else
      \advance\@enumdepth \@ne
      \edef\@enumctr{enum\romannumeral\the\@enumdepth}\list
      {\csname label\@enumctr\endcsname}{\usecounter
        {\@enumctr}\def\makelabel##1{\hss\llap{##1}}}\fi}
 
\let\endenumerate =\endlist
 
%\def\figimportcen#1#2{% #1 figure number
%			  #2 figure caption
% defines \epsfxsize to be #4 of the natural width
%\def\epsfsize##1##2{#2##1}%

%			\vbox{% keep it all together!
%			\vskip12pt
%			\centerline{\epsfbox{#2}}
%                       {\small  
%                        \vskip12pt
% a trick from Eijkhout to centre last line of the paragraph
% automatically 
%			\leftskip=0cm plus 0.5fil
%			\rightskip=0cm plus -0.5fil
%			\parfillskip 0cm plus 1fil
%			\noindent #1 #2\par}}
%			\vskip12pt}
%\def\caption#1#2{% fig num
%			   % real caption

%\figimportcen{Figure #1.}{#2}}
%\centerline{\it Figure #1.}{\it #2}}






% Print system details in footline -- first calculate time!
\newcount\hour
\newcount\minute
\hour=\time
\divide\hour by 60
\minute=\hour
\multiply\minute by 60
\advance\minute by -\time
\minute=-\minute

\def\sysdetails{\hss\number\day/\number\month/\number\year\ %
\twodigits{\number\hour}:\twodigits{\number\minute}\ \stage\ \jobname\hss}
\def\stage{\hbox{PAGE PROOFS}}

\def\noteq{\vbox{\overfullrule=0pt\hbox{\hbox to 0pt{\courix\char'075}\courix\char'057}}\relax}
\let\ne=\noteq
\let\neq=\noteq

--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="CPETEX.TEX"

%*******************
%HEADING LEVELS
%\HEADA---CAPS: \HEADANO---{NUMBER}{CAPS}
%\HEADB---INIT.CAP ONLY:\HEADBNO---{NUMBER}{INIT.CAP}
%\HEADC---INIT.CAP ONLY: \HEADCNO---{NUMBER}{INIT.CAP}
%FIG.CAPS---LAST LINE CENTRED, ETC.
%TABLE CPS---LAST LINE CENTRED, ETC
%*******************
\input emstanft.tex
\input stanmacs.tex
\input c:/arbortxt/macdir/cpstanmc.tex
\input cpmac011.tex
\input epsf.tex


\font\tencm=pcrr at 10pt

%DETAILS WILL NEED AMENDING
\fprh{7}{0}{000--000}{MONTH 1995}

\pageno=1

%RUNNING HEADLINE DETAILS
\headline={\tenrm\baselineskip=12pt\vbox{\ifnum\pageno=1\copy5\hfill
          \else
          \ifodd\pageno\line{\copy4\hfil\folio}
          \vskip12pt
          \else
          \line{\folio\hfil\copy3}
          \vskip12pt\fi\fi
          \vskip12pt
          \hrule height 3pt depth-2pt width 360pt
          \vskip12pt}}

\footline={\hss\today\qquad PAGE PROOFS\hss}
%\footline={\hss\today\qquad REV. PROOFS\hss}
%\footline={\hfill}

%DETAILS NEED AMENDING AS NECESSARY
\coden{\eightrm CCC\quad 1040--3108/95/000000--00}
{\eightit \hfill Received 26 July 1993\break 
\eightrm \copyright 1994 by John Wiley \& Sons, Ltd.
\eightit \hfill Accepted 23 September 1994}

%1ST SET INIT.CAP THEN LOWERCASE, 2ND SET CAPS
\art{Distributed implementations of communicating objects}{DISTRIBUTED IMPLEMENTATIONS OF COMMUNICATING OBJECTS}

\auth{WEIJIA JIA* AND GAETAN LIBERT}{WEIJIA JIA* AND GAETAN LIBERT}

\adone{Department of Computer Science}

\adtw{Facult\'e Polytechnique de Mons}

\adth{7000 Mons, Belgium}

%THIS GENERATES AN \HRULE
\aend 


--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="EMSTANFT.TEX"

%Last amended: 23-06-89 - Cap Greek defs added
%By: Geeti

%Standard fonts to be called in when required
%Define the fonts required
\font\fiverm=ptmr at 5pt
\font\fiveit=ptmri at 5pt
\font\fiveb=ptmb at 5pt
\font\sixrm=ptmr at 6pt
\font\sixit=ptmri at 6pt
\font\sixb=ptmb at 6pt
\font\sevenrm=ptmr at 7pt
\font\sevenit=ptmri at 7pt
\font\sevenb=ptmb at 7pt
\font\sevenbi=ptmbi at 7pt
\font\eightrm=ptmr at 8pt
\font\eightit=ptmri at 8pt
\font\eightb=ptmb at 8pt
\font\eightbi=ptmbi at 8pt
%\font\ninecm=cmcour at 9pt
%\font\eightcb=cmcourb at 8pt
\font\ninerm=ptmr at 9pt
\font\nineit=ptmri at 9pt
\font\nineb=ptmb at 9pt
\font\ninebi=ptmbi at 9pt
\font\tenrm=ptmr at 10pt
\font\tenit=ptmri at 10pt
\font\tenb=ptmb at 10pt
\font\tenbi=ptmbi at 10pt
\font\tensc=ptmr at 8pt
\font\elevenb=ptmb at 11pt
\font\elevenrm=ptmr at 11pt
\font\elevenit=ptmri at 11pt
\font\twelverm=ptmr at 12pt
\font\twelveit=ptmri at 12pt
\font\twelveb=ptmb at 12pt
\font\twelvebi=ptmbi at 12pt
\font\fourteenb=ptmb at 14pt
\font\sixteenrm=ptmr at 16pt
\font\sixteenb=ptmb at 16pt
\font\fourteenrm=ptmr at 14pt
\font\eighteenrm=ptmr at 18pt
\font\twentyb=ptmb at 20pt
\font\twentytwob=ptmb at 22pt
\font\twentyfourb=ptmb at 24pt

\def\trueital{\mathcode"2C="782C
              \mathcode"41="7841\mathcode"42="7842\mathcode"43="7843
              \mathcode"44="7844\mathcode"45="7845\mathcode"46="7846
              \mathcode"47="7847\mathcode"48="7848\mathcode"49="7849
              \mathcode"4A="784A\mathcode"4B="784B\mathcode"4C="784C
              \mathcode"4D="784D\mathcode"4E="784E\mathcode"4F="784F
              \mathcode"50="7850\mathcode"51="7851\mathcode"52="7852
              \mathcode"53="7853\mathcode"54="7854\mathcode"55="7855
              \mathcode"56="7856\mathcode"57="7857\mathcode"58="7858
              \mathcode"59="7859\mathcode"5A="785A\mathcode"61="7861
              \mathcode"62="7862\mathcode"63="7863\mathcode"64="7864
              \mathcode"65="7865\mathcode"66="7866\mathcode"67="7867
              \mathcode"68="7868\mathcode"69="7869\mathcode"6A="786A
              \mathcode"6B="786B\mathcode"6C="786C\mathcode"6D="786D
              \mathcode"6E="786E\mathcode"6F="786F\mathcode"70="7870
              \mathcode"71="7871\mathcode"72="7872\mathcode"73="7873
              \mathcode"74="7874\mathcode"75="7875\mathcode"76="7876
              \mathcode"77="7877\mathcode"78="7878\mathcode"79="7879
              \mathcode"7A="787A
              \mathcode"00="7800
              \mathcode"01="7801
              \mathcode"02="7802
              \mathcode"03="7803
              \mathcode"04="7804
              \mathcode"05="7805
              \mathcode"06="7806
              \mathcode"07="7807
              \mathcode"08="7808
              \mathcode"09="7809}

\trueital
%\font\ninesy=cmsym10 at 9pt
%\font\tensy=cmsym10
%\font\sevensy=cmsym7
%\font\fivesy=cmsymy5
%\font\tenex=cmex10
\tenrm\baselineskip=12pt
\textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm
\textfont7=\tenit \scriptfont7=\sevenit \scriptscriptfont1=\fiveit
\textfont8=\tenit \scriptfont8=\sevenit \scriptscriptfont8=\fiveit
\textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont1=\fivesy
\textfont3=\tenex \scriptfont3=\tenex   \scriptscriptfont3=\tenex
\textfont\itfam=\tenit  \def\it{\fam\itfam\tenit}%
\textfont\bffam=\tenb   \scriptfont\bffam=\sevenb
                        \scriptscriptfont\bffam=\fiveb

\def\bf{\fam\bffam\tenb}
\def\rm{\fam0 \tenrm}
\def\mit{\fam1\tensy }
\def\smit{\fam1\sevensy}
\newfam\itfam \def\it{\fam\itfam\tenit} \textfont\itfam=\tenit
\newfam\bffam \def\bf{\fam\bffam\tenb} \textfont\bffam=\tenb

%Definitions for Cap Greeks
\font\capg=cmr10
\def\Gamma{\hbox{\capg\char'00}}
\def\Delta{\hbox{\capg\char'01}}
\def\Theta{\hbox{\capg\char'02}}
\def\Lambda{\hbox{\capg\char'03}}
\def\Xi{\hbox{\capg\char'04}}
\def\Pi{\hbox{\capg\char'05}}
\def\Sigma{\hbox{\capg\char'06}}
\def\Upsilon{\hbox{\capg\char'07}}
\def\Phi{\hbox{\capg\char'10}}
\def\Psi{\hbox{\capg\char'11}}
\def\Omega{\hbox{\capg\char'12}}

%Definition for Large operators
\font\Lops=cmex10

\def\LargeSum{\Lops\mathchar"1358}


--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="STANMACS.TEX"

%====================================================
%/WILEY/STANDARDS.TEX HAS BEEN CREATED TO CONTAIN STANDARD DEFINITIONS 
%FOR ALL MANUSCRIPTS. 
%VERSION: 001 14/07/88

%LAST AMENDED: 04/03/89
%Variable space above and beloy display maths added

%LAST AMENDED: 28/03/90 by Jenny
%\mn added

%LAST AMENDED: 21/05/90 by Geeti
%LTD removed from \jwuc and \jwul

%LAST AMENDED: 21/05/90 by Geeti
% \square added for an open square

%PAGE SIZE
%To set the default for vsize and hsize for galleys on 28em measure.
\vsize=594pt
\hsize=444pt

%To calculate time for footline 
\newcount\hour
\newcount\minute

\hour=\time
\divide\hour by 60
\minute=\hour
\multiply\minute by 60
\advance\minute by -\time
\minute=-\minute

%PARAGRAPHS---SPACE BETWEEN
%To ensure no additional space is placed between paragraphs set \parskip at 0pt
\parskip=0pt

%PARAGRAPH INDENTATION
%When in 10/12pt the indentation should be set to 10pt. When in 9/10pt the
%indentation should be set to 9pt.
\parindent=10pt

%TOLERANCE BETWEEN WORDS
%This sets the acceptable tolerance for spacing between words. 
%(The default is 200).
\tolerance=10000
\pretolerance=10000
%SPACE AFTER PUNCTUATION
%This prevents additional spacing being set after punctuation.
\frenchspacing

%HANGINDENT
%This sets the hanging indentation level.
\hangindent=10pt

%CORRECT BASELINESKIP
%This sets the \xpar to the same specification as \par and is used at the
%end of quotations. It ensures the correct baselineskip is used when setting
%the data.
\let\xpar=\par

%COPYRIGHT SYMBOL
\def\csign{{\sixteenrm{\lower.6ex\hbox{\copyright}}\ }}

%REGISTERED TRADE MARK
%to print a registered trade mark
\def\rsign{{\eightrm\hskip1.5pt{\raise.8ex
  \hbox{$\bigcirc$\hskip-7pt\sixrm R\thinspace}}}}

%THEREFORE SYMBOL transferred to acol_macros as problems with
%baselineskip


%LEADER DOTS
%This macros is used to create leaderfill dots in the contents list
\def\leaderfill{\leaders\hbox to 1em{\hss.\hss}\hfill} 


%DEGREES TEMPERATURE
%macro to give required spacing for degrees temperature
\def\dt{{\nobreak$^\circ$\hskip-1pt\nobreak}}


%DEGREES DIRECTION
%macro to be required spacing for degrees direction
\def\dd{{\hskip1pt$^\circ$\hskip-2pt}}
\baselineskip=12pt


%PER THOUSAND SYMBOL
%macro to give per thousand symbol
\def\perthou{\%\lower.1ex\hbox{\fourteenit$\scriptstyle o$}}


%BOND (CHEMICAL SYMBOL) OR EM-RULE IN AN HBOX
\def\bond{\raise.25ex\hbox{---}}

%SINGLE-LINE BOND 9PT LONG
\def\bondone{\hglue1pt{}\raise.55ex\hbox to 9pt{\hrulefill}\hglue1pt}


%TWO-LINE BOND 9PT LONG
\def\bondtwo{\hglue1pt{}\raise.35ex\hbox to 9pt{\hrulefill}\hglue-10pt
             \hglue1pt{}\raise.65ex\hbox to 9pt{\hrulefill}\hglue1pt}

%THREE-LINE BOND 9PT LONG
\def\bondthree{\hglue1pt{}\raise.20ex\hbox to 9pt{\hrulefill}\hglue-10pt
               \hglue1pt{}\raise.55ex\hbox to 9pt{\hrulefill}\hglue-10pt
               \hglue1pt{}\raise.90ex\hbox to 9pt{\hrulefill}\hglue1pt}


%CURRENT DATE
%To print the current date only, e.g. month day, year
\def\date{\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}


%CURRENT DATE AND FILE NAME
%To print current date and filename. Used within the \footline
%macros to print the date on galleys and page proofs
\def\today{\number\day/\number\month/\number\year\space\number\hour:\number\minute
\space\jobname}


%****
%FOOTLINE AND PAGE NUMBERS
%The following two macros should be copied into individual files if page
%numbers must vary
\pageno=1                                  %AMEND PAGE NUMBER
\footline={\ifnum\pageno=1\hss\eightrm\folio       %AMEND PAGE NUMBER
           \space\space\today\hss
           \else
           \hss\eightrm\today\hss\fi}
%****


%FOOTNOTES
%This is how the footnote is defined and what it uses to
%set the footnote
\def\footnote#1{\insert\footins\bgroup
  \eightrm\baselineskip=9pt
  \setbox\strutbox=\hbox{\vrule height5.5pt depth1.5pt width0pt}
  \interlinepenalty\interfootnotelinepenalty
  \splittopskip\ht\strutbox % top baseline for broken footnotes
  \splitmaxdepth\dp\strutbox \floatingpenalty2000
  \leftskip0pt \rightskip0pt
  \noindent\hbox to \parindent{#1\hss}\ignorespaces\hangindent\parindent
  \footstrut\futurelet\next\foat}
\def\foat{\ifcat\bgroup\noexpand\next \let\next\faat
  \else\let\next\fat\fi \next}
\def\faat{\bgroup\aftergroup\afoot\let\next}
\def\fat#1{#1\afoot}
\def\afoot{\strut\egroup}
\skip\footins=9pt

%Footnotes will be automatically set in 8/9pt and should be coded
%as follows:

%Text within the paragraph {$^1$}\footnote {$^1$}{Data to be set as footnotE.}


%WIDEITEM
\def\wideitem#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}
%The following shows the results of this coding (please note, the text is not
%intended to be significant---it is only words!) :
 
%\vskip6pt
%{\wideitem{(iii)}
%\item{(i)}  Preliminary data check sheets with enough information to ensure 
%this line extends to more than one printed line.
%\vskip6pt
%\item{(ii)}  Figure/Table details.
%\vskip6pt
%\item{(iii)}  Progress sheet.
%\vskip6pt
%\item{(iv)}  Apollo check sheet.
%
%}


%QUOTATION INDENTED 1em EACH SIDE SET IN 9/10pt
\def\quotea#1{{\narrower\ninerm\baselineskip=10pt\noindent{#1}\xpar}}


%QUOTATION INDENTED 2em EACH SIDE SET IN 9/10pt
\def\quoteb#1{{\narrower\narrower\ninerm\baselineskip=10pt
               \noindent{#1}\xpar}}


%QUOTATION INDENTED 1em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quotec#1{{\narrower\noindent{#1}\xpar}}


%QUOTATION INDENTED 2em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quoted#1{{\narrower\narrower\noindent{#1}\xpar}}


%REFERENCES
% to set references with hanging indentation identifying each entry
\def\ref{\hangindent=9pt\parindent=0pt}

%to set references in 9/10pt with hanging indentation identifying start 
%and end points only
\def\begref{\everypar={\parindent=0pt\hangindent=9pt\ninerm
\baselineskip=10pt}\noindent\ignorespaces}

\def\endref{\everypar={\parindent=9pt\hangindent=0pt\tenrm
\baselineskip=12pt}\vskip-12pt\indent}


%FIGURE CAPTIONS
%To set caption which is one line only
\def\figone#1{{\ninerm\baselineskip=10pt
              \centerline{#1}}}

%To set caption which is more than one line
\def\fig#1{{\ninerm\baselineskip=10pt{\noindent #1}}}

%To set caption which is more than one line with last line centred
\def\figcen#1#2{{\ninerm\baselineskip=10pt
             \vbox{\noindent#1\break}\vskip-10pt
             \centerline{#2}
             \tenrm\baselineskip=12pt
             \parindent=12pt}}

% ADDED 20 MAY 86 BY GEETI
% to set two line figure caption with both lines centred

\def\cenfig#1#2{{\ninerm\baselineskip=10pt
             \centerline{#1}
             \centerline{#2}}}


%FIGURE CAPTION MACROS TO SET SPACE FOR CAPTION, COMMENT IN THE SPACE
%AND THE CAPTION ITSELF WITH SPACE BELOW
%ADD WIDTH AND DEPTH OF FIGURE IN ADDITION TO THE NORMAL CODING
%To set caption which is one line only
\def\figspone#1#2#3#4{\vskip12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #4pt{\line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}}}

%To set caption which is more than one line
\def\figsp#1#2#3#4{\vskip12pt                 
                   {\ninerm\baselineskip=10pt  
                   \vbox to #4pt{\line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                   \vfill
                   \centerline{Insert #1 here}
                   \vfill
                   \line{\hfill\hbox to #3pt{\hrulefill}\hfill}}
                   \vskip12pt
                   {\noindent #1} {#2\xpar}}}

%To set an insert
\def\inssp#1#2#3{\vglue12pt
                   \vbox to #3pt{\line{\hfill\hbox to #2pt{\hrulefill}\hfill}
                   \vfill
                   \centerline{Place #1 here}
                   \vfill
                   \line{\hfill\hbox to #2pt{\hrulefill}\hfill}}}


%To set space to insert CRC
\def\inscrc#1#2{\vglue12pt
                   \vbox to #2pt{\vfill
                   \centerline{Place crc here - #1 }
                   \vfill}}

%***************

%TO SET CAPTIONS FOR PAGE PROOFS(I.E HRULE NOT PRINTED)
%To set caption which is one line only
\def\figsponepp#1#2#3#4{\vskip12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #4pt{\line{\hfill\hbox to #3pt{}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #3pt{}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}}}

%To set caption which is more than one line
\def\figsppp#1#2#3#4{\vskip12pt
                   {\ninerm\baselineskip=10pt  
                   \vbox to #4pt{\line{\hfill\hbox to #3pt{}\hfill}
                   \vfill
                   \centerline{Insert #1 here}
                   \vfill
                   \line{\hfill\hbox to #3pt{}\hfill}}
                   \vskip12pt  
                   {\noindent #1} {#2\xpar}}}


%To set an insert
\def\inssppp#1#2#3{\vskip12pt
                   \vbox to #3pt{\line{\hfill\hbox to #2pt{}\hfill}
                   \vfill
                   \centerline{Place #1 here}
                   \vfill
                   \line{\hfill\hbox to #2pt{}\hfill}}}



%Macros to be used when a figure is to appear at top of page
%and is  placed in the middle of a paragraph

\def\figbreak{\break\vglue-24pt}
\def\figbreakone{\break\vglue-12pt}

%Macros to be used to put spare space on a page into the figure space

\def\figfill{\vglue-36pt\vfill}

%TABLE CAPTIONS
%To set caption which is one line only
\def\tabone#1{{\ninerm\baselineskip=10pt
              \centerline{#1}}}

%To set caption which is more than one line
\def\tab#1{{\ninerm\baselineskip=10pt{\noindent #1\xpar}}}


%To set caption which is more than one line with last line centred
\def\tabcen#1#2{{\ninerm\baselineskip=10pt     
             \vbox{\noindent#1\break}\vskip-10pt
             \centerline{#2}
             \tenrm\baselineskip=12pt
             \parindent=12pt}}


% ADDED 20 MAY 86 BY GEETI
% to set two line table caption with both lines centred

\def\centab#1#2{{\ninerm\baselineskip=10pt
             \centerline{#1}
             \centerline{#2}}}


% ADDED 20 MAY 86 BY GEETI
% to set tabnote in 8/9pt

\def\tabnote{\eightrm\baselineskip=9pt}
            

%DIGITWIDTH - TO BE USED IN TABLES
%\newdimen\digitwidth
%\setbox0=\hbox{\rm0}
%\digitwidth=\wd0
%\catcode`?=\active
%\def?{\kern\digitwidth}


%TABLES RULES AND NOTES
%to set a rule within a table
\def\tabrule{\noalign{\hrule}}

% ADDED 14 MAY 86 BY SHARON
% thick rule to be used in tables
\def\tabrulet{\noalign{\hrule height3pt depth-2.5pt}}

%ADDED 6 JUNE 86 by Geeti
%STAR FOR USE IN 9/10 TABLES
\def\tabast{{\tenrm\raise0.12ex\hbox{*}}}

%BULLET IN LOCATION LINE ON TITLE PAGE
\def\llbul{{\font\fourteenllb=ptmr at 14pt
          {\fourteenllb\ \smash{\raise1.75pt\hbox{.}}\ }}}


%BULLET LINE ON TITLE PAGE
%\def\cities7{\tenrm\baselineskip=12pt
%              \centerline{Chichester\enspace {$\eightb\cdot$}
%                            New York\enspace{ $\eightb\cdot$}
%                            Brisbane\enspace {$\eightb\cdot$}
%                            Toronto\enspace {$\eightb\cdot$}
%                            Singapore}}


%JOHN WILEY & SONS ON TITLE PAGE lc
\def\jwlc{\sixteenrm\baselineskip=18pt
            \centerline{John Wiley \& Sons}}


%JOHN WILEY & SONS ON TITLE PAGE uc
\def\jwuc{\sixteenrm\baselineskip=18pt
            \centerline{JOHN WILEY \& SONS}}


%INDEX
%To set the required indentation for index entries
\def\main{\parindent=0pt\hangindent=18pt}
\def\subone{\parindent=9pt\hangindent=27pt}
\def\subtwo{\parindent=18pt\hangindent=36pt}
\def\subthree{\parindent=27pt\hangindent=45pt}

%AUTHOR INDEX
%To set the required indentation for index entries with only one level of heading
\def\nosub{\parindent=0pt\hangindent=9pt}


%FOR SCOPE FOR EXECUTIVE COMITTEE LIST
\def\first{\parindent=0pt\hangindent=12pt}
\def\second{\parindent=12pt\hangindent=12pt}

%FOR SCOPE LIST OF SCOPES ONLY
\def\scope{\parindent=0pt\hangindent=72pt}


%MISCELLANEOUS
%All the macros below were put into this file to aid ease of texing 
%a file if it has been supplied with Tex commands in already.

%\headline{\hfill\relax        
%          \global\headline={\vbox{\line{\relax
%          \ifodd\pageno\tenit\chaptitle\hfill\eightrm\folio
%          \else
%          \tenrm\folio\hfill\mit\booktitle\fi}
%          }}}
\def\booktitle{GALLEY PROOFS}
\def\chaptitle{GALLEY PROOFS}

\def\chaph#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\chaphtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\chaphthree#1#2#3{\vskip18pt{\noindent#1}{\noindent#2}{\noindent#3}
                      \vskip6pt}

\def\chapno#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\auth#1{\vskip18pt{\noindent#1}\vskip6pt}


\def\heada#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headatwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headachap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headb#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headbtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headba#1{\vskip6pt{\noindent#1}\vskip6pt}
\def\headbatwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headbchap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headc#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headctwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headcb#1{\vskip6pt{\noindent#1}\vskip6pt}
\def\headcbtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headcchap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headd#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headdtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headdc#1{\vskip6pt{\noindent#1}\vskip6pt}

\def\headano#1#2{\vskip18pt{\noindent#1}\enspace#2\hfill\vskip6pt}

\def\headbno#1#2{\vskip18pt{\noindent#1}\enspace#2\hfill\vskip6pt}

\def\headc#1{\vskip18pt{\noindent#1}\vskip6pt}

%***********
%ADDED 9 MAY 86 by Jenny Smith
%STAR FOR MARKING FOOTNOTE WITHIN TEXT
\def\fast{{\twelverm\raise0.16ex\hbox{*}}}

%***********
%ADDED 13 MAY 86 by Geeti
%enspace removed - not necessary with amended fonts
%AMENDED 23rd JULY 1986 (Royal Wedding Day)
%By: Jeanne
%LEAVE THIS ALL AS ONE LINE AND THE SPACE IS JUST RIGHT, PUT A
%RETURN IN AND THE RETURN IS CONVERTED TO A WORD SPACE AND IS
%THEREFORE INCORRECT
%BULLET LINE ON TITLE PAGE
%\def\cities{\tenrm\baselineskip=12pt
%  \centerline{Chichester{\hskip5pt$\eightb\cdot$\hskip7pt}New York{\hskip5pt$\eightb\cdot$\hskip7pt}Brisbane{\hskip7pt$\eightb\cdot$\hskip7pt}Toronto{\hskip6pt$\eightb\cdot$\hskip7pt}Singapore}}

%***********
%ADDED 13 MAY 86 by Geeti
%This macro will ensure all italic alpha characters called for when in maths mode
%will be taken from the italic font.
%activated 14/05/86

\def\trueital{\mathcode"41="7841\mathcode"42="7842\mathcode"43="7843
              \mathcode"44="7844\mathcode"45="7845\mathcode"46="7846
              \mathcode"47="7847\mathcode"48="7848\mathcode"49="7849
              \mathcode"4A="784A\mathcode"4B="784B\mathcode"4C="784C
              \mathcode"4D="784D\mathcode"4E="784E\mathcode"4F="784F
              \mathcode"50="7850\mathcode"51="7851\mathcode"52="7852
              \mathcode"53="7853\mathcode"54="7854\mathcode"55="7855
              \mathcode"56="7856\mathcode"57="7857\mathcode"58="7858
              \mathcode"59="7859\mathcode"5A="785A\mathcode"61="7861
              \mathcode"62="7862\mathcode"63="7863\mathcode"64="7864
              \mathcode"65="7865\mathcode"66="7866\mathcode"67="7867
              \mathcode"68="7868\mathcode"69="7869\mathcode"6A="786A
              \mathcode"6B="786B\mathcode"6C="786C\mathcode"6D="786D
              \mathcode"6E="786E\mathcode"6F="786F\mathcode"70="7870
              \mathcode"71="7871\mathcode"72="7872\mathcode"73="7873
              \mathcode"74="7874\mathcode"75="7875\mathcode"76="7876
              \mathcode"77="7877\mathcode"78="7878\mathcode"79="7879
              \mathcode"7A="787A}

\trueital



% ADDED 3 JUNE 86 BY GEETI WITH BOLD AND BOLD ITALIC ADDED 8 JUNE 1986

%TO SET ALPHA CHARACTERS IN SIXPOINT ITALIC
\def\spi#1{{\sixit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SIXPOINT MEDIUM
\def\spm#1{{\sixrm\hbox{#1}}}

%6PT MEDIUM FOR SUPERIORS ONLY TO GIVE CORRECT LEADING
\def\sspm#1{{\sixrm\lower.4ex\hbox{\hskip.1pt#1}}}
%6PT ITALIC FOR SUPERIORS ONLY TO GIVE CORRECT LEADING
\def\sspi#1{{\sixit\lower.4ex\hbox{\hskip.1pt#1}}}
%TO SET ALPHA CHARACTERS IN SIXPOINT BOLD
\def\spb#1{{\sixb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SIXPOINT BOLD ITALIC
\def\spbi#1{{\sixbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT ITALIC
\def\svi#1{{\sevenit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT MEDIUM
\def\svm#1{{\sevenrm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT BOLD
\def\svb#1{{\sevenb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT BOLD ITALIC
\def\svbi#1{{\sevenbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT ITALIC
\def\epi#1{{\eightit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT MEDIUM
\def\epm#1{{\eightrm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT BOLD
\def\epb#1{{\eightb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT BOLD ITALIC
\def\epbi#1{{\eightbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT ITALIC
\def\npi#1{{\nineit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT MEDIUM
\def\npm#1{{\ninerm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT BOLD
\def\npb#1{{\nineb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT BOLD ITALIC
\def\npbi#1{{\ninebi\hbox{#1}}}

%TO SET INFERIOR MEDIUM O (for use as cap O in twelvepoint)
\def\info{{$_{\twelverm\hbox{o}}$}}

%TO SET A LINE ABOVE AN ITALIC H
\def\toph{{}\hglue3pt\raise1.7ex\hbox to 6pt{\hrulefill}\hglue-9pt}

%TO SET A LINE ABOVE AN ITALIC b
\def\topb{{}\raise1.7ex\hbox to 4pt{\hrulefill}\hglue-5pt}

%TO SET A LINE ABOVE AN ITALIC x
\def\barx{\hbox{{}\raise1.2ex\hbox to 4pt{\hrulefill}\hglue-6pt}}
\let\topx=\barx

%TO SET A LINE ABOVE AN INFERIOR ITALIC x
\def\ibarix{\hbox{{}\lower.65ex\hbox{\nineit x}\hglue-3pt\raise.4ex\hbox to 4pt{\hrulefill}}}


% ADDED 8 JUNE 86 BY GEETI amended to adjust spacing

%PER THOUSAND SYSMBOL
%macro to give per thousand symbol - amended because of use of trueital
\def\perthou{\%\nobreak\hskip-1.5pt\nobreak\lower.075ex\hbox{\eightit o}}

% ADDED 23 NOVEMBER 1986 BY GEETI

%Sets information in textstyle
\def\spover#1#2{$\textstyle{#1\lower0.5ex\null}\over{\raise2.0ex\null
\textstyle{#2}}$}


%These are utilised by some heading macros in individual macro files - do not remove!!!
%They are used to set numbered headings with an enspace before details and
%to give an indented second line
\def\widesaq#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}
\def\saq{\par\hang\newtextindent}
\def\newtextindent#1{\indent\hskip-\wd0{#1\enspace}
    \par\vskip-\baselineskip
    \parindent=\wd0\hangindent=\parindent\ignorespaces}


\def\drop{\vskip12pt}
\def\dropone{\vskip12pt}
\def\droptwo{\vskip12pt} 
\def\dropthree{\vskip12pt}
\def\dropfour{\vskip12pt}
\def\dropfive{\vskip12pt}


%To set the basic point size and leading
\tenrm\baselineskip=12pt

%To achieve a return arrow symbol at the left margin
%\def\ret{{$\fourteenb\lower8.0ex\hbox{$\longleftarrow$}$
%\vskip-12pt\hskip21pt$fourteenb\vrule depth 8pt width 1pt$}}

%To achieve a return arrow symbol within the text
\def\ret{{\fourteenb\hbox{$\leftarrow$}
\hskip-1pt\fourteenb\vbox{\hrule height 8pt width .5pt depth -3pt}}}


%to achieve not equals
%\def\noteq{\vbox{\overfullrule=0pt\hbox to 0pt{\tt\char'075}\hskip-2pt\tt\char'057}}
\def\noteq{\setbox9=\hbox{/}\hbox{/}\hskip-\wd9\hbox to \wd9{\hfill=\hfill}}
\let\noteq=\neq

%to print pound sterling
\def\sterling{\it\char'044}

%TO SUPPRESS VARIABLE SPACING WITHIN DISPLAYMODE
\abovedisplayskip=0pt    %13pt
\abovedisplayshortskip=0pt
\belowdisplayskip=0pt    %13pt
\belowdisplayshortskip=0pt
\smallskipamount=0pt  %3.25pt
\medskipamount=0pt    %6.5pt
\bigskipamount=0pt    %13pt

%GREEK CHARACTERS IN CORRECT FONT SIZE FOR 8 POINT TEXT
%coding at beginning of line \hbox{\sm*** rest of text}
%in middle/end of line {\hbox{\sm**}}
\font\smit=cmmi7
\def\smalpha{\hbox{\smit\char'013}\nobreak}
\def\smbeta{\hbox{\smit\char'014}\nobreak}
\def\smgamma{\hbox{\smit\char'015}\nobreak}
\def\smpi{\hbox{\smit\char'031}\nobreak}
\def\smrho{\hbox{\smit\char'032}\nobreak}
\def\smsigma{\hbox{\smit\char'033}\nobreak}
\def\smpi{\hbox{\smit\char'031}\nobreak}
\def\smmu{\hbox{\smit\char'026}\nobreak}
\def\smepsilon{\hbox{\smit\char'017}\nobreak}
\def\smvarepsilon{\hbox{\smit\char'042}\nobreak}
\def\smomega{\hbox{\smit\char'041}\nobreak}
\def\smdelta{\hbox{\smit\char'016}\nobreak}
\def\smtau{\hbox{\smit\char'034}\nobreak}
\def\smpsi{\hbox{\smit\char'040}\nobreak}

%GREEK CHARACTERS IN CORRECT FONT SIZE FOR 9 POINT TEXT
%coding at beginning of line \hbox{\sn*** rest of text}
%in middle/end of line {\hbox{\sn**}}
\font\smiteight=cmmi8
\def\snalpha{\hbox{\smiteight\char'013}\nobreak}
\def\snbeta{\hbox{\smiteight\char'014}\nobreak}
\def\sngamma{\hbox{\smiteight\char'015}\nobreak}
\def\snpi{\hbox{\smiteight\char'031}\nobreak}
\def\snrho{\hbox{\smiteight\char'032}\nobreak}
\def\snsigma{\hbox{\smiteight\char'033}\nobreak}
\def\snepsilon{\hbox{\smiteight\char'017}\nobreak}
\def\sndelta{\hbox{\smiteight\char'016}\nobreak}
\def\snvarepsilon{\hbox{\smit\char'042}\nobreak}
\def\snomega{\hbox{\smit\char'041}\nobreak}
\def\snlambda{\hbox{\smit\char'025}\nobreak}

%TO SET A SMALLER PRIME
\font\fivesy=cmsy5
\def\sprime{{\hbox{\fivesy\char'060}}}

%**************************************************************************%BLOBS FOR MISSING DATA --- EG PAGE NUMBERS%**************************************************************************\def\mn{\setbox0=\hbox{3}{\vrule height5pt depth -1pt width\wd0}}%SCANDINAVIAN CAP A WITH ANGSTROM ACCENT OVER
\def\sa{\leavevmode\setbox0=\hbox{h}\dimen0=\ht0 \advance\dimen0 by-1ex
        \rlap{\raise.67\dimen0\hbox{\hskip1.5pt\char'27}}A}

%For open square - add to stanmacs if OK
\def\sqr#1#2{{\vcenter{\hrule height.#2pt
              \hbox{\vrule width.#2pt height#1pt \kern#1pt
                    \vrule width.#2pt} 
              \hrule height.#2pt}}}
%\def\square{\mathchoice\sqr34\sqr34\sqr{2.1}3\sqr{1.5}3}

%to achieve not equals
\def\noteq{{\tt\char'075}\hskip-5.34995pt{\tt\char'057}}

%To use

%A $\noteq$ B a test for not equals




%To use

%This is a test for \bldgreek{\beta}, bold beta.

%SCOPE STUFF
\def\add{\tenit }

\def\auth{\tenb }

%SCANDINAVIAN CAP A WITH ANGSTROM ACCENT OVER
\def\sa{\leavevmode\setbox0=\hbox{h}\dimen0=\ht0 \advance\dimen0 by-1ex
        \rlap{\raise.67\dimen0\hbox{\hskip1.5pt\char'27}}A}

%INCLUDED THIS TO STOP BLACK BLOBS IN BOLD GREEN
\overfullrule=0pt
%BOLD GREEK OMEGA
\def\bfom{{\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox{$\phantom\omega$}}}

%BOLD GREEK CAP SIGMA
\def\bfsi{{\hbox to
0.1pt{$\Sigma$}\hbox to 0.1pt{$\Sigma$}\hbox to
0.1pt{$\Sigma$}\hbox to 0.1pt{$\Sigma$}\hbox to
0.1pt{$\Sigma$}\hbox to 0.1pt{$\Sigma$}\hbox to
0.1pt{$\Sigma$}\hbox{$\phantom\Sigma$}}}

%\BOLD GREEK MU
\def\bfmu{{\hbox to
0.1pt{$\mu$}\hbox to 0.1pt{$\mu$}\hbox to
0.1pt{$\mu$}\hbox to 0.1pt{$\mu$}\hbox to
0.1pt{$\mu$}\hbox to 0.1pt{$\mu$}\hbox to
0.1pt{$\mu$}\hbox{$\phantom\mu$}}}


%\POLISH L
\font\poll=cmr9
\def\lcpl{{\poll\l}}
\def\ucpl{{\poll\L}}


%BOLD GREEK CHARACTERS
\def\tbclambda{{\font\sbit=cmmib10
            \hbox{\sbit\char'003}}\nobreak}


%Definition for centred bullet/multi dot
\def\cendot{{\raise.5ex\hbox{\eighteenrm .}}}

--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="CPSTANMC.TEX"

%====================================================
%/WILEY/STANDARDS.TEX HAS BEEN CREATED TO CONTAIN STANDARD DEFINITIONS 
%FOR ALL MANUSCRIPTS. 
%VERSION: 001 14/07/88

%LAST AMENDED: 04/03/89
%Variable space above and below display maths added

%LAST AMENDED: 06/12/89
%Add \tpb to set bold characters in maths mode

%PAGE SIZE
%To set the default for vsize and hsize for galleys on 28em measure.
\vsize=594pt
\hsize=444pt

%To calculate time for footline 
\newcount\hour
\newcount\minute

\hour=\time
\divide\hour by 60
\minute=\hour
\multiply\minute by 60
\advance\minute by -\time
\minute=-\minute

%BULLET IN LOCATION LINE ON TITLE PAGE
\def\llbul{{\font\fourteenllb=psmtimr at 14pt
          {\fourteenllb\ \smash{\raise1.75pt\hbox{.}}\ }}}

%PARAGRAPHS---SPACE BETWEEN
%To ensure no additional space is placed between paragraphs set \parskip at 0pt
\parskip=0pt

%PARAGRAPH INDENTATION
%When in 10/12pt the indentation should be set to 10pt. When in 9/10pt the
%indentation should be set to 9pt.
\parindent=10pt

%TOLERANCE BETWEEN WORDS
%This sets the acceptable tolerance for spacing between words. 
%(The default is 200).
\tolerance=10000
\pretolerance=10000
%SPACE AFTER PUNCTUATION
%This prevents additional spacing being set after punctuation.
\frenchspacing

%HANGINDENT
%This sets the hanging indentation level.
\hangindent=10pt

%CORRECT BASELINESKIP
%This sets the \xpar to the same specification as \par and is used at the
%end of quotations. It ensures the correct baselineskip is used when setting
%the data.
\let\xpar=\par

%COPYRIGHT SYMBOL
\def\csign{{\sixteenrm{\lower.6ex\hbox{\copyright}}\ }}

%REGISTERED TRADE MARK
%to print a registered trade mark
\def\rsign{{\eightrm\hskip1.5pt{\raise.8ex
  \hbox{$\bigcirc$\hskip-7pt\sixrm R\thinspace}}}}

%THEREFORE SYMBOL transferred to acol_macros as problems with
%baselineskip


%LEADER DOTS
%This macros is used to create leaderfill dots in the contents list
\def\leaderfill{\leaders\hbox to 1em{\hss.\hss}\hfill} 


%DEGREES TEMPERATURE
%macro to give required spacing for degrees temperature
\def\dt{{\nobreak$^\circ$\hskip-1pt\nobreak}}


%DEGREES DIRECTION
%macro to be required spacing for degrees direction
\def\dd{{\hskip1pt$^\circ$\hskip-2pt}}
\baselineskip=12pt


%PER THOUSAND SYMBOL
%macro to give per thousand symbol
\def\perthou{\%\lower.1ex\hbox{\fourteenit$\scriptstyle o$}}


%BOND (CHEMICAL SYMBOL) OR EM-RULE IN AN HBOX
\def\bond{\raise.25ex\hbox{---}}

%SINGLE-LINE BOND 9PT LONG
\def\bondone{\hglue1pt{}\raise.55ex\hbox to 9pt{\hrulefill}\hglue1pt}


%TWO-LINE BOND 9PT LONG
\def\bondtwo{\hglue1pt{}\raise.35ex\hbox to 9pt{\hrulefill}\hglue-10pt
             \hglue1pt{}\raise.65ex\hbox to 9pt{\hrulefill}\hglue1pt}

%THREE-LINE BOND 9PT LONG
\def\bondthree{\hglue1pt{}\raise.20ex\hbox to 9pt{\hrulefill}\hglue-10pt
               \hglue1pt{}\raise.55ex\hbox to 9pt{\hrulefill}\hglue-10pt
               \hglue1pt{}\raise.90ex\hbox to 9pt{\hrulefill}\hglue1pt}


%CURRENT DATE
%To print the current date only, e.g. month day, year
\def\date{\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}


%CURRENT DATE AND FILE NAME
%To print current date and filename. Used within the \footline
%macros to print the date on galleys and page proofs
\def\today{\number\day/\number\month/\number\year\space\number\hour:\number\minute
\space\jobname}


%****
%FOOTLINE AND PAGE NUMBERS
%The following two macros should be copied into individual files if page
%numbers must vary
\pageno=1                                  %AMEND PAGE NUMBER
\footline={\ifnum\pageno=1\hss\eightrm\folio       %AMEND PAGE NUMBER
           \space\space\today\hss
           \else
           \hss\eightrm\today\hss\fi}
%****


%FOOTNOTES
%This is how the footnote is defined and what it uses to
%set the footnote
\def\footnote#1{\insert\footins\bgroup
  \eightrm\baselineskip=9pt
  \setbox\strutbox=\hbox{\vrule height5.5pt depth1.5pt width0pt}
  \interlinepenalty\interfootnotelinepenalty
  \splittopskip\ht\strutbox % top baseline for broken footnotes
  \splitmaxdepth\dp\strutbox \floatingpenalty2000
  \leftskip0pt \rightskip0pt
  \noindent\hbox to \parindent{#1\hss}\ignorespaces\hangindent\parindent
  \footstrut\futurelet\next\foat}
\def\foat{\ifcat\bgroup\noexpand\next \let\next\faat
  \else\let\next\fat\fi \next}
\def\faat{\bgroup\aftergroup\afoot\let\next}
\def\fat#1{#1\afoot}
\def\afoot{\strut\egroup}
\skip\footins=9pt

%Footnotes will be automatically set in 8/9pt and should be coded
%as follows:

%Text within the paragraph {$^1$}\footnote {$^1$}{Data to be set as footnotE.}


%WIDEITEM
\def\wideitem#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}
%The following shows the results of this coding (please note, the text is not
%intended to be significant---it is only words!) :
 
%\vskip6pt
%{\wideitem{(iii)}
%\item{(i)}  Preliminary data check sheets with enough information to ensure 
%this line extends to more than one printed line.
%\vskip6pt
%\item{(ii)}  Figure/Table details.
%\vskip6pt
%\item{(iii)}  Progress sheet.
%\vskip6pt
%\item{(iv)}  Apollo check sheet.
%
%}


%QUOTATION INDENTED 1em EACH SIDE SET IN 9/10pt
\def\quotea#1{{\narrower\ninerm\baselineskip=10pt\noindent{#1}\xpar}}


%QUOTATION INDENTED 2em EACH SIDE SET IN 9/10pt
\def\quoteb#1{{\narrower\narrower\ninerm\baselineskip=10pt
               \noindent{#1}\xpar}}


%QUOTATION INDENTED 1em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quotec#1{{\narrower\noindent{#1}\xpar}}


%QUOTATION INDENTED 2em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quoted#1{{\narrower\narrower\noindent{#1}\xpar}}


%REFERENCES
% to set references with hanging indentation identifying each entry
\def\ref{\hangindent=9pt\parindent=0pt}

%to set references in 9/10pt with hanging indentation identifying start 
%and end points only
\def\begref{\everypar={\parindent=0pt\hangindent=9pt\ninerm
\baselineskip=10pt}\noindent\ignorespaces}

\def\endref{\everypar={\parindent=9pt\hangindent=0pt\tenrm
\baselineskip=12pt}\vskip-12pt\indent}


%FIGURE CAPTIONS
%To set caption which is one line only
\def\figone#1{{\ninerm\baselineskip=10pt
              \centerline{#1}}}

%To set caption which is more than one line
\def\fig#1{{\ninerm\baselineskip=10pt{\noindent #1}}}

%To set caption which is more than one line with last line centred
\def\figcen#1#2{{\ninerm\baselineskip=10pt
             \vbox{\noindent#1\break}\vskip-10pt
             \centerline{#2}
             \tenrm\baselineskip=12pt
             \parindent=12pt}}

% ADDED 20 MAY 86 BY GEETI
% to set two line figure caption with both lines centred

\def\cenfig#1#2{{\ninerm\baselineskip=10pt
             \centerline{#1}
             \centerline{#2}}}


%FIGURE CAPTION MACROS TO SET SPACE FOR CAPTION, COMMENT IN THE SPACE
%AND THE CAPTION ITSELF WITH SPACE BELOW
%ADD WIDTH AND DEPTH OF FIGURE IN ADDITION TO THE NORMAL CODING
%To set caption which is one line only
\def\figspone#1#2#3#4{\vglue12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #4pt{\line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}}}

%to set caption with all lines centred
\def\figspcen#1#2#3#4#5{\vglue12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #5pt{\line{\hfill\hbox to #4pt{\hrulefill}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #4pt{\hrulefill}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}
                      \centerline{{#3}}}}

%To set caption which is more than one line
\def\figsp#1#2#3#4{\vglue12pt                 
                   {\ninerm\baselineskip=10pt  
                   \vbox to #4pt{\line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                   \vfill
                   \centerline{Insert #1 here}
                   \vfill
                   \line{\hfill\hbox to #3pt{\hrulefill}\hfill}}
                   \vskip12pt
                   {\noindent #1} {#2\xpar}}}

%To set an insert
\def\inssp#1#2#3{\vglue12pt
                   \vbox to #3pt{\line{\hfill\hbox to #2pt{\hrulefill}\hfill}
                   \vfill
                   \centerline{Place #1 here}
                   \vfill
                   \line{\hfill\hbox to #2pt{\hrulefill}\hfill}}}


%To set space to insert CRC
\def\inscrc#1#2{\vglue12pt
                   \vbox to #2pt{\vfill
                   \centerline{Place crc here - #1 }
                   \vfill}}

%***************

%TO SET CAPTIONS FOR PAGE PROOFS(I.E HRULE NOT PRINTED)
%To set caption which is one line only
\def\figsponepp#1#2#3#4{\vskip12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #4pt{\line{\hfill\hbox to #3pt{}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #3pt{}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}}}

%to set caption with all lines centred
\def\figspcenpp#1#2#3#4#5{\vglue12pt
                      {\ninerm\baselineskip=10pt  
                      \vbox to #5pt{\line{\hfill\hbox to #4pt{\hfill}\hfill}
                      \vfill
                      \centerline{Insert #1 here}
                      \vfill
                      \line{\hfill\hbox to #4pt{\hfill}\hfill}
                      }\vskip12pt
                      \centerline{{#1} {#2}}
                      \centerline{{#3}}}}

%To set caption which is more than one line
\def\figsppp#1#2#3#4{\vskip12pt
                   {\ninerm\baselineskip=10pt  
                   \vbox to #4pt{\line{\hfill\hbox to #3pt{}\hfill}
                   \vfill
                   \centerline{Insert #1 here}
                   \vfill
                   \line{\hfill\hbox to #3pt{}\hfill}}
                   \vskip12pt  
                   {\noindent #1} {#2\xpar}}}


%To set an insert
\def\inssppp#1#2#3{\vskip12pt
                   \vbox to #3pt{\line{\hfill\hbox to #2pt{}\hfill}
                   \vfill
                   \centerline{Place #1 here}
                   \vfill
                   \line{\hfill\hbox to #2pt{}\hfill}}}



%Macros to be used when a figure is to appear at top of page
%and is  placed in the middle of a paragraph

\def\figbreak{\break\vglue-24pt}
\def\figbreakone{\break\vglue-12pt}

%Macros to be used to put spare space on a page into the figure space

\def\figfill{\vglue-36pt\vfill}

%TABLE CAPTIONS
%To set caption which is one line only
\def\tabone#1{{\ninerm\baselineskip=10pt
              \centerline{#1}}}

%To set caption which is more than one line
\def\tab#1{{\ninerm\baselineskip=10pt{\noindent #1\xpar}}}


%To set caption which is more than one line with last line centred
\def\tabcen#1#2{{\ninerm\baselineskip=10pt     
             \vbox{\noindent#1\break}\vskip-10pt
             \centerline{#2}
             \tenrm\baselineskip=12pt
             \parindent=12pt}}


% ADDED 20 MAY 86 BY GEETI
% to set two line table caption with both lines centred

\def\centab#1#2{{\ninerm\baselineskip=10pt
             \centerline{#1}
             \centerline{#2}}}


% ADDED 20 MAY 86 BY GEETI
% to set tabnote in 8/9pt

\def\tabnote{\eightrm\baselineskip=9pt}
            

%DIGITWIDTH - TO BE USED IN TABLES
%\newdimen\digitwidth
%\setbox0=\hbox{\rm0}
%\digitwidth=\wd0
%\catcode`?=\active
%\def?{\kern\digitwidth}


%TABLES RULES AND NOTES
%to set a rule within a table
\def\tabrule{\noalign{\hrule}}

% ADDED 14 MAY 86 BY SHARON
% thick rule to be used in tables
\def\tabrulet{\noalign{\hrule height3pt depth-2.5pt}}

%ADDED 6 JUNE 86 by Geeti
%STAR FOR USE IN 9/10 TABLES
\def\tabast{{\tenrm\raise0.12ex\hbox{*}}}


%BULLET LINE ON TITLE PAGE
\def\cities{\tenrm\baselineskip=12pt
              \centerline{Chichester\enspace {$\eightb\cdot$}
                            New York\enspace{ $\eightb\cdot$}
                            Brisbane\enspace {$\eightb\cdot$}
                            Toronto\enspace {$\eightb\cdot$}
                            Singapore}}


%JOHN WILEY & SONS ON TITLE PAGE lc
\def\jwlc{\sixteenrm\baselineskip=18pt
            \centerline{John Wiley \& Sons Ltd}}


%JOHN WILEY & SONS ON TITLE PAGE uc
\def\jwuc{\sixteenrm\baselineskip=18pt
            \centerline{JOHN WILEY \& SONS LTD}}


%INDEX
%To set the required indentation for index entries
\def\main{\parindent=0pt\hangindent=18pt}
\def\subone{\parindent=9pt\hangindent=27pt}
\def\subtwo{\parindent=18pt\hangindent=36pt}
\def\subthree{\parindent=27pt\hangindent=45pt}


%MISCELLANEOUS
%All the macros below were put into this file to aid ease of texing 
%a file if it has been supplied with Tex commands in already.

%\headline{\hfill\relax        
%          \global\headline={\vbox{\line{\relax
%          \ifodd\pageno\tenit\chaptitle\hfill\eightrm\folio
%          \else
%          \tenrm\folio\hfill\mit\booktitle\fi}
%          }}}
\def\booktitle{GALLEY PROOFS}
\def\chaptitle{GALLEY PROOFS}

\def\chaph#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\chaphtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\chaphthree#1#2#3{\vskip18pt{\noindent#1}{\noindent#2}{\noindent#3}
                      \vskip6pt}

\def\chapno#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\auth#1{\vskip18pt{\noindent#1}\vskip6pt}


\def\heada#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headatwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headachap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headb#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headbtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headba#1{\vskip6pt{\noindent#1}\vskip6pt}
\def\headbatwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headbchap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headc#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headctwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headcb#1{\vskip6pt{\noindent#1}\vskip6pt}
\def\headcbtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headcchap#1{\vskip18pt{\noindent#1}\vskip6pt}

\def\headd#1{\vskip18pt{\noindent#1}\vskip6pt}
\def\headdtwo#1#2{\vskip18pt{\noindent#1}{\noindent#2}\vskip6pt}
\def\headdc#1{\vskip6pt{\noindent#1}\vskip6pt}

\def\headano#1#2{\vskip18pt{\noindent#1}\enspace{#2\hfill}\vskip6pt}

\def\headbno#1#2{\vskip18pt{\noindent#1}\enspace{#2\hfill}\vskip6pt}

\def\headc#1{\vskip18pt{\noindent#1}\vskip6pt}

%***********
%ADDED 9 MAY 86 by Jenny Smith
%STAR FOR MARKING FOOTNOTE WITHIN TEXT
\def\fast{{\twelverm\raise0.16ex\hbox{*}}}

%***********
%ADDED 13 MAY 86 by Geeti
%enspace removed - not necessary with amended fonts
%AMENDED 23rd JULY 1986 (Royal Wedding Day)
%By: Jeanne
%LEAVE THIS ALL AS ONE LINE AND THE SPACE IS JUST RIGHT, PUT A
%RETURN IN AND THE RETURN IS CONVERTED TO A WORD SPACE AND IS
%THEREFORE INCORRECT
%BULLET LINE ON TITLE PAGE
\def\cities{\tenrm\baselineskip=12pt
  \centerline{Chichester{\hskip5pt$\eightb\cdot$\hskip7pt}New York{\hskip5pt$\eightb\cdot$\hskip7pt}Brisbane{\hskip7pt$\eightb\cdot$\hskip7pt}Toronto{\hskip6pt$\eightb\cdot$\hskip7pt}Singapore}}


% ADDED 3 JUNE 86 BY GEETI WITH BOLD AND BOLD ITALIC ADDED 8 JUNE 1986

%TO SET ALPHA CHARACTERS IN SIXPOINT ITALIC
\def\spi#1{{\sixit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SIXPOINT MEDIUM
\def\spm#1{{\sixrm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SIXPOINT BOLD
\def\spb#1{{\sixb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SIXPOINT BOLD ITALIC
\def\spbi#1{{\sixbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT ITALIC
\def\svi#1{{\sevenit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT MEDIUM
\def\svm#1{{\sevenrm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT BOLD
\def\svb#1{{\sevenb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN SEVENPOINT BOLD ITALIC
\def\svbi#1{{\sevenbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT ITALIC
\def\epi#1{{\eightit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT MEDIUM
\def\epm#1{{\eightrm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT BOLD
\def\epb#1{{\eightb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN EIGHTPOINT BOLD ITALIC
\def\epbi#1{{\eightbi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT ITALIC
\def\npi#1{{\nineit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT MEDIUM
\def\npm#1{{\ninerm\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT BOLD
\def\npb#1{{\nineb\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN NINEPOINT BOLD ITALIC
\def\npbi#1{{\ninebi\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN TENPOINT ITALIC
\def\tpi#1{{\tenit\hbox{#1}}}

%TO SET ALPHA CHARACTERS IN TENPOINT BOLD
\def\tpb#1{{\tenb\hbox{#1}}}

%TO SET INFERIOR MEDIUM O (for use as cap O in twelvepoint)
\def\info{{$_{\twelverm\hbox{o}}$}}

%TO SET A LINE ABOVE AN ITALIC H
\def\toph{{}\hglue3pt\raise1.7ex\hbox to 6pt{\hrulefill}\hglue-9pt}

%TO SET A LINE ABOVE AN ITALIC b
\def\topb{{}\raise1.7ex\hbox to 4pt{\hrulefill}\hglue-5pt}

%TO SET A LINE ABOVE AN ITALIC x
\def\barx{\hbox{{}\raise1.2ex\hbox to 4pt{\hrulefill}\hglue-6pt}}
\let\topx=\barx

%TO SET A LINE ABOVE AN INFERIOR ITALIC x
\def\ibarix{\hbox{{}\lower.65ex\hbox{\nineit x}\hglue-3pt\raise.4ex\hbox to 4pt{\hrulefill}}}


% ADDED 8 JUNE 86 BY GEETI amended to adjust spacing

%PER THOUSAND SYSMBOL
%macro to give per thousand symbol - amended because of use of trueital
\def\perthou{\%\nobreak\hskip-1.5pt\nobreak\lower.075ex\hbox{\eightit o}}

% ADDED 23 NOVEMBER 1986 BY GEETI

%Sets information in textstyle
\def\spover#1#2{$\textstyle{#1\lower0.5ex\null}\over{\raise2.0ex\null
\textstyle{#2}}$}


%These are utilised by some heading macros in individual macro files - do not remove!!!
%They are used to set numbered headings with an enspace before details and
%to give an indented second line
\def\widesaq#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}
\def\saq{\par\hang\newtextindent}
\def\newtextindent#1{\indent\hskip-\wd0{#1\enspace}
    \par\vskip-\baselineskip
    \parindent=\wd0\hangindent=\parindent\ignorespaces}


\def\drop{\vskip12pt}
\def\dropone{\vskip12pt}
\def\droptwo{\vskip12pt} 
\def\dropthree{\vskip12pt}
\def\dropfour{\vskip12pt}
\def\dropfive{\vskip12pt}


%To set the basic point size and leading
\tenrm\baselineskip=12pt

%To achieve a return arrow symbol at the left margin
%\def\ret{{$\fourteenb\lower8.0ex\hbox{$\longleftarrow$}$
%\vskip-12pt\hskip21pt$fourteenb\vrule depth 8pt width 1pt$}}

%To achieve a return arrow symbol within the text
\def\ret{{\fourteenb\hbox{$\leftarrow$}
\hskip-1pt\fourteenb\vbox{\hrule height 8pt width .5pt depth -3pt}}}


%to achieve not equals
\def\noteq{\vbox{\overfullrule=0pt\hbox to 0pt{\tt\char'075}\hskip-2pt\tt\char'057}}
\let\noteq=\neq

%to print pound sterling
\def\sterling{\it\char'044}

%TO SUPPRESS VARIABLE SPACING WITHIN DISPLAYMODE
\abovedisplayskip=0pt    %13pt
\abovedisplayshortskip=0pt
\belowdisplayskip=0pt    %13pt
\belowdisplayshortskip=0pt
\smallskipamount=0pt  %3.25pt
\medskipamount=0pt    %6.5pt
\bigskipamount=0pt    %13pt


%BOLD GREEK OMEGA
\def\bfom{{\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox to 0.1pt{$\omega$}\hbox to
0.1pt{$\omega$}\hbox{$\phantom\omega$}}}

%SCANDINAVIAN CAP A WITH ANGSTROM ACCENT OVER
\def\sa{\leavevmode\setbox0=\hbox{h}\dimen0=\ht0 \advance\dimen0 by-1ex
        \rlap{\raise.67\dimen0\hbox{\hskip1.5pt\char'27}}A}

%BOLD GREEK CHARACTERS
\def\tbclambda{{\font\sbit=cmmib10
            \hbox{\sbit\char'003}}\nobreak}

--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="CPMAC011.TEX"

%
% cpmac011.tex
% History: 
%  original ??
% 18.3.93 S Rahtz  added \figimportcen (import PS figure, and add
%                  caption). needs \input epsf
%
%\font\sixrm=cmr7 at 6pt
%\font\sixit=cmti7 at 6pt
%\font\sixb=cmbx7 at 6pt
%%\font\sixbi=cmbxsl7 at 6pt
%\font\sevenrm=cmr7 at 7pt
%\font\sevenit=cmti7 at 7pt
%\font\sevenb=cmbx7 at 7pt
%%\font\sevenbi=cmbxsl7 at 7pt
%\font\eightrm=cmr10 at 8pt
%\font\eightit=cmti10 at 8pt
%\font\eightb=cmbx10 at 8pt
%\font\eightbi=cmbxsl10 at 8pt
%\font\ninerm=cmr10 at 9pt
%\font\nineit=cmti10 at 9pt
%\font\nineb=cmbx10 at 9pt
%%\font\ninebi=cmbxsl10 at 9pt
%\font\tenrm=cmr10 at 10pt
%\font\tenit=cmti10 at 10pt
%\font\tenb=cmbx10 at 10pt
%\font\tenbi=cmbxsl10 at 10pt


\font\sixteenb=ptmb at 16pt
\font\tencm=pcrr at 10pt
\font\ninecm=pcrr at 9pt
\font\eightcm=pcrr at 8pt
\font\sevencm=pcrr at 7pt

\tolerance=50

%PAGE DEPTH
\vsize=588pt

%PAGE WIDTH
\hsize=360pt

%TO SET THE BASIC POINT SIZE 
\tenrm

%TO SET THE LEADING
\baselineskip=12pt

%FIRST PAGE RUNNING HEADLINE DETAILS
\def\fprh#1#2#3#4{\setbox5=%
                  \hbox{\ninerm\baselineskip=10pt%
                   CONCURRENCY: PRACTICE AND EXPERIENCE, VOL. #1(#2), #3 (#4)}}

%SET SPACE BETWEEN RULE IN HEADLINE AND FIRST LINE OF TEXT
\topskip=36pt

%ARTICLE TITLE
\def\art#1#2{{\sixteenb\baselineskip=18pt\raggedright
           \vglue-21pt{\noindent#1}\vskip13pt}
           \setbox4=\hbox{\eightrm#2}}

%AUTHORS NAME
\def\auth#1#2{{\eightrm\baselineskip=9pt
            {\noindent#1\hfil}\vskip3pt}
            \setbox3=\hbox{\eightrm#2}}

\def\authtwo#1{{\eightrm\baselineskip=9pt
            {\noindent#1\hfil}\vskip3pt}}

\let\xpar=\par
%ADDRESS LINE 1
\def\adone#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}

%ADDRESS LINE 2
\def\adtw#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}

%ADDRESS LINE 3
\def\adth#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}

%ADDRESS LINE 4
\def\adfo#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}

%ADDRESS LINE 5
\def\adfi#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}

%END OF aDDRESS
\def\aend{\vskip13pt\hrule\vskip30pt}

%SUMMARY OF ARTICLE
\long\def\summ#1{{\nineb\baselineskip=10pt
            \noindent SUMMARY\vskip2pt\noindent#1\xpar}}

%KEY WORDS
\def\key#1{\vskip12pt{\eightrm\baselineskip=10pt
            {\widesaq{KEY WORDS\quad}\saq{KEY WORDS}{#1\xpar}}}}

%HEADING LEVEL A --- CAPS
\def\heada#1{{\vskip18pt\tenb\baselineskip=12pt
             \noindent\uppercase{#1}\vskip6pt}\nobreak\noindent\ignorespaces}

\def\headano#1#2{\vskip18pt{\tenb\baselineskip=12pt
                {\widesaq{#1}
                \saq{#1} {\uppercase{#2}\xpar}}}
                \vskip6pt\nobreak\noindent\ignorespaces}

%HEADING LEVEL B
\def\headb#1{{\vskip18pt\tenb\baselineskip=12pt
            \noindent #1\vskip6pt}\nobreak\noindent\ignorespaces}

\def\headbno#1#2{\vskip18pt{\tenb\baselineskip=12pt
                {\widesaq{#1}
                \saq{#1} {#2\xpar}}}
                \vskip6pt\nobreak\noindent\ignorespaces}

%HEADING LEVEL B FOLLOWING A HEADING
\def\headba#1{{\vskip6pt\tenb\baselineskip=12pt
            \noindent #1\vskip6pt}\nobreak\noindent\ignorespaces}

\def\headbano#1#2{\vskip6pt{\tenb\baselineskip=12pt
                {\widesaq{#1}
                \saq{#1} {#2\xpar}}}
                \vskip6pt\nobreak\noindent\ignorespaces}

%HEADING LEVEL C
\def\headc#1{{\vskip18pt\tenit\baselineskip=12pt
            \noindent #1\vskip6pt}\nobreak\noindent\ignorespaces}

\def\headcno#1#2{\vskip18pt{\tenit\baselineskip=12pt
                {\widesaq{#1}
                \saq{#1} {#2\xpar}}}
                \vskip6pt\nobreak\noindent\ignorespaces}

%HEADING LEVEL C FOLLOWING B HEADING
\def\headcb#1{{\vskip6pt\tenit\baselineskip=12pt
            \noindent #1\vskip6pt}\nobreak\noindent\ignorespaces}

\def\headcbno#1#2{\vskip6pt{\tenit\baselineskip=12pt
                {\widesaq{#1}
                \saq{#1} {#2\xpar}}}
                \vskip6pt\nobreak\noindent\ignorespaces}

\def\headctab#1{{\vskip3pt\tenit\baselineskip=12pt
            \noindent #1\vskip6pt}\nobreak\noindent\ignorespaces}

%ACKNOWLEDGEMENTS
\def\ack{{\vskip18pt\tenb\baselineskip=12pt
             \noindent ACKNOWLEDGEMENTS\vskip6pt}\nobreak\noindent\ignorespaces}

%REFERENCES
\def\refs{{\vskip18pt\tenb\baselineskip=12pt
             \noindent REFERENCES\vskip8pt}\ninerm\baselineskip=10pt}

%CONTROLS ALIGNMENT OF REFERENCES
%WREF   ****check layout for multiple digits
\def\wref#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}
\def\ref{\par\hang\reftext}
\def\reftext#1{\noindent\hskip\wd0\llap{#1\enspace}
    \par\vskip-\parskip\vskip-\baselineskip
    \parindent=\wd0\hangindent=\parindent\ignorespaces}

%PARAGRAPHS---SPACE BETWEEN
%To ensure no additional space is placed between paragraphs set \parskip at 0pt
\parskip=0pt

%PARAGRAPH INDENTATION
%When in 10/12pt the indentation should be set to 10pt. When in 9/10pt the
%indentation should be set to 9pt.
\parindent=10pt

%HANGINDENT
%This sets the hanging indentation level.
\hangindent=10pt

%FOOTNOTES
%This is how the footnote is defined and what it uses to
%set the footnote
\def\footnote#1{\insert\footins\bgroup
  \eightrm\baselineskip=9pt
  \setbox\strutbox=\hbox{\vrule height5.5pt depth1.5pt width0pt}
  \interlinepenalty\interfootnotelinepenalty
  \splittopskip\ht\strutbox % top baseline for broken footnotes
  \splitmaxdepth\dp\strutbox \floatingpenalty2000
  \leftskip0pt \rightskip0pt
  \noindent\hbox to \parindent{#1\hss}\ignorespaces\hangindent\parindent
  \footstrut\futurelet\next\foat}
\def\foat{\ifcat\bgroup\noexpand\next \let\next\faat
  \else\let\next\fat\fi \next}
\def\faat{\bgroup\aftergroup\afoot\let\next}
\def\fat#1{#1\afoot}
\def\afoot{\strut\egroup}
\skip\footins=9pt

%Footnotes will be automatically set in 8/9pt and should be coded
%as follows:
%Text within the paragraph {$^1$}\footnote {$^1$}{Data to be set as footnote.}

%WIDEITEM
\def\wideitem#1{\setbox0=\hbox{#1\enspace}\parindent=\wd0\hangindent=\parindent}

%QUOTATION INDENTED 1em EACH SIDE SET IN 9/10pt
\def\quotea#1{{\narrower\ninerm\baselineskip=10pt\noindent{#1}\xpar}}

%QUOTATION INDENTED 2em EACH SIDE SET IN 9/10pt
\def\quoteb#1{{\narrower\narrower\ninerm\baselineskip=10pt
               \noindent{#1}\xpar}}

%QUOTATION INDENTED 1em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quotec#1{{\narrower\noindent{#1}\xpar}}

%QUOTATION INDENTED 2em EACH SIDE SET IN GENERAL TEXT TYPESIZE
\def\quoted#1{{\narrower\narrower\noindent{#1}\xpar}}

%FIGURE CAPTION MACROS TO SET SPACE FOR CAPTION, COMMENT IN THE SPACE
%AND THE CAPTION ITSELF
%ADD WIDTH AND DEPTH OF FIGURE IN ADDITION TO THE NORMAL CODING

%MEASUREMENTS IN POINTS
%To set caption which is one line only
\def\figspone#1#2#3#4{\vskip12pt
                      {\nineit\baselineskip=10pt  
                      \vbox to #4pc{\line{\hfill\hbox to #3pc{\hrulefill}\hfill}
                      \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                      \vfill
                      \line{\hfill\hbox to #3pc{\hrulefill}\hfill}}
                      \vskip12pt
                      \centerline{{\nineit #1}\quad{\nineit #2}}}}

\def\figone#1#2{{\nineit\baselineskip=10pt  
               \centerline{{#1}\quad{#2}}}}

%To set caption which is more than one line
\def\figsp#1#2#3#4{\vskip12pt                 
                   {\nineit\baselineskip=10pt  
                   \vbox to #4pc{\line{\hfill\hbox to #3pc{\hrulefill}\hfill}
                   \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                   \vfill
                   \line{\hfill\hbox to #3pc{\hrulefill}\hfill}}
                   \vskip12pt
                   {\noindent #1} {#2\xpar}}}

%To set caption which is more than one line with last line centred
\def\figspcen#1#2#3#4#5{\vskip12pt
                        {\nineit\baselineskip=10pt  
                        \vbox to #5pc{\line{\hfill\hbox to #4pc{\hrulefill}\hfill}
                        \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                        \vfill
                        \line{\hfill\hbox to #4pc{\hrulefill}\hfill}}
                        \vskip12pt
                        {\noindent #1}\quad {#2\break}
                        \vskip-10pt
                        \centerline{#3}}}
%--------------------------------------------------------------
% To set caption which is more than one line with last line centred,
% and which includes an imported PostScript figures
% S Rahtz March 1993. needs a \input of epsf.tex
%
\def\figimportcen#1#2#3#4{% #1 figure number
			  % #2 figure caption
			  % #3 name of PS file
			  % #4 magnification (percentage of original)
% defines \epsfxsize to be #4 of the natural width
\def\epsfsize##1##2{#4##1}%
%
			\vbox{% keep it all together!
			\vskip12pt
			\centerline{\epsfbox{#3}}
                        {\nineit\baselineskip=10pt  
                        \vskip12pt
% a trick from Eijkhout to centre last line of the paragraph
% automatically 
			\leftskip=0cm plus 0.5fil
			\rightskip=0cm plus -0.5fil
			\parfillskip 0cm plus 1fil
			\noindent #1 #2\par}}
			\vskip12pt}
%
% \caption to allow stuff imported from LaTeX to be minimally altered.
% just add stuff on the end (fig num, file name, mag)
%
\def\caption[#1]#2#3#4#5{% toc caption
			   % real caption
			   % fig num
			   % fig file name
			   % magnification
\figimportcen{Figure #3.}{#2}{#4}{#5}}
%
%  ---- end of SPQR additions ----
%To set caption which is two lines each of which must be centred
\def\figspcentwo#1#2#3#4#5{\vskip12pt
                           {\nineit\baselineskip=10pt  
                           \vbox to #5pc{\line{\hfill\hbox to #4pc{\hrulefill}\hfill}
                           \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                           \vfill
                           \line{\hfill\hbox to #4pc{\hrulefill}\hfill}}
                           \vskip12pt
                           \centerline{{#1} {#2}}
                           \centerline{#3}}}

%USE THIS TO SET SPACE FOR AN INSERT WHICH HAS NO CAPTION
%This will set space for an insert
\def\inssp#1#2#3{\vglue12pt
                   \vbox to #3pc{\line{\hfill\hbox to #2pc{\hrulefill}\hfill}
                   \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                   \vfill
                   \line{\hfill\hbox to #2pc{\hrulefill}\hfill}}}


%TO SET CAPTIONS FOR PAGE PROOFS(I.E HRULE NOT PRINTED}
%To set caption which is one line only
\def\figsponepp#1#2#3#4{\vskip12pt
                      {\nineit\baselineskip=10pt  
                      \vbox to #4pc{\line{\hfill\hbox to #3pc{}\hfill}
                      \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                      \vfill
                      \line{\hfill\hbox to #3pc{}\hfill}}
                      \vskip12pt
                      \centerline{{#1} {#2}}}}

%To set caption which is more than one line
\def\figsppp#1#2#3#4{\vskip12pt
                   {\nineit\baselineskip=10pt  
                   \vbox to #4pc{\line{\hfill\hbox to #3pc{}\hfill}
                   \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                   \vfill
                   \line{\hfill\hbox to #3pc{}\hfill}}
                   \vskip12pt
                   {\noindent #1} {#2\xpar}}}

%To set caption which is more than one line with last line centred
\def\figspcenpp#1#2#3#4#5{\vskip12pt
                        {\nineit\baselineskip=10pt  
                        \vbox to #5pc{\line{\hfill\hbox to #4pc{}\hfill}
                        \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                        \vfill
                        \line{\hfill\hbox to #4pc{}\hfill}}
                        \vskip12pt 
                        {\noindent #1} {#2\break}
                        \vskip-10pt
                        \centerline{#3}}}

%To set caption which is two lines each of which must be centred
\def\figspcentwopp#1#2#3#4#5{\vskip12pt
                           {\nineit\baselineskip=10pt  
                           \vbox to #5pc{\line{\hfill\hbox to #4pc{}\hfill}
                           \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                           \vfill
                           \line{\hfill\hbox to #4pc{}\hfill}}
                           \vskip12pt
                           \centerline{{#1} {#2}}
                           \centerline{#3}}}

%This will set space for an insert
\def\inssppp#1#2#3{\vskip12pt
                   \vbox to #3pc{\line{\hfill\hbox to #2pc{}\hfill}
                   \vfill
                      \centerline{\nineb ************************}
                      \centerline{\nineb INSERT #1 HERE}
                      \centerline{\nineb*************************}
                   \vfill
                   \line{\hfill\hbox to #2pc{}\hfill}}}


%TABLE CAPTIONS
%To set caption which is one line only
\def\tabone#1{{\ninerm\baselineskip=10pt
              \centerline{#1}}}

%To set caption which is more than one line
\def\tab#1{{\ninerm\baselineskip=10pt{\noindent #1\xpar}}}

%To set caption which is more than one line with last line centred
\def\tabcen#1#2{{\ninerm\baselineskip=10pt     
             \vbox{\noindent#1\break}\vskip-10pt
             \centerline{#2}
             \tenrm\baselineskip=12pt
             \parindent=12pt}}

% to set two line table caption with both lines centred
\def\centab#1#2{{\ninerm\baselineskip=10pt
             \centerline{#1}
             \centerline{#2}}}

%TABLE RULES
\def\tabrulel{\noalign{\hrule height 3pt depth-2.75pt}}
\def\tabrule{\noalign{\hrule}}
\def\tabrulet{\noalign{\hrule height 3pt depth-2.5pt}}
\def\hlfill{\leaders\vrule height 5pt depth-4.75pt\hfill}

%TABLE FOOTNOTE IN 8/9PT
\def\tabnote{\eightrm\baselineskip=9pt}
            
%Footnotes will be automatically set in 8/9pt and should be coded
%as follows:
\def\footnote#1{\insert\footins\bgroup
  \eightrm\baselineskip=9pt
  \vskip1pt plus 2pt minus 2pt
  \setbox\strutbox=\hbox{\vrule height5.5pt depth1.5pt width0pt}
  \interlinepenalty\interfootnotelinepenalty
  \splittopskip\ht\strutbox % top baseline for broken footnotes
  \splitmaxdepth\dp\strutbox \floatingpenalty2000
  \leftskip0pt \rightskip0pt
  \noindent\hbox to \parindent{#1\hss}\ignorespaces
  \footstrut\futurelet\next\foat}
\def\foat{\ifcat\bgroup\noexpand\next \let\next\faat
  \else\let\next\fat\fi \next}
\def\faat{\bgroup\aftergroup\afoot\let\next}
\def\fat#1{#1\afoot}
\def\afoot{\strut\egroup}
\skip\footins=9pt

%END OF FIRST PAGE SHOWING ISSN, DATE RECEIVED, COPYRIGHT, AND DATE REVISED
%THIS IS A COPY OF THE FOOTNOTE MACRO FOR USE ON THE FIRST PAGE ONLY
\def\coden#1{\insert\footins\bgroup
  \eightit\baselineskip=9pt
  \setbox\strutbox=\hbox{\vrule height2.5pt width0pt}
  \interlinepenalty\interfootnotelinepenalty
  \splittopskip\ht\strutbox % top baseline for broken footnotes
  \splitmaxdepth\dp\strutbox \floatingpenalty2000
  \leftskip0pt \rightskip0pt
  \noindent\hbox to \parindent{#1\hss}\ignorespaces
  \footstrut\futurelet\next\foat}
\def\foat{\ifcat\bgroup\noexpand\next \let\next\faat
  \else\let\next\fat\fi \next}
\def\faat{\bgroup\aftergroup\afoot\let\next}
\def\fat#1{#1\afoot}
\def\afoot{\strut\egroup}
\skip\footins=12pt

%NEW MACROS ADDED TO INCREMENT FOOTNOTE NUMBER SEQUENTIALLY
\newcount\ftno
\def\clearftno{\ftno=0}
\def\note{\advance\ftno by 1
          $^{\the\ftno}$
          \footnote{${^\the\ftno}$}}
\clearftno

%THIS REDEFINES THE FOOTNOTE RULE FOR USE ON THE FIRST PAGE. 
%IF FOOTNOTES ARE REQUIRED WITHIN AN ARTICLE AND THE LINE REQUIRED 
%IN THIS SITUATION IS DIFFERENT IT WILL NEED TO BE REDEFINED WITHIN THE 
%FILE AFTER THE FIRST PAGE HAS BEEN COMPOSED
\def\footnoterule{\vbox{\vrule height 3pt width 0pt\kern-3pt\hrule width 360pt depth-2pt height3pt\kern2.6pt
                  \vrule height1pt depth1.5pt width0pt}}

%\coden{issn}{\hfill received\break copy\hfill revised}


%TO SET BLACK BOX FOR MISSING PAGE REFERENCES
\def\mn{\setbox0=\hbox{3}{\vrule height5pt depth -1pt width\wd0}}

%SUPPRESS VARIABLE SPACING ABOVE AND BELOW DISPLAY DATA
\abovedisplayskip=0pt    
\abovedisplayshortskip=0pt
\belowdisplayskip=0pt   
\belowdisplayshortskip=0pt
\smallskipamount=0pt 
\medskipamount=0pt    
\bigskipamount=0pt  

%EXTRACT/QUOTATIONS
\long\def\quote#1{{\ninerm\baselineskip=10pt\narrower\narrower
\vskip6pt\noindent #1\xpar}}

%REDEFINED FOR USE IN FOOTNOTES AND TABLE FOOTNOTES
%SUPERIOR
\def\sspm#1{{\sixrm\lower.4ex\hbox{\hskip.1pt#1}}}
\def\sspi#1{{\sixrm\lower.4ex\hbox{\hskip.1pt#1}}}

\def\noteq{\vbox{\overfullrule=0pt\hbox{\hbox to 0pt{\tt\char'075}\tt\char'057}}\relax}
\let\ne=\noteq
\let\neq=\noteq

%TO SET BOX ROUND THE ABSTRACT DETAILS ON CONTENTS PAGE
\newdimen\dwidth
\def\dwidth{\displaywidth}
\def\boxit#1{\vbox{\hrule height.5pt\hbox{\vrule width.5pt\kern18pt
             \vbox{\kern20pt#1\kern10pt}\kern18pt\vrule width.5pt}\hrule 
height.5pt}}

\overfullrule=0pt

%TO SET BOLD GREEK
\def\bldgreek#1{{$#1$}\hskip-6.08401pt
{$#1$}\hskip-6.08401pt{$#1$}\hskip-6.08401pt
{$#1$}\hskip-6.08401pt{$#1$}\hskip-6.08401pt
{$#1$}\hskip-6.08401pt{$#1$}}
%To use
%This is a test for \bldgreek{\beta}, bold beta.

\def\scm#1{{\sevencm\hbox{#1}}}

\def\cstok#1{\leavevmode\thinspace\hbox{\vrule\vtop{\vbox{\hrule\kern1pt
            \hbox{\vphantom\thinspace{#1}\thinspace}}
            \kern1pt\hrule}\vrule}\thinspace}



\def\tabimportcen#1#2#3#4{% #1 table number
			  % #2 table caption
			  % #3 name of PS file
			  % #4 magnification (percentage of original)
% defines \epsfxsize to be #4 of the natural width
\def\epsfsize##1##2{#4##1}%
%
			\vbox{% keep it all together!
			\vskip12pt
			\centerline{\epsfbox{#3}}
                        {\nineit\baselineskip=10pt  
                        \vskip12pt
% a trick from Eijkhout to centre last line of the paragraph
% automatically 
			\leftskip=0cm plus 0.5fil
			\rightskip=0cm plus -0.5fil
			\parfillskip 0cm plus 1fil
			\noindent #1 #2\par}}
			\vskip12pt}
%
% \caption to allow stuff imported from LaTeX to be minimally altered.
% just add stuff on the end (fig num, file name, mag)
%
\def\tabcaption[#1]#2#3#4#5{% toc caption
			   % real caption
			   % tab num
			   % tab file name
			   % magnification
\tabimportcen{}{#2}{#4}{#5}}
%
%  ---- end of SPQR additions ----

--=====================_800056270==_
Content-Type: text/plain; charset="us-ascii"
Content-Disposition: attachment; filename="EPSF.TEX"

%   EPSF.TEX macro file:
%   Written by Tomas Rokicki of Radical Eye Software, 29 Mar 1989.
%   Revised by Don Knuth, 3 Jan 1990.
%   Revised by Tomas Rokicki to accept bounding boxes with no
%      space after the colon, 18 Jul 1990.
%
%   TeX macros to include an Encapsulated PostScript graphic.
%   Works by finding the bounding box comment,
%   calculating the correct scale values, and inserting a vbox
%   of the appropriate size at the current position in the TeX document.
%
%   To use with the center environment of LaTeX, preface the \epsffile
%   call with a \leavevmode.  (LaTeX should probably supply this itself
%   for the center environment.)
%
%   To use, simply say
%   \input epsf           % somewhere early on in your TeX file
%   \epsfbox{filename.ps} % where you want to insert a vbox for a figure
%
%   Alternatively, you can type
%
%   \epsfbox[0 0 30 50]{filename.ps} % to supply your own BB
%
%   which will not read in the file, and will instead use the bounding
%   box you specify.
%
%   The effect will be to typeset the figure as a TeX box, at the
%   point of your \epsfbox command. By default, the graphic will have its
%   `natural' width (namely the width of its bounding box, as described
%   in filename.ps). The TeX box will have depth zero.
%
%   You can enlarge or reduce the figure by saying
%     \epsfxsize=<dimen> \epsfbox{filename.ps}
%   (or
%     \epsfysize=<dimen> \epsfbox{filename.ps})
%   instead. Then the width of the TeX box will be \epsfxsize and its
%   height will be scaled proportionately (or the height will be
%   \epsfysize and its width will be scaled proportiontally).  The
%   width (and height) is restored to zero after each use.
%
%   A more general facility for sizing is available by defining the
%   \epsfsize macro.    Normally you can redefine this macro
%   to do almost anything.  The first parameter is the natural x size of
%   the PostScript graphic, the second parameter is the natural y size
%   of the PostScript graphic.  It must return the xsize to use, or 0 if
%   natural scaling is to be used.  Common uses include:
%
%      \epsfxsize  % just leave the old value alone
%      0pt         % use the natural sizes
%      #1          % use the natural sizes
%      \hsize      % scale to full width
%      0.5#1       % scale to 50% of natural size
%      \ifnum#1>\hsize\hsize\else#1\fi  % smaller of natural, hsize
%
%   If you want TeX to report the size of the figure (as a message
%   on your terminal when it processes each figure), say `\epsfverbosetrue'.
%
\newread\epsffilein    % file to \read
\newif\ifepsffileok    % continue looking for the bounding box?
\newif\ifepsfbbfound   % success?
\newif\ifepsfverbose   % report what you're making?
\newdimen\epsfxsize    % horizontal size after scaling
\newdimen\epsfysize    % vertical size after scaling
\newdimen\epsftsize    % horizontal size before scaling
\newdimen\epsfrsize    % vertical size before scaling
\newdimen\epsftmp      % register for arithmetic manipulation
\newdimen\pspoints     % conversion factor
%
\pspoints=1bp          % Adobe points are `big'
\epsfxsize=0pt         % Default value, means `use natural size'
\epsfysize=0pt         % ditto
%
\def\epsfbox#1{\global\def\epsfllx{72}\global\def\epsflly{72}%
   \global\def\epsfurx{540}\global\def\epsfury{720}%
   \def\lbracket{[}\def\testit{#1}\ifx\testit\lbracket
   \let\next=\epsfgetlitbb\else\let\next=\epsfnormal\fi\next{#1}}%
%
\def\epsfgetlitbb#1#2 #3 #4 #5]#6{\epsfgrab #2 #3 #4 #5 .\\%
   \epsfsetgraph{#6}}%
%
\def\epsfnormal#1{\epsfgetbb{#1}\epsfsetgraph{#1}}%
%
\def\epsfgetbb#1{%
%
%   The first thing we need to do is to open the
%   PostScript file, if possible.
%
\openin\epsffilein=#1
\ifeof\epsffilein\errmessage{I couldn't open #1, will ignore it}\else
%
%   Okay, we got it. Now we'll scan lines until we find one that doesn't
%   start with %. We're looking for the bounding box comment.
%
   {\epsffileoktrue \chardef\other=12
    \def\do##1{\catcode`##1=\other}\dospecials \catcode`\ =10
    \loop
       \read\epsffilein to \epsffileline
       \ifeof\epsffilein\epsffileokfalse\else
%
%   We check to see if the first character is a % sign;
%   if not, we stop reading (unless the line was entirely blank);
%   if so, we look further and stop only if the line begins with
%   `%%BoundingBox:'.
%
          \expandafter\epsfaux\epsffileline:. \\%
       \fi
   \ifepsffileok\repeat
   \ifepsfbbfound\else
    \ifepsfverbose\message{No bounding box comment in #1; using defaults}\fi\fi
   }\closein\epsffilein\fi}%
%
%   Now we have to calculate the scale and offset values to use.
%   First we compute the natural sizes.
%
\def\epsfclipstring{}% do we clip or not?  If so,
\def\epsfclipon{\def\epsfclipstring{ clip}}%
\def\epsfclipoff{\def\epsfclipstring{}}%
%
\def\epsfsetgraph#1{%
   \epsfrsize=\epsfury\pspoints
   \advance\epsfrsize by-\epsflly\pspoints
   \epsftsize=\epsfurx\pspoints
   \advance\epsftsize by-\epsfllx\pspoints
%
%   If `epsfxsize' is 0, we default to the natural size of the picture.
%   Otherwise we scale the graph to be \epsfxsize wide.
%
   \epsfxsize\epsfsize\epsftsize\epsfrsize
   \ifnum\epsfxsize=0 \ifnum\epsfysize=0
      \epsfxsize=\epsftsize \epsfysize=\epsfrsize
      \epsfrsize=0pt
%
%   We have a sticky problem here:  TeX doesn't do floating point arithmetic!
%   Our goal is to compute y = rx/t. The following loop does this reasonably
%   fast, with an error of at most about 16 sp (about 1/4000 pt).
% 
     \else\epsftmp=\epsftsize \divide\epsftmp\epsfrsize
       \epsfxsize=\epsfysize \multiply\epsfxsize\epsftmp
       \multiply\epsftmp\epsfrsize \advance\epsftsize-\epsftmp
       \epsftmp=\epsfysize
       \loop \advance\epsftsize\epsftsize \divide\epsftmp 2
       \ifnum\epsftmp>0
          \ifnum\epsftsize<\epsfrsize\else
             \advance\epsftsize-\epsfrsize \advance\epsfxsize\epsftmp \fi
       \repeat
       \epsfrsize=0pt
     \fi
   \else \ifnum\epsfysize=0
     \epsftmp=\epsfrsize \divide\epsftmp\epsftsize
     \epsfysize=\epsfxsize \multiply\epsfysize\epsftmp   
     \multiply\epsftmp\epsftsize \advance\epsfrsize-\epsftmp
     \epsftmp=\epsfxsize
     \loop \advance\epsfrsize\epsfrsize \divide\epsftmp 2
     \ifnum\epsftmp>0
        \ifnum\epsfrsize<\epsftsize\else
           \advance\epsfrsize-\epsftsize \advance\epsfysize\epsftmp \fi
     \repeat
     \epsfrsize=0pt
    \else
     \epsfrsize=\epsfysize
    \fi
   \fi
%
%  Finally, we make the vbox and stick in a \special that dvips can parse.
%
   \ifepsfverbose\message{#1: width=\the\epsfxsize, height=\the\epsfysize}\fi
   \epsftmp=10\epsfxsize \divide\epsftmp\pspoints
   \vbox to\epsfysize{\vfil\hbox to\epsfxsize{%
      \ifnum\epsfrsize=0\relax
        \special{PSfile=#1 llx=\epsfllx\space lly=\epsflly\space
            urx=\epsfurx\space ury=\epsfury\space rwi=\number\epsftmp
            \epsfclipstring}%
      \else
        \epsfrsize=10\epsfysize \divide\epsfrsize\pspoints
        \special{PSfile=#1 llx=\epsfllx\space lly=\epsflly\space
            urx=\epsfurx\space ury=\epsfury\space rwi=\number\epsftmp\space
            rhi=\number\epsfrsize \epsfclipstring}%
      \fi
      \hfil}}%
\global\epsfxsize=0pt\global\epsfysize=0pt}%
%
%   We still need to define the tricky \epsfaux macro. This requires
%   a couple of magic constants for comparison purposes.
%
{\catcode`\%=12 \global\let\epsfpercent=%\global\def\epsfbblit{%BoundingBox}}%
%
%   So we're ready to check for `%BoundingBox:' and to grab the
%   values if they are found.
%
\long\def\epsfaux#1#2:#3\\{\ifx#1\epsfpercent
   \def\testit{#2}\ifx\testit\epsfbblit
      \epsfgrab #3 . . . \\%
      \epsffileokfalse
      \global\epsfbbfoundtrue
   \fi\else\ifx#1\par\else\epsffileokfalse\fi\fi}%
%
%   Here we grab the values and stuff them in the appropriate definitions.
%
\def\epsfempty{}%
\def\epsfgrab #1 #2 #3 #4 #5\\{%
\global\def\epsfllx{#1}\ifx\epsfllx\epsfempty
      \epsfgrab #2 #3 #4 #5 .\\\else
   \global\def\epsflly{#2}%
   \global\def\epsfurx{#3}\global\def\epsfury{#4}\fi}%
%
%   We default the epsfsize macro.
%
\def\epsfsize#1#2{\epsfxsize}
%
%   Finally, another definition for compatibility with older macros.
%
\let\epsffile=\epsfbox