File: lh.sty

package info (click to toggle)
tetex-src 3.0.dfsg.2-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 122,292 kB
  • ctags: 2,709
  • sloc: makefile: 2,323; perl: 1,820; sh: 1,378; lisp: 448; python: 335; xml: 175; sed: 138; ansic: 138; yacc: 52
file content (53 lines) | stat: -rw-r--r-- 2,103 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
%% This is lh.sty (LaTeX2e support for LH family of fonts)
%% The family is copyrighted by CyrTUG (cyrtug@mir.msk.su)
%% Style is written by Sergei O. Naoumov (serge@astro.unc.edu)
%%
%% The style redifines three major font families and introduces four
%% new commands: \inh{}, \fib{}, \vtt{}, \fun{}

\def\fileversion{v1.3}
\def\filedate{95/04/26}
\typeout{Russian style for CyrTUG fonts
	by Sergei Naumov.\space\fileversion\space\filedate}

\renewcommand{\rmdefault}{lhcyr}
\renewcommand{\sfdefault}{lhcss}
\renewcommand{\ttdefault}{lhctt}
\renewcommand{\scdefault}{lhcsc}

\newcommand{\inh}{lhcinh}	%%  ( )      \inh{}
\newcommand{\fib}{lhcfib}	%% 			    \fib{}
\newcommand{\vtt}{lhcvtt}	%%      \vtt{}
\newcommand{\fun}{lhcff}	%% 			    \fun{}

%% Now redifine math. It is now possible to have cyrillic letters in
%% equations
\DeclareSymbolFont{operators}      {OT1}{lhcyr}{m}{n}
\SetSymbolFont    {operators}{bold}{OT1}{lhcyr}{bx}{n}
\DeclareMathAlphabet      {\mathbf}{OT1}{lhcyr}{bx}{n}
\DeclareMathAlphabet      {\mathsf}{OT1}{lhcss}{m}{n}
\DeclareMathAlphabet      {\mathit}{OT1}{lhcyr}{m}{it}
\DeclareMathAlphabet      {\mathtt}{OT1}{lhctt}{m}{n}
\SetMathAlphabet\mathsf{bold}{OT1}{lhcss}{bx}{n}
\SetMathAlphabet\mathit{bold}{OT1}{lhcyr}{bx}{it}

%% Characters \"e and \"E and Russian double quotes  \"< \">  ->  << >>
%% The whole thing is "locked" to ALT coding scheme because LH family
%% is built this way. It's easily possible to redo it but... who cares?
\AtBeginDocument{%
\let\@dqtmp\"
\def\"#1{{\def\@tmpzzz{#1}\def\@tmpye{}\def\@tmpcye{^}%
           \def\@tmplt{<}\def\@tmpgt{>}%
        \if\@tmpzzz\@tmpye\char'361%
        \else\if\@tmpzzz\@tmpcye\char'360%
        \else\if\@tmpzzz\@tmplt\char'372%
        \else\if\@tmpzzz\@tmpgt\char'373%
        \else\@dqtmp#1\fi\fi\fi\fi%
        \let\@tmpzzz\relax\let\@tmpye\relax%
        \let\@tmplt\relax\let\@tmpgt\relax\let\@tmpcye\relax}}
}
%% Russian number symbol and double quotes  \< \>  ->  << >>
\def\No{{\char'362}}
\def\<{{\char'363}}
\def\>{{\char'364}}