%%
%% This is lhcyrkoi.sty
%%
\def\fileversion{v1.0}
\def\filedate{1998/12/15}
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{lhcyrkoi}[\filedate\space\fileversion^^J%
lh fonts in koi8-r encoding (V.V.Zhytnikov)]

\catcode'300=11 %iu
\catcode'301=11 %a
\catcode'302=11 %b
\catcode'303=11 %ts
\catcode'304=11 %d
\catcode'305=11 %e
\catcode'306=11 %f
\catcode'307=11 %g
\catcode'310=11 %kh
\catcode'311=11 %i
\catcode'312=11 %ii
\catcode'313=11 %k
\catcode'314=11 %l
\catcode'315=11 %m
\catcode'316=11 %n
\catcode'317=11 %o
\catcode'320=11 %p
\catcode'321=11 %ya
\catcode'322=11 %r
\catcode'323=11 %s
\catcode'324=11 %t
\catcode'325=11 %u
\catcode'326=11 %zh
\catcode'327=11 %v
\catcode'330=11 %soft
\catcode'331=11 %iy
\catcode'332=11 %z
\catcode'333=11 %sh
\catcode'334=11 %'e
\catcode'335=11 %shch
\catcode'336=11 %ch
\catcode'337=11 %hard
\catcode'340=11 %IU
\catcode'341=11 %A
\catcode'342=11 %B
\catcode'343=11 %TS
\catcode'344=11 %D
\catcode'345=11 %E
\catcode'346=11 %F
\catcode'347=11 %G
\catcode'350=11 %KH
\catcode'351=11 %I
\catcode'352=11 %II
\catcode'353=11 %K
\catcode'354=11 %L
\catcode'355=11 %M
\catcode'356=11 %N
\catcode'357=11 %O
\catcode'360=11 %P
\catcode'361=11 %YA
\catcode'362=11 %R
\catcode'363=11 %S
\catcode'364=11 %T
\catcode'365=11 %U
\catcode'366=11 %ZH
\catcode'367=11 %V
\catcode'370=11 %SOFT
\catcode'371=11 %IY
\catcode'372=11 %Z
\catcode'373=11 %SH
\catcode'374=11 %'E
\catcode'375=11 %SHCH
\catcode'376=11 %CH
\catcode'377=11 %HARD
\catcode'243=11 %yo
\catcode'263=11 %YO
\catcode'206=11 %Number

\AtBeginDocument{%
\lccode'300='300 \uccode'300='340  %iu
\lccode'301='301 \uccode'301='341  %a
\lccode'302='302 \uccode'302='342  %b
\lccode'303='303 \uccode'303='343  %ts
\lccode'304='304 \uccode'304='344  %d
\lccode'305='305 \uccode'305='345  %e
\lccode'306='306 \uccode'306='346  %f
\lccode'307='307 \uccode'307='347  %g
\lccode'310='310 \uccode'310='350  %kh
\lccode'311='311 \uccode'311='351  %i
\lccode'312='312 \uccode'312='352  %ii
\lccode'313='313 \uccode'313='353  %k
\lccode'314='314 \uccode'314='354  %l
\lccode'315='315 \uccode'315='355  %m
\lccode'316='316 \uccode'316='356  %n
\lccode'317='317 \uccode'317='357  %o
\lccode'320='320 \uccode'320='360  %p
\lccode'321='321 \uccode'321='361  %ya
\lccode'322='322 \uccode'322='362  %r
\lccode'323='323 \uccode'323='363  %s
\lccode'324='324 \uccode'324='364  %t
\lccode'325='325 \uccode'325='365  %u
\lccode'326='326 \uccode'326='366  %zh
\lccode'327='327 \uccode'327='367  %v
\lccode'330='330 \uccode'330='370  %soft
\lccode'331='331 \uccode'331='371  %iy
\lccode'332='332 \uccode'332='372  %z
\lccode'333='333 \uccode'333='373  %sh
\lccode'334='334 \uccode'334='374  %'e
\lccode'335='335 \uccode'335='375  %shch
\lccode'336='336 \uccode'336='376  %ch
\lccode'337='337 \uccode'337='377  %hard
\lccode'340='300 \uccode'340='340  %IU
\lccode'341='301 \uccode'341='341  %A
\lccode'342='302 \uccode'342='342  %B
\lccode'343='303 \uccode'343='343  %TS
\lccode'344='304 \uccode'344='344  %D
\lccode'345='305 \uccode'345='345  %E
\lccode'346='306 \uccode'346='346  %F
\lccode'347='307 \uccode'347='347  %G
\lccode'350='310 \uccode'350='350  %KH
\lccode'351='311 \uccode'351='351  %I
\lccode'352='312 \uccode'352='352  %II
\lccode'353='313 \uccode'353='353  %K
\lccode'354='314 \uccode'354='354  %L
\lccode'355='315 \uccode'355='355  %M
\lccode'356='316 \uccode'356='356  %N
\lccode'357='317 \uccode'357='357  %O
\lccode'360='320 \uccode'360='360  %P
\lccode'361='321 \uccode'361='361  %YA
\lccode'362='322 \uccode'362='362  %R
\lccode'363='323 \uccode'363='363  %S
\lccode'364='324 \uccode'364='364  %T
\lccode'365='325 \uccode'365='365  %U
\lccode'366='326 \uccode'366='366  %ZH
\lccode'367='327 \uccode'367='367  %V
\lccode'370='330 \uccode'370='370  %SOFT
\lccode'371='331 \uccode'371='371  %IY
\lccode'372='332 \uccode'372='372  %Z
\lccode'373='333 \uccode'373='373  %SH
\lccode'374='334 \uccode'374='374  %'E
\lccode'375='335 \uccode'375='375  %SHCH
\lccode'376='336 \uccode'376='376  %CH
\lccode'377='337 \uccode'377='377  %HARD
\lccode'243='243 \uccode'243='263  %yo
\lccode'263='243 \uccode'263='263  %YO
}

