%% Copyright (c) 2001 Marius Gedminas <mgedmin@delfi.lt>
%%
%% Requires some TeX lithuanization files from www.vtex.lt
%%
%% $Id: lt.sty,v 1.1 2001/10/05 20:55:12 mg Exp $

\ProvidesPackage{lt}

% This replaces \usepackage[cpRIM]{inputenc}
\providecommand{\uplow}[3]{\global\uccode#1=#2\global\lccode#1=#3}
\catcode`\à=\active\relax\defà{\k{a}}
\catcode`\è=\active\relax\defè{\v{c}}
\catcode`\æ=\active\relax\defæ{\k{e}}
\catcode`\ë=\active\relax\defë{\.{e}}
\catcode`\á=\active\relax\defá{\k{i}}
\catcode`\ð=\active\relax\defð{\v{s}}
\catcode`\ø=\active\relax\defø{\k{u}}
\catcode`\û=\active\relax\defû{\={u}}
\catcode`\þ=\active\relax\defþ{\v{z}}
\catcode`\À=\active\relax\defÀ{\k{A}}
\catcode`\È=\active\relax\defÈ{\v{C}}
\catcode`\Æ=\active\relax\defÆ{\k{E}}
\catcode`\Ë=\active\relax\defË{\.{E}}
\catcode`\Á=\active\relax\defÁ{\k{I}}
\catcode`\Ð=\active\relax\defÐ{\v{S}}
\catcode`\Ø=\active\relax\defØ{\k{U}}
\catcode`\Û=\active\relax\defÛ{\={U}}
\catcode`\Þ=\active\relax\defÞ{\v{Z}}

% Use iso-8859-13 instead of windows-1257 (cpRIM)
\catcode`\¥=\active\relax\def¥{,,}
\catcode`\´=\active\relax\def´{``}

% This replaces \usepackage{addltenc}
\usepackage{times}
\usepackage[T1]{fontenc}

% This replaces \usepackage[english,lithuani]{babel}
% ...

% Use some TeX magic
\makeatletter

% Lithuanian standards

% Maybe be consistent with Lithuanian traditions?
%\renewcommand{\tan}{\mathop{\operator@font tg}\nolimits} 
%\renewcommand{\arctan}{\mathop{\operator@font arctg}\nolimits} 
%\renewcommand{\cot}{\mathop{\operator@font ctg}\nolimits} 
%\renewcommand{\arccot}{\mathop{\operator@font arcctg}\nolimits} 

\renewcommand{\labelenumii}{\theenumii)}

% Say "X-th part" instead of "Part X"
\def\@part[#1]#2{%
    \ifnum \c@secnumdepth >\m@ne
      \refstepcounter{part}%
      \addcontentsline{toc}{part}{\thepart\hspace{1em}#1}%
    \else
      \addcontentsline{toc}{part}{#1}%
    \fi
    {\parindent \z@ \raggedright
     \interlinepenalty \@M
     \normalfont
     \ifnum \c@secnumdepth >\m@ne
       \Large\bfseries \thepart~\MakeLowercase{\partname}
       \par\nobreak
     \fi
     \huge \bfseries #2%
     \markboth{}{}\par}%
    \nobreak
    \vskip 3ex
    \@afterheading}

% Back to reality
\makeatother