% LaTeX mbox command...
\def\mbox#1{\leavevmode\hbox{#1}}

% This is a definition of the ``registered trademark'' character.
\def\regtm{{\ooalign
    {\hfil\raise.07ex\hbox{{\scriptsize R}}\hfil\crcr\mathhexbox20D}}}

\let\ptexi=\i

\catcode `\ =13 \xdef {~}
\catcode `\¡=13 \xdef¡{!`}
\catcode `\¢=13 \xdef¢{{\rm\rlap/c}}
\catcode `\£=13 \def£{\pounds{}}
\catcode `\¤=13 \xdef¤{}                             % Missing
\catcode `\¥=13 \xdef¥{}                             % Missing
\catcode `\¦=13 \xdef¦{}                             % Missing
\catcode `\§=13 \xdef§{\S}
\catcode `\¨=13 \xdef¨{\"{}}
\catcode `\©=13 \def©{\copyright{}}
\catcode `\ª=13 \defª{\b{a}}
\catcode `\«=13 \xdef«{\mbox{$\ll$}}
\catcode `\¬=13 \xdef¬{\mbox{$\neg$}}
\catcode `\­=13 \xdef­{\-}
\catcode `\®=13 \def®{\regtm{}}
\catcode `\¯=13 \xdef¯{}                             % Missing
\catcode `\°=13 \xdef°{\mbox{${}^\circ$}}
\catcode `\±=13 \xdef±{\mbox{$\pm$}}
\catcode `\²=13 \xdef²{\mbox{$\mathsurround 0pt{}^2$}}
\catcode `\³=13 \xdef³{\mbox{$\mathsurround 0pt{}^3$}}
\catcode `\´=13 \xdef´{\'{}}
\catcode `\µ=13 \xdefµ{\mbox{$\mu$}}
\catcode `\¶=13 \xdef¶{\P}
\catcode `\·=13 \xdef·{\mbox{$\cdot$}}
\catcode `\¸=13 \def¸{\,{}}
\catcode `\¹=13 \xdef¹{\mbox{$\mathsurround 0pt{}^1$}}
\catcode `\º=13 \defº{\b{o}}
\catcode `\»=13 \xdef»{\mbox{$\gg$}}
\catcode `\¼=13 \xdef¼{\mbox{$1\over 4$}}
\catcode `\½=13 \xdef½{\mbox{$1\over 2$}}
\catcode `\¾=13 \xdef¾{\mbox{$3\over 4$}}
\catcode `\¿=13 \xdef¿{?`}
\catcode `\À=13 \xdefÀ{\`A}
\catcode `\Á=13 \xdefÁ{\'A}
\catcode `\Â=13 \xdefÂ{\^A}
\catcode `\Ã=13 \xdefÃ{\~A}
\catcode `\Ä=13 \xdefÄ{\"A}
\catcode `\Å=13 \xdefÅ{\AA}
\catcode `\Æ=13 \xdefÆ{\AE}
\catcode `\Ç=13 \defÇ{\, C}
\catcode `\È=13 \xdefÈ{\`E}
\catcode `\É=13 \xdefÉ{\'E}
\catcode `\Ê=13 \xdefÊ{\^E}
\catcode `\Ë=13 \xdefË{\"E}
\catcode `\Ì=13 \xdefÌ{\`I}
\catcode `\Í=13 \xdefÍ{\'I}
\catcode `\Î=13 \xdefÎ{\^I}
\catcode `\Ï=13 \xdefÏ{\"I}
\catcode `\Ð=13 \xdefÐ{{\rlap{\raise.3ex\hbox{--}}D}}
\catcode `\Ñ=13 \xdefÑ{\~N}
\catcode `\Ò=13 \xdefÒ{\`O}
\catcode `\Ó=13 \xdefÓ{\'O}
\catcode `\Ô=13 \xdefÔ{\^O}
\catcode `\Õ=13 \xdefÕ{\~O}
\catcode `\Ö=13 \xdefÖ{\"O}
\catcode `\×=13 \xdef×{\mbox{$\times$}}
\catcode `\Ø=13 \xdefØ{\O}
\catcode `\Ù=13 \xdefÙ{\`U}
\catcode `\Ú=13 \xdefÚ{\'U}
\catcode `\Û=13 \xdefÛ{\^U}
\catcode `\Ü=13 \xdefÜ{\"U}
\catcode `\Ý=13 \xdefÝ{\'Y}
\catcode `\Þ=13 \xdefÞ{}                             % Missing
\catcode `\ß=13 \xdefß{\ss}
\catcode `\à=13 \xdefà{\`a}
\catcode `\á=13 \xdefá{\'a}
\catcode `\â=13 \xdefâ{\^a}
\catcode `\ã=13 \xdefã{\~a}
\catcode `\ä=13 \xdefä{\"a}
\catcode `\å=13 \xdefå{\aa}
\catcode `\æ=13 \xdefæ{\ae}
\catcode `\ç=13 \defç{\, c}
\catcode `\è=13 \xdefè{\`e}
\catcode `\é=13 \xdefé{\'e}
\catcode `\ê=13 \xdefê{\^e}
\catcode `\ë=13 \xdefë{\"e}
\catcode `\ì=13 \xdefì{\`\ptexi}
\catcode `\í=13 \xdefí{\'\ptexi}
\catcode `\î=13 \xdefî{\^\ptexi}
\catcode `\ï=13 \xdefï{\"\ptexi}
\catcode `\ð=13 \xdefð{\mbox{$\partial$}} % Not correct, approximation only
\catcode `\ñ=13 \xdefñ{\~n}
\catcode `\ò=13 \xdefò{\`o}
\catcode `\ó=13 \xdefó{\'o}
\catcode `\ô=13 \xdefô{\^o}
\catcode `\õ=13 \xdefõ{\~o}
\catcode `\ö=13 \xdefö{\"o}
\catcode `\÷=13 \xdef÷{\mbox{$\div$}}
\catcode `\ø=13 \xdefø{\o}
\catcode `\ù=13 \xdefù{\`u}
\catcode `\ú=13 \xdefú{\'u}
\catcode `\û=13 \xdefû{\^u}
\catcode `\ü=13 \xdefü{\"u}
\catcode `\ý=13 \xdefý{\'y}
\catcode `\þ=13 \xdefþ{}                             % Missing
\catcode `\ÿ=13 \xdefÿ{\"y}
