\ifx\abbrloaded\relax
    \let\next=\endinput
\else
    \let\next=\relax
\fi

\next

\let\abbrloaded=y

\let\S=\textsf
\let\T=\texttt
\let\I=\textit
\let\B=\textbf


\let\add=\advance
\let\div=\divide
\let\mul=\multiply
\let\ex=\expandafter

\def\log#1{\immediate \write 16 {#1}}

\catcode`\"=13
\def\lqq{``\global\let"=\rqq}
\def\rqq{''\global\let"=\lqq}
\let"=\lqq

\def\<#1>{%
    \expandafter\ifx\csname<#1>\endcsname\relax
        \errmessage{abbreviation <#1> undefined!}
    \else
        \csname<#1>\endcsname
    \fi
}
\def\abbr#1#2{%
    \expandafter\def\csname<#1>\endcsname{#2}%
}

\abbr{THANH}{H\`an Th\^e\llap{\raise 0.5ex\hbox{\'{}}} Th\`anh}
\abbr{HZ}{\textit{hz}}
\abbr{KF}{\textit{kf\kern-.05em}}
\abbr{KR}{\textit{K$\varrho$}}
\abbr{EK}{\textit{{\Large$\varepsilon$\kern-.1em}k}}
\abbr{JP}{\textit{jp}}
\abbr{MF}{\MF}
\abbr{CMR}{CMR}
\abbr{CMSS}{CMSS}
\abbr{MM}{Multiple Master}
\abbr{T1}{Type\nobreak\,1}
\abbr{PFB}{PFB}
\abbr{CM}{Computer Modern}
\abbr{TEX}{\TeX}
\abbr{LATEX}{\LaTeX}
\abbr{PDFTEX}{pdf\TeX}
\abbr{URW}{URW}
\abbr{ASCII}{ASCII}
\abbr{DTP}{DTP}
\abbr{DVI}{DVI}
\abbr{PS}{PS}
\abbr{TFM}{TFM}
\abbr{PDF}{PDF}
\abbr{HJ}{H\kern.1em\&\kern.1emJ}
\abbr{UNIX}{UNIX}
\abbr{AMIGA}{Amiga}
\abbr{DOS}{DOS}
\abbr{MAC}{Macintosh}
\abbr{C}{C}
\abbr{TRUETYPE}{TrueType}
\abbr{WIN32}{Win32}
\abbr{FPTEX}{fp\TeX}
\abbr{TETEX}{te\TeX}
\abbr{MIKTEX}{Mik\TeX}
\abbr{CMACTEX}{CMac\TeX}
\abbr{AFM}{AFM}
\abbr{MMTOOLS}{MMTOOLS}
\abbr{VNR}{VNR}
\abbr{CS}{CS}
\abbr{HTML}{HTML}
\abbr{WWW}{WWW}
\abbr{ID}{InDesign}
\abbr{ADOBE}{Adobe}
\abbr{3B2}{3B2}
\abbr{...}{\dots}
\abbr{OMEGA}{$\Omega$}
\abbr{ETEX}{$\varepsilon$-\TeX}
\abbr{NTS}{NTS}
\abbr{LF}{\textrm{\it letter\!\_\kern.1emfit}}
\abbr{SGML}{SGML}
\abbr{XML}{XML}
\abbr{NTG}{NTG}
\abbr{DANTE}{DANTE}
\abbr{GUST}{GUST}
\abbr{GUT}{GUTenberg}
\abbr{TUG}{TUG}
\abbr{BS}{\char92}
\abbr{TFTOPL}{TFtoPL}
\abbr{PDFETEX}{pdf\<ETEX>}
\abbr{ZLIB}{ZLIB}
\abbr{LIBPNG}{LIBPNG}
\abbr{LIBTIFF}{LIBTIFF}
\abbr{XPDF}{XPDF}
\abbr{MIRKA}{Miroslava Mis\'akov\'a}
\abbr{PERL}{Perl}
\abbr{MMINSTANCE}{MMInstance}
\abbr{PERL}{Perl}
\abbr{LINUX}{Linux}
\abbr{PASCAL}{Pascal}

\ifx\newcommand\undefined
    \let\next=\relax
\else
    \let\next=\endinput
\fi
\next

\def\makeatletter{\catcode`\@11\relax}
\def\makeatother{\catcode`\@12\relax}
\makeatletter
\newcount\@tempcnta
\newcount\@tempcntb
\newif\if@tempswa
\newdimen\@tempdima
\newdimen\@tempdimb
\newdimen\@tempdimc
\newbox\@tempboxa
\newskip\@tempskipa
\newskip\@tempskipb
\newtoks\@temptokena
\makeatother

\endinput
