\makeatletter
\def\pdfTeX{pdf\/\TeX}\newcommand{\OMEGA}{$\Omega$}
\def\epTeX{$\varepsilon$-p\TeX}\def\eTeX{$\varepsilon$-\TeX}
\def\upTeX{up\TeX}
\def\NTS{\leavevmode\hbox{$\cal N\kern-0.35em\lower0.5ex\hbox{$\cal T$}%
  \kern-0.2emS$}\,}
\def\headfont{\mathversion{bold}\bfseries\selectfont}
\def\arcsinh{\mathop{\rm arcsinh}}
\def\arccosh{\mathop{\rm arccosh}}
\def\arctanh{\mathop{\rm arctanh}}
\def\.#1{\leavevmode\hbox{\tt \char'134 #1}}
\def\<#1>{\ensuremath{\langle\hbox{\it #1}\rangle}}
\def\emph#1{{\bfseries\mathversion{bold}#1}}
\def\listx{\def\makelabel{\hbox to 1em{\hfil\textbullet\hfil}}\def\@{\hfill}
\labelwidth=13zw\leftmargin15zw\itemindent=0zw}
\def\paragraph#1{\par\medskip\par\noindent\emph{■#1}\par\nobreak}
\def\XeTeX{\leavevmode
  \setbox0=\hbox{X\lower.5ex
  \hbox{\kern-.15em\revrm E}\kern-.1667em \TeX}%
  \dp0=0pt \ht0=0pt \box0 } 
\DeclareFontShape{OT1}{cmtt}{bx}{n}{<->cmttb10}{}

\font\man=manfnt at 12pt
\def\dbend{\raise0pt\hbox{\man\char'177}}

% modified from etex_man.sty
\setbox0=\hbox{\bf dsfh}
\DeclareFontShape{T1}{lmr}{rev}{n}{<-> rmc10}{} % for right-to-left text
\DeclareFontShape{T1}{lmr}{bxrev}{n}{<-> xbmc10}{} % for boldface right-to-left text
\DeclareTextFontCommand{\revbf}{\fontseries{bxrev}\fontshape{n}\selectfont}
\DeclareTextFontCommand{\revrm}{\fontseries{rev}\fontshape{n}\selectfont}
\def\TeXXeT{\TeX-\revbf{\TeXXeTstate=1\beginR\TeX-\endR}}

\newenvironment{multilist}[2]%
 {$$\setbox\z@=\hbox\bgroup  % catch some funny things -> \mathord
  \let\a=\empty
  \let\b=\empty
  \count@=\z@
  \toks@={#2}%
  \def\item##1\cr
   {\ifnum \count@=\z@
      \count@=#1%
      \expandafter\def\expandafter\b\expandafter{\b\y{}}%
    \fi
    \advance\count@ by\m@ne
    \expandafter\def\expandafter\a\expandafter{\a\x{##1}}}%
  \ignorespaces}%
 {\loop
  \ifnum \count@>\z@
    \expandafter\def\expandafter\a\expandafter{\a\expandafter\z\b\relax}%
    \advance\count@ by\m@ne
  \repeat
  \def\x##1{\expandafter\y\b\relax{##1}}%
  \def\y\y##1##2\relax##3%
   {\ifx @##1@%
      \def\b{##2\y{##3}}%
    \else
      \def\b{##2\y{##1&##3}}%
    \fi}%
  \def\z\y##1##2\relax{\def\b{##2\y{##1}}}%
  \a
  \def\x
   {\expandafter\egroup\expandafter\halign\expandafter\bgroup
    \expandafter&\the\toks@\cr}%
  \def\y##1{\expandafter\def\expandafter\x\expandafter{\x##1\cr}}%
  \b
  \x\egroup $$}

\makeatletter
\def\hex#1{%
{\count@=#1\@tempcnta=#1\@tempcntb=\@tempcnta\relax
\divide\@tempcntb by 16%
\ifnum\count@=0\else
  \multiply\@tempcntb by16%
  \advance\@tempcnta-\@tempcntb
  \divide\@tempcntb by16%
  \hex{\the\@tempcntb}%
  \ifcase\@tempcnta\relax 0\or1\or2\or3\or4\or5\or6\or
    7\or8\or9\or A\or B\or C\or D\or E\pr F\fi
\fi}}
\clubpenalty=8000\widowpenalty=8000
