% Base style for use with TCI Style Editor.  
\typeout{Style Editor Base: Standard Article  <1 July 1994>.}
\typeout{NOTICE:  This macro file is NOT proprietary and may be 
freely copied and distributed.}

\def\contentsname{Contents}
\def\listfigurename{List of Figures}
\def\listtablename{List of Tables}
\def\refname{References}
\def\figurename{Figure}
\def\tablename{Table}
\def\abstractname{Abstract}

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

\def\ds@twoside{\@twosidetrue
           \@mparswitchtrue}

\def\ds@draft{\overfullrule 5\p@}

\newif\if@titlepage \@titlepagefalse
\def\ds@titlepage{\@titlepagetrue}

\def\ds@twocolumn{\@twocolumntrue}

\@options

\input art1\@ptsize.sty\relax



\def\p@enumii{\theenumi}
\def\p@enumiii{\theenumi(\theenumii)}
\def\p@enumiv{\p@enumiii\theenumiii}

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

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

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

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

\let\enddescription\endlist

\def\theequation{\arabic{equation}}

\arraycolsep 5pt
\tabcolsep 6pt
\arrayrulewidth .4pt
\doublerulesep 2pt
\tabbingsep \labelsep
\skip\@mpfootins = \skip\footins
\fboxsep = 3pt
\fboxrule = .4pt
\def\@pnumwidth{1.55em}
\def\@tocrmarg {2.55em}
\def\@dotsep{4.5}
\setcounter{topnumber}{2}
\def\topfraction{.7}
\setcounter{bottomnumber}{1}
\def\bottomfraction{.3}
\setcounter{totalnumber}{3}
\def\textfraction{.2}
\def\floatpagefraction{.5}
\setcounter{dbltopnumber}{2}
\def\dbltopfraction{.7}
\def\dblfloatpagefraction{.5}




\newcounter {section}
\newcounter {subsection}[section]

\newif\ifsecdisp
\newif\ifsecfirstindent
\newif\ifsubsecdisp
\newif\ifsubsecfirstindent

\def\section{\@startsection{section}{1}{\secindent}
                     {\befsecskip}{\aftsecskip}{\secjust\secsize\secstyle}}

\def\subsection{\@startsection{subsection}{2}{\subsecindent}
                     {\befsubsecskip}{\aftsubsecskip}
                     {\subsecjust\subsecsize\subsecstyle}}


%-----------------------------------------
%       
%       Table of Contents, Tables, Figures 
%
%-----------------------------------------
\setcounter{tocdepth}{2}

\def\tableofcontents{\section*{\contentsname
        \@mkboth{\uppercase{\contentsname}}{\uppercase{\contentsname}}}%
  \@starttoc{toc}}


\def\l@section#1#2{\addpenalty{\@secpenalty}% good place for page break
   \addvspace{1.0em plus\p@}%
   \@tempdima 1.5em
   \begingroup
     \parindent \z@ \rightskip \@pnumwidth
     \parfillskip -\@pnumwidth
     \bf
     \leavevmode
      \advance\leftskip\@tempdima
      \hskip -\leftskip
     #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss #2}\par
   \endgroup}

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

\def\listoffigures{\section*{\listfigurename
    \@mkboth{\uppercase{\listfigurename}}{\uppercase{\listfigurename}}}%
  \@starttoc{lof}}

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

\def\listoftables{\section*{\listtablename\@mkboth
   {\uppercase{\listtablename}}{\uppercase{\listtablename}}}%
  \@starttoc{lot}}
\let\l@table\l@figure

\newif\if@restonecol

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

\long\def\@makefntext#1{\parindent 1em\noindent
            \hbox to1.8em{\hss$\m@th^{\@thefnmark}$}#1}


\long\def\@makecaption#1#2{%
   \vskip 10\p@
   \setbox\@tempboxa\hbox{#1: #2}%
   \ifdim \wd\@tempboxa >\hsize
       #1: #2\par
     \else
       \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
   \fi}

\newcounter{figure}
\def\thefigure{\@arabic\c@figure}

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

\newcounter{table}
\def\thetable{\@arabic\c@table}

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


