% Wiley style book adapted from book.sty 13-Nov-89

\typeout{Document Style `Wiley Book' <1-9-91 RHL & PJF>.}

\def\@ptsize{0} \@namedef{ds@11pt}{\def\@ptsize{1}}
\@namedef{ds@12pt}{\def\@ptsize{2}} 
\@twosidetrue \@mparswitchtrue \def\ds@draft{\overfullrule 5pt} 
\@options
\input wiley_bk1\@ptsize.sty\relax


\def\labelenumi{\theenumi.} 
\def\theenumi{\arabic{enumi}} 
\def\labelenumii{(\theenumii)}
\def\theenumii{\alph{enumii}}
\def\p@enumii{\theenumi}
\def\labelenumiii{\theenumiii.}
\def\theenumiii{\roman{enumiii}}
\def\p@enumiii{\theenumi(\theenumii)}
\def\labelenumiv{\theenumiv.}
\def\theenumiv{\Alph{enumiv}} 
\def\p@enumiv{\p@enumiii\theenumiii}

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

\def\verse{\let\\=\@centercr 
 \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent 
 \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
\let\endverse\endlist
\def\quotation{\list{}{\listparindent 1.5em
 \itemindent\listparindent
 \rightmargin\leftmargin\parsep 0pt plus 1pt}\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
\newdimen\descriptionmargin
\descriptionmargin=3em


\def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
 \else \newpage \fi \thispagestyle{empty}\c@page\z@}
\def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}

\arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt 
\tabbingsep \labelsep 
\skip\@mpfootins = \skip\footins
\fboxsep = 3pt \fboxrule = .4pt 

\newcounter{part}
\newcounter {chapter}
\newcounter {appendix}
\newcounter {references}
\newcounter {index}
\newcounter {section}[chapter]
\newcounter {subsection}[section]
\newcounter {subsubsection}[subsection]
\newcounter {paragraph}[subsubsection]
\newcounter {subparagraph}[paragraph]

%\def\thepart {\Roman{part}}
%\def\thechapter {\arabic{chapter}}
%\def\thesection {\thechapter.\arabic{section}}
%\def\thesubsection {\thesection.\arabic{subsection}}
%\def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
%\def\theparagraph {\thesubsubsection.\arabic{paragraph}}
%\def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
%\def\@chapapp{Chapter}

\def\thepart {\Roman{part}}
\def\thechapter {\arabic{chapter}}
\def\thesection {\thechapter.\arabic{section}}
\def\thesubsection {}
\def\thesubsubsection {}
\def\theparagraph {}
\def\thesubparagraph {}
\def\@chapapp{CHAPTER}

\def\part{\secdef\@part\@spart} 

%\def\part{\cleardoublepage \thispagestyle{plain} \if@twocolumn \onecolumn
%\@tempswatrue \else \@tempswafalse \fi \hbox{}\vfil \secdef\@part\@spart} 

% This macro is like \cleardoublepage, but its inserted blank
% page has an empty pagestyle.
\def\cleardoublepageempty{\clearpage\if@twoside \ifodd\c@page\else
    \hbox{}\thispagestyle{empty}\newpage\if@twocolumn
        \hbox{}\thispagestyle{empty}\newpage\fi\fi\fi}

% In this document style, \cleardoublepage should always mean
% \cleardoublepageempty.

\let\latexcleardoublepage\cleardoublepage
\let\cleardoublepage\cleardoublepageempty

\let\clearchapterpage\cleardoublepageempty

\def\@part[#1]#2{\ifnum \c@secnumdepth >-2\relax \refstepcounter{part}
\addcontentsline{toc}{part}{\thepart \hspace{1em}#1}\else
\addcontentsline{toc}{part}{#1}\fi \markboth{}{}
% {\centering \ifnum \c@secnumdepth >-2\relax \huge\bf Part \thepart \par
%\vskip 20pt \fi \Huge \bf #2\par}\@endpart} 
%\def\@endpart{\vfil\newpage \if@twoside \hbox{} \thispagestyle{empty} 
% \newpage 
% \fi \if@tempswa \twocolumn \fi} 
%\def\@spart#1{{\centering \Huge \bf #1\par}\@endpart}
{\par
    \def\@chapapp{PART}
    \def\thechapter{\Roman{part}}
    \chapter{#1}
    \def\@chapapp{CHAPTER}
    \def\thechapter{\arabic{chapter}}
}
}
\def\@spart#1{\@endpart}


%
%\def\@pnumwidth{1.55em}
%\def\@tocrmarg {2.55em}
%\def\@dotsep{4.5}
\setcounter{tocdepth}{2}
%
%
%\def\tableofcontents{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
% \fi\chapter*{Contents\@mkboth{CONTENTS}{CONTENTS}}
% \@starttoc{toc}\if@restonecol\twocolumn\fi}
%\def\l@part#1#2{\addpenalty{-\@highpenalty}
% \addvspace{2.25em plus 1pt} \begingroup
% \@tempdima 3em \parindent \z@ \rightskip \@pnumwidth \parfillskip
%-\@pnumwidth 
% {\large \bf \leavevmode #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
% \nobreak \global\@nobreaktrue \everypar{\global\@nobreakfalse\everypar{}}
%\endgroup}
%\def\l@chapter#1#2{\addpenalty{-\@highpenalty} 
% \vskip 1.0em plus 1pt \@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
% \penalty\@highpenalty \endgroup}
%
%\def\l@section{\@dottedtocline{1}{1.5em}{2.3em}}
%\def\l@subsection{\@dottedtocline{2}{3.8em}{3.2em}}
%\def\l@subsubsection{\@dottedtocline{3}{7.0em}{4.1em}}
%\def\l@paragraph{\@dottedtocline{4}{10em}{5em}}
%\def\l@subparagraph{\@dottedtocline{5}{12em}{6em}}
%\def\listoffigures{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
% \fi\chapter*{List of Figures\@mkboth
% {LIST OF FIGURES}{LIST OF FIGURES}}\@starttoc{lof}\if@restonecol
% \twocolumn\fi}
%\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
%\def\listoftables{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
% \fi\chapter*{List of Tables\@mkboth
% {LIST OF TABLES}{LIST OF TABLES}}\@starttoc{lot}\if@restonecol
% \twocolumn\fi}
%\let\l@table\l@figure
%
%    ****************************************
%    *         TABLE OF CONTENTS, ETC.      *
%    ****************************************
%
% A \subsection command writes a 
%       \contentsline{subsection}{TITLE}{PAGE}
% command on the .toc file, where TITLE contains the contents of the
% entry and PAGE is the page number.  If subsections are being numbered,
% then TITLE will be of the form
%       \numberline{NUM}{HEADING}
% where NUM is the number produced by \thesubsection.  Other sectioning
% commands work similarly.  
%
% A \caption command in a 'figure' environment writes
%    \contentsline{figure}{\numberline{NUM}{CAPTION}}{PAGE}
% on the .lof file, where NUM is the number produced by \thefigure and
% CAPTION is the figure caption.  It works similarly for a 'table' environment.
%
% The command \contentsline{NAME} expands to \l@NAME.  So, to specify
% the table of contents, we must define \l@chapter, \l@section, 
% \l@subsection, ... ; to specify the list of figures, we must define
% \l@figure; and so on.  Most of these can be defined with the
% \@dottedtocline command, which works as follows.
%
% \@dottedtocline{LEVEL}{INDENT}{NUMWIDTH}{TITLE}{PAGE}
%    LEVEL    : An entry is produced only if LEVEL < or = value of 
%               'tocdepth' counter.  Note, \chapter is level 0, \section
%               is level 1, etc.
%    INDENT   : The indentation from the outer left margin of the start of 
%               the contents line.
%    NUMWIDTH : The width of a box in which the section number is to go,
%               if TITLE includes a \numberline command.
%   
% This command uses the following three parameters, which are set
% with a \def (so em's can be used to make them depend upon the font).
%   \@pnumwidth : The width of a box in which the page number is put.
%   \@tocrmarg  : The right margin for multiple line entries.  One
%                 wants \@tocrmarg > or = \@pnumwidth
%   \@dotsep    : Separation between dots, in mu units.  Should be \def'd to
%                 a number like 2 or 1.7
%
% The MIT-Press-Book style does not use the \@dottedtocline macro. Instead,
% it uses a special contents style that is controlled by the parameters
% \toc@leftwidth, \toc@rightwidth, and \toc@colsep that are set by the
% 1xMITPRB file.  The macro \toc@atpage{TITLE}{PAGE} could also be redefined.
% In addition, there's \toc@prechapterskip and \toc@postchapterskip.

\def\toc@atpage#1#2{#1~~#2\hfill}

% The l@TYPE macros receive arguments l@TYPE{NUMBEREDTITLE}{PAGE},
% where NUMBEREDTITLE is actually {\numberline{NUM}TITLE} if there's
% a section number.

\newbox\toc@leftbox
\newbox\toc@rightbox

\def\l@chapter#1#2{\bgroup
   \pagebreak[3]\parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
        {\large \@chapapp\ ##1\hfill}}
   % #1 better use \numberline!
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
                        \toc@atpage{#1}{#2}\large\strut}}
   \vspace{\toc@prechapterskip}
   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
   \nopagebreak\par
   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
   \lineskip\parskip\nopagebreak\par
   \hrule height\z@\nopagebreak
   \vspace{\toc@postchapterskip}
   \egroup}

\def\l@appendix#1#2{\bgroup
   \pagebreak[3]\parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
        {\large APPENDIX\ ##1\hfill}}
   % #1 better use \numberline!
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
                        \toc@atpage{#1}{#2}\large\strut}}
   \vspace{\toc@prechapterskip}
   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
   \nopagebreak\par
   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
   \lineskip\parskip\nopagebreak\par
   \hrule height\z@\nopagebreak
   \vspace{\toc@postchapterskip}
   \egroup}

\def\l@references#1#2{\bgroup
   \pagebreak[3]\parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
        {\large REFERENCES\ ##1\hfill}}
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
                        \toc@atpage{#1}{#2}\large\strut}}
   \vspace{\toc@prechapterskip}
   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
   \nopagebreak\par
   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
   \lineskip\parskip\nopagebreak\par
   \hrule height\z@\nopagebreak
   \vspace{\toc@postchapterskip}
   \egroup}

\def\l@index#1#2{\bgroup
   \pagebreak[3]\parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
        {\large INDEX\ ##1\hfill}}
   % #1 better use \numberline!
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
                        \toc@atpage{#1}{#2}\large\strut}}
   \vspace{\toc@prechapterskip}
   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
   \nopagebreak\par
   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
   \lineskip\parskip\nopagebreak\par
   \hrule height\z@\nopagebreak
   \vspace{\toc@postchapterskip}
   \egroup}

\def\l@preface#1#2{\bgroup
   \pagebreak[3]\parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
        {\large PREFACE\ ##1\hfill}}
   % #1 better use \numberline!
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
                        \toc@atpage{#1}{#2}\large\strut}}
   \vspace{\toc@prechapterskip}
   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
   \nopagebreak\par
   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
   \lineskip\parskip\nopagebreak\par
   \hrule height\z@\nopagebreak
   \vspace{\toc@postchapterskip}
   \egroup}

%\def\l@references#1#2{\bgroup
%   \pagebreak[3]\parindent\z@
%   \def\numberline##1{\global\setbox\toc@leftbox\hbox to \toc@leftwidth
%        {\large REFERENCES\ ##1\hfill}}
%   % #1 better use \numberline!
%   \setbox\toc@rightbox\hbox
%        {\parbox[t]{\toc@rightwidth}{\raggedright\bf
%                        \toc@atpage{\makebox[300 pt][l]{REFERENCES}}{#2}\large\strut}}
%   \vspace{\toc@prechapterskip}
%   \hbox to \textwidth{\hbox to \toc@leftwidth{\hrulefill}\hskip
%                       \toc@colsep\hbox to \toc@rightwidth{\hrulefill}\hfill}
%   \nopagebreak\par
%   \hbox to\textwidth{\box\toc@leftbox\hskip\toc@colsep\box\toc@rightbox\hfill}
%   \lineskip\parskip\nopagebreak\par
%   \hrule height\z@\nopagebreak
%   \vspace{\toc@postchapterskip}
%   \egroup}

% The definition of \@schapter in this document style arranges for a
% contents line entry that calls \l@schapter for a \chapter* section.

\def\l@schapter#1#2{}
%\def\l@schapter#1#2{\bgroup
%   \parindent\z@
%   \hbox to \textwidth{\large\rm\toc@atpage{#1}{#2}\hfill}
%   \par\egroup}

\def\l@part#1#2{\bgroup
   \pagebreak[3]
   \parindent\z@
   \def\numberline##1{\global\setbox\toc@leftbox\hbox{\large\bf Part ##1: }}
   \vspace{\toc@prechapterskip}
   \setbox\toc@rightbox\hbox
        {\parbox[t]{\toc@rightwidth % not really the right parameter
                         }{\large\bf #1}}
   \hbox to \textwidth{\box\toc@leftbox\box\toc@rightbox\hfill}
   \par
   \nobreak
   % Remove prechapter skip
   \vspace{-\toc@prechapterskip}
   \egroup}

\def\l@section#1#2{\ifnum 1>\c@tocdepth \else
   \nopagebreak[2]\bgroup\raggedright
   \@tempdima\toc@leftwidth
   \advance\@tempdima\toc@colsep
   \parindent\z@\parskip\z@\leftskip\@tempdima
%HERE
   \def\numberline##1{\makebox[24pt][l]{##1\ \ }}
   \toc@atpage{#1}{#2}
   \par\egroup
   \fi}

% Contents entries for subsections are turned off by
% default.  But if they were turned on, they would come out in the
% same style (without section numbers) but indented slightly and
% in slanted type.

\def\l@subsection#1#2{\ifnum 2>\c@tocdepth \else
   \bgroup\raggedright
   \@tempdima\toc@leftwidth
   \advance\@tempdima\toc@colsep
   \advance\@tempdima 2em
   \parindent\z@\parskip\z@\leftskip\@tempdima
   \def\numberline##1{}
   \toc@atpage{\makebox[9pt]{}#1}{#2}
   \par\egroup
   \fi}

\def\l@subsubsection#1#2{\ifnum 3>\c@tocdepth \else
   \bgroup\raggedright
   \@tempdima\toc@leftwidth
   \advance\@tempdima\toc@colsep
   \advance\@tempdima 4em
   \parindent\z@\parskip\z@\leftskip\@tempdima
   \def\numberline##1{}
   {\sl\toc@atpage{#1}{#2}}
   \par\egroup
   \fi}

% Since I don't know how anything further should come out,
% I'll just disallow them.

\def\l@paragraph#1#2{}
\def\l@subparagraph#1#2{}

% Lists of tables and figures aren't really supported in the
% MIT-Press-Book style, but these definitions will marginally
% work in the \begin{frontmatter}...\end{frontmatter} style.

% LIST OF FIGURES
%
\def\listoffigures{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  \fi\chapter*{List of Figures}\@starttoc{lof}\if@restonecol\twocolumn
  \fi}

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

\def\@pnumwidth{1.55em}
\def\@tocrmarg {2.55em}
\def\@dotsep{4.5}

% LIST OF TABLES
%
\def\listoftables{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  \fi\chapter*{List of Tables}\@starttoc{lot}\if@restonecol\twocolumn
  \fi}

\let\l@table\l@figure


% TABLEOFCONTENTS
%  In report style, \tableofcontents, \listoffigures, etc. are always
%  set in single-column style.  @restonecol

% This should be done inside \begin{frontmatter}...\end{frontmatter},
% for this document style.  Otherwise the \chapter* command here
% won't work as we expect.

\def\tableofcontents{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  \fi
  \chapter*{CONTENTS}\bgroup\raggedbottom
  \raggedright\hyphenpenalty1000\@starttoc{toc}\egroup
  \if@restonecol\twocolumn\fi
  \pagestyle{headings}\let\clearchapterpage\cleardoublepageempty
  }
%  \addtocontents{toc}{\protect\@endcontentsignore}}

\def\thebibliography#1{\chapter*{Bibliography\@mkboth
 {BIBLIOGRAPHY}{BIBLIOGRAPHY}}\list
 {[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
 \advance\leftmargin\labelsep
 \usecounter{enumi}}
 \def\newblock{\hskip .11em plus .33em minus .07em}
 \sloppy\clubpenalty4000\widowpenalty4000
 \sfcode`\.=1000\relax}
