From Jacques.Andre@irisa.fr Tue Feb  2 08:49:16 1993
To: yannis@gat
X-Charset: LATIN1
X-Char-Esc: 29



% ======epoddPS.tex

% EPMACDIS.TEX -  macros for distribution as of 01-09-89
%
% TeX macro set for EP-odd journal
% Electronic Publishing -- Origination, Dissemination and Design
% Published by John Wiley & Son, Chichester, England
%
% UK and European Editor: Dr. David Brailsford, University of Nottingham <dfb@cs.nott.ac.uk>
% US Editor: Dr. Richard J. Beach, Xerox PARC <Beach.pa@Xerox.com>
%====================================================

%THE FOLLOWING DEFINE TIMES AND COURIER - PLEASE AMEND IF NOT AVAILABLE
%ON YOUR SYSTEM
\font\fiverm=Times-Roman at 5pt
\font\fiveit=Times-Italic at 5pt
\font\fiveb=Times-Bold at 5pt
\font\sevenrm=Times-Roman at 7pt
\font\sevenit=Times-Italic at 7pt
\font\sevenb=Times-Bold at 7pt
\font\sevenbi=Times-BoldItalic at 7pt
\font\sevenci=Courier-Oblique at 7pt
\font\eightrm=Times-Roman at 8pt
\font\eightit=Times-Italic at 8pt
\font\eightb=Times-Bold at 8pt
\font\eightcm=Courier at 8pt
\font\eightcb=Courier-Bold at 8pt
\font\ninerm=Times-Roman at 9pt
\font\nineit=Times-Italic at 9pt
\font\nineb=Times-Bold at 9pt
\font\ninebi=Times-BoldItalic at 9pt
\font\ninecm=Courier at 9pt
\font\ninecb=Courier-Bold at 9pt
\font\nineci=Courier-Oblique at 9pt
\font\tenrm=Times-Roman at 10pt
\font\tenit=Times-Italic at 10pt
\font\tenb=Times-Bold at 10pt
\font\tensc=Times-Roman at 8pt
\font\tencm=Courier at 10pt
\font\tencb=Courier-Bold at 10pt
\font\twelverm=Times-Roman at 12pt
\font\twelveit=Times-Italic at 12pt
\font\sixteenb=Times-Bold at 16pt

\tolerance=50

%Page depth
\vsize=588pt

%Page width
\hsize=360pt

%Utility macros
\let\xpar=\par

%First page running headline details
\def\fprh#1#2#3#4{\setbox5=%
                  \hbox{\ninerm\baselineskip=10pt%
                   ELECTRONIC PUBLISHING, VOL. #1(#2), #3 (#4)}}

%Set space between rule in headline and first line of text
\topskip=36pt

%System details printed in footline
\footline={\tenrm\ifnum\pageno=1\hss\folio       %AMEND PAGE NUMBER
           \space\space\today\hss
           \else
           \hss\tenrm\today\hss\fi}

%\footline={}

%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

\def\svm#1{{\sevenrm\hbox{#1}}}

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

%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
  
%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}

%Running headline details
\headline={\tenrm\baselineskip=12pt\vbox{\ifnum\pageno=19\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}}

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

%Authors name
\def\auth#1{{\eightrm\baselineskip=9pt
            \noindent#1\hfil}\vskip3pt\setbox3=\hbox{\eightrm#1}}

%Address line 1
\def\adone#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\xpar}}%xpar

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

%Address line 3
\def\adth#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\par}}%\xpar

%Address line 4
\def\adfo#1{{\eightit\baselineskip=9pt
            \noindent#1\hfil\par}}%\xpar

%End of Address
\def\aend{\vskip13pt\hrule\vskip30pt}

%Summary of article
\long\def\summ#1{{\nineb\baselineskip=10pt
            \noindent SUMMARY\vskip2pt\noindent#1\par}}%\xpar

%Key words
\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-\parskip\vskip-\baselineskip
    \parindent=\wd0\hangindent=\parindent\ignorespaces}

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

%Heading level A
\def\heada#1{{\vskip18pt\tenb\baselineskip=12pt
             \noindent #1\vskip6pt}\noindent\ignorespaces}

%Heading level B
\def\headb#1{{\vskip18pt\tenb\baselineskip=12pt
            \noindent#1\vskip6pt}}

%Heading level C
\def\headc#1{{\vskip18pt\tenit\baselineskip=12pt
            \noindent#1\vskip6pt}}

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

%Acknowledgements
\def\ack{{\vskip18pt\tenrm\baselineskip=12pt
             \noindent ACKNOWLEDGEMENTS\vskip6pt}\noindent\ignorespaces}

%References
\def\refs{{\vskip18pt\tenrm\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}

%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.
%
%}

%TABLE CAPTIONS AND 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}
%To set caption which is one line only
\def\tabone#1#2{{\ninerm\baselineskip=10pt
              \centerline{{\ninerm #1 }{#2}}}}

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

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

% to set tabnote in 8/9pt
\def\tabnote{\eightrm\baselineskip=9pt}

%to set asterisk in 9/10 table
\def\tabast{{\tenrm\raise0.12ex\hbox{*}}}

%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\figsponepp#1#2#3#4{\vglue12pt
                      {\nineit\baselineskip=10pt  
                      \vbox to #4pt{\line{\hfill\hbox to #3pt{\hrulefill}\hfill}
                      \vfill
                      \centerline{\tenb ************************}
                      \centerline{\tenb INSERT #1 HERE}
                      \centerline{\tenb*************************}
                      \vfill
                      \line{\hfill\hbox to #3pt{\hrulefill}\hfill}}
                      \vskip12pt
                      \centerline{{#1} {#2}}}}

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

%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 #3pt{\line{\hfill\hbox to #2pt{\hrulefill}\hfill}
                   \vfill
                      \centerline{\tenb ************************}
                      \centerline{\tenb INSERT #1 HERE}
                      \centerline{\tenb*************************}
                   \vfill
                   \line{\hfill\hbox to #2pt{\hrulefill}\hfill}}}


%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}}

%Footnotes
\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 8pt{#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

%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




