% File: mcyrill.mf
% Based on: cyrillic.mf
% Modified by: Oliver Corff
% Date: December 1998, Ulaanbaatar, Beijing, Shenyang, Berlin
%
%
% The Computer Modern Cyrillic family of fonts (by N. Glonti)
%
%
let cmchar=message; % `|cmchar|' should precede each character
font_coding_scheme:="TeX text";
input mccoding;
mode_setup; font_setup;
input punct; % Computer Modern common punctuation symbols
input romanp; % more common symbols
input romand; % numbers
input accent; % useful accents
input mcyru; % upper case (majuscules)
input mcyrl; % lower case (minuscules)
input mcyrsymb; % seven additional chars: < << > >> No. T== t==
input cyrmoreu; % Umlaut O U and Buriad H
input cyrmorel; % Umlaut o u and Buriad h
if ligs>0 : input comlig fi; % ligatures common with roman text
if ligs<=1: input romsub fi;
font_slant slant;
font_x_height x_height#;
if monospace: font_normal_space 9u#; % no stretching or shrinking
font_quad 18u#;
font_extra_space 9u#;
else: font_normal_space 6u#+2letter_fit#;
font_normal_stretch 3u#; font_normal_shrink 2u#;
font_quad 18u#+4letter_fit#;
font_extra_space 2u#;
k#:=.25u#; kk#:=.5u#; kkk#:=0.75u#; kkkk#:=-1.25u#;
%k#:=.5u#; kk#:=.75u#; kkk#:=1.5u#; kkkk#:=-2u#;
%k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
%k#:=2u#; kk#:=u#; kkk#:=3u#; kkkk#:=-5u#;
ligtable cyra: % a
cyrya kern -kk#, % ya
cyru kern -kk#, % u
cyrd kern k#, % d
cyrch kern -kk#; % ch
ligtable cyrb: % b
cyrv kern -k#, % ve
cyrg kern -k#, % ghe
cyre kern k#, % e
cyrzh kern -k#, % zhe
cyri kern -k#, % i
cyrk kern -k#, % ka
cyrm kern -k#, % em
cyrn kern -k#, % en
cyrp kern -k#, % pe
cyrr kern -k#, % er
% cyrf kern -k#, % (was -kk# AS) f
cyrh kern -k#, % x
% cyro kern -k#, % o (-kkkk -> -kkk AS)
cyrs kern -k#, % s (-kkkk -> -kkk AS)
cyru kern -k#, % u
cyrsftsn kern -k#, % soft_sign
cyrery kern -k#, % yeru
cyrshch kern -k#, % shcha
cyrc kern -k#; % tse
ligtable cyrc: cyrsh: cyrshch:
cyrn: cyrm: cyrp:
cyrb kern -k#, % be
cyro kern -k#, % o
cyre kern -k#, % es
cyrf kern -k#, % ef
cyrs kern -k#, % ie
cyrd kern k#; % d
ligtable cyrd: % d
cyrb kern -kkk#, % be
cyro kern -kkk#, % o
cyre kern -kkk#, % es
cyrf kern -kk#, % ef
cyrs kern -kkk#, % ie
cyrd kern kk#; % d
ligtable cyre: % e
cyrb kern kkk#, % b
cyrd kern -kk#, % d
% cyre kern -k#, % e
cyrzh kern -kk#, % e
% cyrf kern -k#, % f
cyrh kern -kk#, % x
% cyro kern -k#, % o
% cyrs kern -k#, % s
% cyrt kern -k#, % t
cyru kern -k#; % u
ligtable cyrf: % f
cyre kern k#, % e
cyrh kern -kk#, % x
cyri kern -kk#, % i
cyrn kern -k#, %
cyrp kern -k#, %
cyrr kern -k#, %
cyro kern k#, % o
cyrs kern k#, % s
cyrt kern -k#; % t
ligtable cyrg: % g
cyrb kern -k#, % b
cyre kern -kkk#, % e
cyro kern -kkk#, % o
cyrs kern -kkk#; % s
ligtable cyrh: % kh
cyre kern -kk#, % e
cyro kern -kk#, % o
cyrf kern -kk#, %
cyrs kern -kk#; % s
ligtable cyrk: % k
cyre kern -kk#, % e
cyrf kern -kk#, % f
cyro kern -kk#, % o
cyrs kern -kk#, % s
cyru kern -k#; % u
ligtable cyrl: % l
cyre kern -kk#, % e
cyrf kern -kk#, % f
cyro kern -kk#, % o
cyrs kern -kk#; % s
ligtable cyro: % o
% cyrb kern -k#, % b (was kkkk AS)
cyrv kern -kk#, % ve
cyrd kern -kkk#, % de
% cyre kern -k#, % e (was kkkk AS)
cyrh kern -kk#, % x
% cyro kern -k#, % o (was kkkk AS)
% cyrs kern -kk#, % s (was kkkk AS)
cyrm kern -kk#, %
cyrn kern -kk#, %
cyrp kern -kk#, %
cyri kern -kk#, %
cyrishrt kern -kk#, %
cyrk kern -kk#, %
cyrr kern -kk#, %
cyrsh kern -kk#, %
cyrshch kern -kk#, %
cyrch kern -kkk#, %
cyrzh kern -kk#; % zh
ligtable cyrr: % p
% cyrb kern -k#, % b (kkkk -> -kkk AS)
% cyre kern -k#, % e(kkkk -> -kkk AS)
cyrh kern -kk#, % x
% cyro kern -k#, % o (kkkk -> -kkk AS)
% cyrs kern -kk#, % s (kkkk -> -kkk AS)
cyrt kern -k#; % t
% ligtable cyrs: % s
% cyrb kern -k#, % b
% cyre kern -k#, % e
% cyrf kern -k#, % f
% cyro kern -k#, % o
% cyrs kern -k#; % s
ligtable cyrt: % t
cyrn kern -k#, %
cyrs kern -k#, %
cyre kern -k#, % e
cyro kern -k#; % o
ligtable cyru: % u
cyrd kern -k#, % d
cyrl kern -kk#, %
cyra kern -k#; % s
ligtable cyrzh: % zh
cyrb kern -kk#, % b
cyre kern -kk#, %
cyrf kern -kk#, %
cyro kern -kk#, % o
cyrs kern -kk#; % s
ligtable cyrv: % w
cyrt kern -k#; % d
% ligtable cyrz: % z
% cyrb kern -k#, % b
% cyre kern -k#, % e
% cyro kern -k#, % o
% cyrs kern -k#; % s
% ligtable cyrs: cyrh=: cyrsh;
ligtable CYRA: % A
cyru kern -kk#, %
CYRCH kern -kkk#; % ch
ligtable CYRB: % B
CYRO kern -k#, % o
CYRS kern -k#, % s
CYRU kern -kk#; % u
ligtable CYRG: CYRU: % G U
CYRA kern -kk#, % a
% cyrv kern -kk#, % w
% CYRG kern -kk#, % g
CYRD kern -kk#, % d
% CYRE kern -kk#, % e
CYRF kern -kk#, % f
CYRH kern -kk#, % kh
% CYRI kern -kk#, % i
% CYRISHRT kern -kk#, % j
% CYRK kern -kk#, % k
CYRL kern -kk#, % l
% CYRM kern -kk#, % m
% CYRN kern -kk#, % n
% CYRO kern -kk#, % o
% CYRP kern -kk#, % p
CYRYA kern -kk#, % ya
% CYRR kern -kk#, % r
CYRS kern -kk#, % s
CYRT kern -kk#, % t
CYRU kern -kk#; % u
% CYRV kern -kk#, % w
% CYRSFTSN kern -kk#, % '
% CYRERY kern -kk#, % y
% CYRZ kern -kk#, % z
% CYRSH kern -kk#, % sh
% CYRSHCH kern -kk#, % shch
% CYRCH kern -kk#; % ch
% CYRHRDSN kern -k#; % ''
ligtable CYRO: CYRS: CYRF:
cyrd kern -kkk#, %
CYRA kern -kkk#, %
CYRV kern -kkk#, %
CYRG kern -kkk#, %
CYRR kern -kkk#, %
CYRP kern -kkk#, %
CYRN kern -kkk#, %
CYREREV kern -kkk#, %
CYRH kern -kkk#, %
CYRI kern -kkk#, %
CYRK kern -kkk#, %
CYRM kern -kkk#, %
CYRSH kern -kkk#, %
CYRSHCH kern -kkk#, %
CYRISHRT kern -kkk#; % j
ligtable CYRN: CYRM: CYRR: CYRP:
CYRZH: CYRK: CYRD: CYRH:
CYRO kern -kkk#, %
CYRS kern -kkk#, %
CYRF kern -kkk#; %
ligtable CYRT: % T
CYRA kern -kkk#, % a
% CYRV kern -kkk#, % w
% CYRG kern -kkk#, % g
CYRD kern -kkk#, % d
CYRE kern -kkk#, % e
CYRF kern -kkk#, % f
CYRH kern -kkk#, % kh
CYRI kern -kkk#, % i
CYRISHRT kern -kkk#, % j
CYRK kern -kkk#, % k
CYRL kern -kkk#, % l
% CYRM kern -kkk#, % m
% CYRN kern -kkk#, % n
CYRO kern -kkk#, % o
% CYRP kern -kkk#, % p
CYRYA kern -kkk#, % ya
% CYRR kern -kkk#, % r
CYRS kern -kkk#, % s
CYRT kern -kkk#, % t
CYRU kern -kkk#, % u
% CYRV kern -kkk#, %
% CYRSFTSN kern -kkk#, %
% CYRERY kern -kkk#, % y
CYRZ kern -kkk#; % z
% CYRSH kern -kk#, % sh
% CYRSHCH kern -kk#, % shch
% CYRCH kern -kk#, % ch
% CYRHRDSN kern -kk#; %
fi;
input mcyrligs;
bye.