\let\endthebibliography=\endlist
 

\newif\if@restonecol
\def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
\columnseprule \z@
\columnsep 35pt\twocolumn[\@makeschapterhead{INDEX}]
 \@mkboth{INDEX}{INDEX}\thispagestyle{plain}\parindent\z@
 \parskip\z@ plus .3pt\relax\let\item\@idxitem}
\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}

\def\footnoterule{\kern-3\p@ 
 \hrule width .4\columnwidth 
 \kern 2.6\p@} 
\@addtoreset{footnote}{chapter} 
\long\def\@makefntext#1{\parindent 1em\noindent 
 \hbox to 1.8em{\hss$^{\@thefnmark}$}#1}

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

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


\newcounter{figure}[chapter]
\def\thefigure{\thechapter.\@arabic\c@figure}
\def\fps@figure{tbp}
\def\ftype@figure{1}
\def\ext@figure{lof}
\def\fnum@figure{{\bf Figure \thefigure}}
\def\figure{\@float{figure}}
\let\endfigure\end@float
\@namedef{figure*}{\@dblfloat{figure}}
\@namedef{endfigure*}{\end@dblfloat}
\newcounter{table}[chapter]
\def\thetable{\thechapter.\@arabic\c@table}
\def\fps@table{tbp}
\def\ftype@table{2}
\def\ext@table{lot}
\def\fnum@table{{\bf Table \thetable}}
\def\table{\@float{table}}
\let\endtable\end@float
\@namedef{table*}{\@dblfloat{table}}
\@namedef{endtable*}{\end@dblfloat}