\renewcommand{\rmdefault}{kcr}
\renewcommand{\sfdefault}{kcss}
\renewcommand{\ttdefault}{kctt}

% Characters \"e \"E and \"i
% Russian double quotes  \"< \">  ->  << >>
\AtBeginDocument{%
\let\@dqtmp\"
\def\"#1{{\def\@tmpzzz{#1}\def\@tmpye{е}\def\@tmpcye{Е}%
           \def\@tmplt{<}\def\@tmpgt{>}\def\@tmpi{i}%
        \if\@tmpzzz\@tmpye\char'243%
        \else\if\@tmpzzz\@tmpcye\char'263%
        \else\if\@tmpzzz\@tmplt\char'204%
        \else\if\@tmpzzz\@tmpgt\char'205%
        \else\if\@tmpzzz\@tmpi\@dqtmp{\i}%
        \else\@dqtmp#1\fi\fi\fi\fi\fi%
        \let\@tmpzzz\relax\let\@tmpye\relax\let\@tmpi\relax%
        \let\@tmplt\relax\let\@tmpgt\relax\let\@tmpcye\relax}}
}
% Russian number symbol \No
\def\No{{\char'206}}
% Russian double quotes  \< \>  ->  << >>
\def\<{{\char'204}}
\def\>{{\char'205}}

% Russian Style. Partially borrowed from ruscorr.sty
\DeclareOption{russtyle}{%
\def\prefacename{Предисловие}%
\def\refname{Ссылки}%
\def\abstractname{Аннотация}%
\def\bibname{Литература}%
\@ifundefined{chapter}{}{\def\chaptername{Глава}}%
\def\appendixname{Приложение}%
\def\contentsname{Оглавление}%
\def\listfigurename{Список иллюстраций}%
\def\listtablename{Список таблиц}%
\def\indexname{Предметный указатель}%
\def\figurename{Рис.}%
\def\tablename{Табл.}%
\def\partname{Часть}%
\def\enclname{Приложение}%
\def\ccname{Копия}%
\def\pagename{Стр.}%
\def\headtoname{Кому:}%
\def\seename{см.}%
\def\alsoname{см.~также}%
% Saving english \today
\let\etoday\today%
\def\today{\number\day~\ifcase\month\or
  января\or февраля\or марта\or апреля\or мая\or июня\or
  июля\or августа\or сентября\or октября\or ноября\or
  декабря\fi \space \number\year~г.}%
% Russian counters
\def\ralph#1{\@ralph{\@nameuse {c@#1}}}
\def\@ralph#1{\ifcase #1\or а\or б\or в\or г\or д\or е\or ж\or з\or
и\else\@iralph{#1}\fi
}
\def\@iralph#1{\ifcase #1\or\or\or\or\or\or\or\or\or\or
     к\or л\or м\or н\or о\or п\or р\or с\or т\or у\or
     ф\or х\or ц\or ч\or ш\or щ\or э\or ю\or я\else\@ctrerr
     \fi}
\def\Ralph#1{\@Ralph{\@nameuse {c@#1}}}
\def\@Ralph#1{\ifcase #1%
     \or А\or Б\or В\or Г\or Д\or Е\or Ж\or З\or
     И\else\@iRalph{#1}\fi}
\def\@iRalph#1{\ifcase #1%
     \or\or\or\or\or\or\or\or\or\or К\or Л\or М\or
     Н\or О\or П\or Р\or С\or Т\or У\or Ф\or Х\or Ц\or
     Ч\or Ш\or Щ\or Э\or Ю\or Я\else\@ctrerr
     \fi}
% Russian enumerate
\def\labelenumi{\theenumi)}
\def\theenumii{\ralph{enumii}}
\def\labelenumii{\theenumii)}
\def\p@enumii{\theenumi}
\def\labelenumiii{{\bf--}}
\let\theenumiii\relax
\def\p@enumiii{\theenumi\theenumii}
\def\enumerate{\ifnum \@enumdepth >2%
\@toodeep\else
      \advance\@enumdepth \@ne
      \edef\@enumctr{enum\romannumeral\the\@enumdepth}\list
      {\csname label\@enumctr\endcsname}{\usecounter
        {\@enumctr}\def\makelabel##1{\hss\llap{##1}}}\fi}
% Russian appendix
\@ifundefined{chapter}{% Article
   \def\appendix{\par
   \setcounter{section}{0}%
   \setcounter{subsection}{0}%
   \def\thesection{\Ralph{section}}}
}{% Book or Report
   \def\appendix{\par
   \setcounter{chapter}{0}%
   \setcounter{section}{0}%
   \def\@chapapp{\appendixname}%
   \def\thechapter{\Ralph{chapter}}}
}
% Correct Russian hyphenation
\frenchspacing
\righthyphenmin=2
\lefthyphenmin=2
}
\ProcessOptions

\endinput
%%
%% End of lhcyrkoi.sty
%%
