\def\listoffigures{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  \fi\chapter*{\listfigurename
   \addcontentsline{toc}{chapter}{\listfigurename}\@mkboth              % changes 2/7/87 Ar
   {\uppercase{\listfigurename}}{\uppercase{\listfigurename}}} %
   \@starttoc{lof}\if@restonecol\twocolumn
  \fi}
\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
\def\listoftables{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  \fi\chapter*{\listtablename
   \addcontentsline{toc}{chapter}{\listtablename}\@mkboth                 % changes 2/7/87 Ar
   {\uppercase{\listtablename}}{\uppercase{\listtablename}}}   %
   \@starttoc{lot}\if@restonecol\twocolumn
  \fi}
\let\l@table\l@figure
\def\bibliography{\chapter*{\bibname
  \addcontentsline{toc}{chapter}{\bibname}\@mkboth
  {\uppercase{\bibname}}{\uppercase{\bibname}}}}
\def\thebibliography#1{\chapter*{\bibname
  \addcontentsline{toc}{chapter}{\bibname}\@mkboth      % changes
  {\uppercase{\bibname}}{\uppercase{\bibname}}}\list   % 2/7/87 Ar
  {[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
    \advance\leftmargin\labelsep
    \usecounter{enumi}}
    \def\newblock{\hskip .11em plus .33em minus -.07em}
    \sloppy
    \sfcode`\.=1000\relax}
\let\endthebibliography=\endlist
                                % command.
\newif\if@restonecol
\def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
\columnseprule \z@
\columnsep 35pt\twocolumn[\@makeschapterhead{\indexname}]    % changes
    \@mkboth{\uppercase{\indexname}}{\uppercase{\indexname}} % 6/2/88 Ar
    \thispagestyle{plain}\parindent\z@
    \parskip\z@ plus .3pt\relax\let\item\@idxitem
    \addcontentsline{toc}{chapter}{\indexname}}
\def\@idxitem{\par\hangindent 40pt}
\def\subitem{\par\hangindent 40pt \hspace*{20pt}}
\def\subsubitem{\par\hangindent 40pt \hspace*{30pt}}
\def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
\def\indexspace{\par \vskip 10pt plus 5pt minus 3pt\relax}
