%% auxiliary macros file  
  %% derived from RESOURCESimple.occ
  %% named newton.sty
  %% needed by the ".tex" typescript: newton.tex
  %% Date: 1986
  %% Contact: ????, email:  ????

 %%% Avoid double input of these macros
 %%
 \bgroup
 \catcode`\!=12
 \ifx\auxmacros\relax 
   \immediate\write16{}%
   \message{ !!! auxmacros already defined !!!}
   \gdef\auxmacros{\endinput}%
  \else \global\let\auxmacros\relax
  \fi 
 \egroup
 \auxmacros

\catcode`\@=11

 \newcount\Ht %% pg121; Height register, used in Linefigure & accents
 \newcount\Wd %% Width

 \def\cm{cm}
 %\def\cm{dm} %% alternatives...
 %\def\cm{dc}

 \font \bigbf=\cm bx12 %

 \font \tenbi=\cm bxti10 %TimesBI %cmbi10  %
 \font \tensmc=\cm csc10 %

 \def \bi{\tenbi}
 %\def \bi{\bf}%

 \def \smc{\tensmc }
 %\def \smc{\bf}%

 \def \Bbd#1{{\bf #1}}%
 \def \Cal#1{{\cal #1}}%

 \def \Smallfonts {}%

 \def \Titlefont {\bigbf}%
 \def \Authorfont {\bf}%
 \def \Headingfont {\bf}%
 \def \Subheadingfont {\bf}%
 \def \Theoremfont {\bf}%
 \def \Prooffont {\it}%
 \def \Remarkfont {\bf}%
 \def \Diagramfont {\bf}%

 \def \rm{\everymath={}\fam0\tenrm}%

  \long
  \def \It #1{{\it
      \ifdim\mathsurround=0pt
      \else\advance\mathsurround by 1.2pt \fi\ignorespaces
     #1\unskip\/}}

 \def \Bi #1{{\bi
      \ifdim\mathsurround=0pt
      \else\advance\mathsurround by 1.2pt \fi\ignorespaces
      #1\unskip\/}}%

 \def \Admin #1{\begingroup\mathsurround=0 pt
   \leavevmode
        %% p222-3:~ then  \hskip -\lastskip  for \unskip 
   \ifmmode\hbox{$\rm #1$\relax}\else$\rm #1$\relax\fi
   \endgroup}
  %% \relax's anticipate mathsurround mechanisms %

 \def \Rm #1{\hbox{\kern 1pt \rm #1\kern 1pt}}%

 \newskip\TitleLineskip
 \TitleLineskip=15pt plus 5pt 
 \def \DeepCR{\unskip\hfil
            \egroup\par\hfil\bgroup\ignorespaces}%

 \def \Title{\goodbreak
   \ifdim\pagetotal>.70\pagegoal
      \def\this{\vfill\eject}
   \else\def\this{}\fi  \this
   \vbox\bgroup\let\cr\DeepCR\let\\\DeepCR
      \parindent=0 pt\parskip= 0 pt
      \Titlefont\baselineskip=\fontdimen6\font 
      \advance\baselineskip by \TitleLineskip
      \null\vskip22pt plus 15pt
      \bgroup \hfil}%

 \def \endTitle {\unskip\hfil\egroup\par \egroup\medskip}%

 \newskip\AuthorLineskip
 \AuthorLineskip=5pt plus 5pt 
 \def \Author{\nobreak\vskip 20Pt plus 10pt minus 5pt\nobreak
   \vbox\bgroup\let\cr\DeepCR\let\\\DeepCR
      \parindent=0 pt\parskip= 0 pt
      \Authorfont\baselineskip=\fontdimen6\font 
      \advance\baselineskip by \AuthorLineskip
   \bgroup \hfil}%

 \def \endAuthor {\unskip\hfil\egroup\par \egroup\medskip}%

 \def \Subheading#1{\medskip\bigskip \goodbreak 
   \par \noindent {\Subheadingfont #1.}%
   \nobreak \vskip 3pt \nobreak}%

 \def \Remark#1{\bigskip \goodbreak
               \par\noindent{\Remarkfont  #1.}}%

 \def \endRemark{\medskip \goodbreak}%

 \def \Theorem #1{\goodbreak\bigskip\par\noindent\Theoremfont #1. 
 \hskip 2pt plus 1pt minus 1pt 
   \begingroup\it
      \everymath={\ifdim\mathsurround=0pt\def\this{}
         \else\def\this{\kern1.5pt}\fi\this}
  }%

 \def \endTheorem {\endgroup \rm \goodbreak \smallskip}%

 \def \Proof#1{\goodbreak \medskip 
   \par\noindent \Prooffont #1\hskip .7pt:\hskip 3pt\rm}%

 \def \endProof{\qed\goodbreak\vskip10pt}%

 \def \qedbox{\hbox{\vbox{
    \hrule width0.2cm height0.2pt
    \hbox to 0.2cm{\vrule height 0.2cm width 0.2pt
             \hfil\vrule height0.2cm width 0.2pt}
    \hrule width0.2cm height 0.2pt}\kern1pt}}%

 \def \qed{\ifmmode\qedbox
    \else\unskip\ \hglue0mm\hfill\qedbox\medskip
     \goodbreak\fi}%

 \def \Endphase {}%

 \def \Benchmark { } 
 \def \References#1{\begingroup \leftskip=25 pt 
        \parskip=4 pt plus 2 pt
   \goodbreak \hbox to 1 pt{}%
        \vskip 15 pt plus 10 pt minus 5 pt
 \centerline{\Headingfont #1}%
 \frenchspacing \Smallfonts \def \Benchmark{\Refmark}%
 \def \Refmark##1##2{\par\noindent \llap {##1{##2}\kern 12 pt}\kern 0pt}%
 \nobreak\vskip 8pt \nobreak}
 %##1##2 secretly is \Cite ##2 %

 \def \endReferences {~\unskip\par\endgroup \medskip\goodbreak}%

 \def\preLinefigure[#1*#2]_{%
    \Wd=#1\Ht=#2\catcode`\w=11  \catcode`\h=11 \LLinefigure}
 \catcode`\w=11  \catcode`\h=11 %

 \def \metaDiagram#1#2@{%
   \def\SetHt##1{\def\test{##1}\def\Test{h} \ifx \test\Test \Ht=40 
      \else \Ht=##1 \fi}%
   \SetHt{#1}\goodbreak\midinsert\vskip -8pt 
   \vbox to \Ht pt{\vfil \noindent\hfil\Diagramfont#2 \hfil}%
   \vskip-8pt\endinsert}%

 \def \Diagram#1{\metaDiagram#1@}%

 \def \vDiagram#1{\Diagram{#1\hfill\hfill\vfil\vskip -\baselineskip}}%
   %% note restored parens %

 \def \Footnote #1#2{\footnote{\raise.4ex\hbox{\Admin{ 
      #1}}}{\Smallfonts #2}}  %% \Smallfonts problematic here
       %% \scriptstyle?  %

 \def \ItemStyle{\bf}%

 \def \Item #1{%
      \smallskip\nointerlineskip{\parskip=4pt\noindent
      {\def\Bf{}\hbox{$\ItemStyle #1$\relax}}\enskip}}%

 \def \Cite#1{{\rm\cite{#1}}}%

 \def \cite#1{\cite@#1,\endcite@}%
 \def \cite@@#1,{#1}%
 \def \cite@#1,#2\endcite@{\def\temp{#2}%
     \ifx\temp\empty\relax
    \def \temp{{\bf[#1]}}%
     \else\relax
       \def\temp{{[\bf #1,\rm\ \cite@@#2]}}%
     \fi\temp}%

  \def\,{\ifmmode\mskip \thinmuskip\else\hskip1pt\fi }%

 \def \Eqno #1$${\eqno \Admin{#1}$$\relax}%

 \def \bigMidvert{\kern4pt \big \vert \kern4pt}%

 \def \proseSharp {{\mathsurround=0pt\kern1pt
 \hbox{$\vcenter{\hbox{$\scriptstyle 
               \# $\relax}\vskip.7pt}$\relax}\kern1pt}}
 \def \mathSharp {\mathord{\#}}
 \def \Sharp{\ifmmode\expandafter\mathSharp\else
      \expandafter\proseSharp\fi}%

 \def \Lim {\lim\limits}%

 \def \llongrightarrow {\kern-2pt\mathop
       {\kern3pt\longrightarrow\kern3pt}\limits}%

\catcode`\@=12

 \endinput