\def\maketitle{\begin{titlepage}
 \let\footnotesize\small \let\footnoterule\relax \setcounter{page}{0}
 \null
 \vfil
 \vskip 60pt \begin{center}
 {\LARGE \@title \par} \vskip 3em {\large \lineskip .75em
 \begin{tabular}[t]{c}\@author 
 \end{tabular}\par} 
 \vskip 1.5em {\large \@date \par} \end{center} \par
\@thanks
\vfil
\null
\end{titlepage}
\setcounter{footnote}{0} \let\thanks\relax
\gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\maketitle\relax} 


\mark{{}{}} 

%HERE
\def\ps@headings{\let\@mkboth\markboth
\def\@oddfoot{}\def\@evenfoot{}\def\@evenhead{\rm \bf\thepage\hfil \rhfont
\leftmark}\def\@oddhead{\hbox{}\rhfont \rightmark \hfil
\rm\bf\thepage}\def\chaptermark##1{\markboth {\uppercase{\ifnum \c@secnumdepth
>\m@ne
% \@chapapp\ \thechapter. \ \fi ##1}}{}}\def\sectionmark##1{\markright
 \@chapapp\ \thechapter\ \ \ \fi ##1}}{}}\def\sectionmark##1{\markright
{\uppercase{\ifnum \c@secnumdepth >\z@
 \thesection\ \ \ \fi ##1}}}}
\def\ps@myheadings{\let\@mkboth\@gobbletwo
\def\@oddhead{\hbox{}\rhfont\rightmark \hfil
\rm\bf\thepage}\def\@oddfoot{}\def\@evenhead{\rm \bf\thepage\hfil\rhfont\leftmark\hbox
{}}\def\@evenfoot{}\def\chaptermark##1{}\def\sectionmark##1{}%
\def\subsectionmark##1{}}

%\def\ps@headings{\let\@mkboth\markboth
%\def\@oddfoot{}\def\@evenfoot{}\def\@evenhead{\rm \thepage\hfil \sl
%\leftmark}\def\@oddhead{\hbox{}\sl \rightmark \hfil
%\rm\thepage}\def\chaptermark##1{\markboth {\uppercase{\ifnum \c@secnumdepth
%>\m@ne
% \@chapapp\ \thechapter. \ \fi ##1}}{}}\def\sectionmark##1{\markright
%{\uppercase{\ifnum \c@secnumdepth >\z@
% \thesection. \ \fi ##1}}}}
%\def\ps@myheadings{\let\@mkboth\@gobbletwo
%\def\@oddhead{\hbox{}\sl\rightmark \hfil
%\rm\thepage}\def\@oddfoot{}\def\@evenhead{\rm \thepage\hfil\sl\leftmark\hbox
%{}}\def\@evenfoot{}\def\chaptermark##1{}\def\sectionmark##1{}%
%\def\subsectionmark##1{}}


\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}
\@addtoreset{equation}{chapter} 
\def\theequation{\thechapter.\arabic{equation}}


\ps@headings \pagenumbering{arabic} \onecolumn 