%--------------------------------------------
%  
%        Title Area
%
%--------------------------------------------
\def\maketitle{\par
 \begingroup
   \def\thefootnote{\fnsymbol{footnote}}%
   \def\@makefnmark{\hbox
       to\z@{$\m@th^{\@thefnmark}$\hss}}%
   \newpage
   \global\@topnum\z@
   \@maketitle 
   \thispagestyle{plain}\@thanks
 \endgroup
 \setcounter{footnote}{0}%
 \let\maketitle\relax
 \let\@maketitle\relax
 \gdef\@thanks{}%
 \gdef\@author{}%
 \gdef\@title{}%
 \let\thanks\relax}

\def\titleline{%
      \newdimen\temp
	  \temp=\titleposition
	  \advance\temp by -\topmargin
	  \advance\temp by -1 in
	  \advance\temp	by -\headheight
	  \advance\temp by -\headsep
	  \advance\temp by -\topskip
      \vskip \temp
	  \noindent	  
	  {\titleleftfil \titlesize\titlestyle\@title \titlerightfil}

}

\newif\ifbyline

\def\byline{%
      \ifbyline
         \vskip\byskip \noindent
	     {\byleftfil\bysize\bystyle\bytext\byrightfil}
	  \fi
}
 
\def\authorline{%
      \vskip\authorskip \noindent
	  {\authorleftfil\authorsize\authorstyle\@author\authorrightfil}
}

\newif\ifabstheaddisp

\def\abstractarea{}

      
\def\@maketitle{%
      \newpage
      \null
	  \titleline
	  \byline
	  \authorline
}

\def\abstract{%
       \small
       \begin{center}%
         {\bf \abstractname\vspace{-.5em}\vspace{\z@}}%
       \end{center}%
       \quotation
}

\def\endabstract{\endquotation}

\mark{{}{}}

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

%--------------------------------------------
%
%              Bibliography
%
%--------------------------------------------
\ifx\citeform\onetext
	   \def\@cite#1#2{[{#1\if@tempswa  , #2\fi}]}
	   \def\@biblabel#1{[#1]} 
\else\ifx\citeform\twotext
	   \def\@cite#1#2{({#1\if@tempswa  , #2\fi})}
	   \def\@biblabel#1{(#1)}}
\else
       \def\@cite#1#2{}
	   \def\@biblabel#1{}
\fi\fi 

\def\thebibliography#1{%
       \section*{\refname
           \@mkboth{\uppercase{\refname}}{\uppercase{\refname}}}
       \list{\@biblabel{\arabic{enumiv}}}
            {\itemsep=\interrefspacing
		     \def\baslinestretch{\refspacing}\Huge\normalsize
             \settowidth\labelwidth{\@biblabel{#1}}%			     
             \leftmargin\labelwidth
             \advance\leftmargin\labelsep
			 \ifx\reffirstindent\@empty
			 \else\itemindent\reffirstindent\fi
             \ifx\refrestindent\@empty
			 \else
			    \advance\leftmargin\refrestindent
				\advance\itemindent -\refrestindent
			 \fi
             \usecounter{enumiv}%
             \let\p@enumiv\@empty
             \def\theenumiv{\arabic{enumiv}}
            }%
            \def\newblock{\hskip .11em plus.33em minus.07em}%
            \sloppy\clubpenalty4000\widowpenalty4000
            \sfcode`\.=1000\relax}

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


%--------------------------------------------------
%
%      Equation Numbering
%
%--------------------------------------------------

\def\makelefteqnos{%
        \def\@eqnnum{%
            \hbox to .01\p@{}
            \rlap{\reset@font\rm\hskip -\displaywidth(\theequation)}}}



\pagestyle{empty}
\pagenumbering{arabic}

% Three part headers and footers...
\def\@threepart#1#2#3{\rlap{#1} \hfil {#2} \hfil \llap{#3}}

\def\@oddhead{\@threepart{\lefthead}{\middlehead}{\righthead}}
\def\@oddfoot{\@threepart{\leftfoot}{\middlefoot}{\rightfoot}}

\def\Head@{}
\def\Head@title{}
\def\Head@author{}
\def\Head@page{{\rm\thepage}}


\def\shortauthor#1{\def\Head@author{#1}}
\def\shorttitle#1{\def\Head@title{#1}}

\def\email#1{\def\Emailaddress{#1}}
\def\subject#1{\def\Subjclass{#1}}
\def\Thanks#1{\def\thankyou{#1}}

% This is included to allow SpecialSection to appear on the screen as 
% Section heads even 
% though it is really a \section*
 
\def\special#1{\section*{#1}}
\input tcilcomm

\endinput
