%			*****	CYRACC.DEF	*****		11 Aug 85, bb
%
%	This file contains definitions of accents and special characters
%	required for cyrillic.  The \font specification(s) should be made
%	elsewhere, and should include
%		\newfam\cyrfam
%		\font\...cyr=mcyr...
%
%	An appropriate definition for cyrillic, usable in math and text, is
%		\def\cyr{\fam\cyrfam\...cyr\cyracc}
%
%	See end of file (after \endinput) for notes.


\def\ubar#1{\oalign{#1\crcr\hidewidth
    \vbox to.2ex{\hbox{\char22}\vss}\hidewidth}}
%	this is definition of \b from PLAIN; it may not work in math mode
\def\cydot{$\cdot$}	% temporary -- real dot will be in accent font

\def\cprime{$'$}
\def\Cprime{$'$}
\def\cdprime{$''$}
\def\Cdprime{$\ubar{\hbox{$''$}}$}

\def\dbar{dj}		% make real barred d when accent font available
\def\Dbar{Dj}		%  ""

\def\dz{dz}		% ultimately, d will have to become active, to
\def\Dz{Dz}		% make these control sequences unnecessary
\def\dzh{dzh\cydot }
\def\Dzh{Dzh\cydot }

\def\cyracc{\def\cydot{{\kern0pt}}%
	\def\cprime{\char"7E }\def\Cprime{\char"5E }%
	\def\cdprime{\char"7F }\def\Cdprime{\char"5F }%
	\def\dbar{dj}\def\Dbar{Dj}%
	\def\dz{\char"1E }\def \Dz{\char"16 }%
	\def\dzh{\char"0A }\def \Dzh{\char"02 }%
	\def\'##1{\if c##1\char"0F %
		\else \if C##1\char"07 %
		\else \accent"26 ##1\fi \fi }%
	\def\`##1{\if e##1\char"0B %
		\else \if E##1\char"03 %
		\else \errmessage{accent \string\` not defined in cyrillic}%
				##1\fi \fi }%
	\def\=##1{\if e##1\char"0D %
		\else \if E##1\char"05 %
		\else \if \i##1\char"0C %
		\else \if I##1\char"04 %
		\else \errmessage{accent \string\= not defined in cyrillic}%
				##1\fi \fi \fi \fi }%
	\def\u##1{\if \i##1\accent"24 i%
		\else \accent"24 ##1\fi }%
	\def\"##1{\if \i##1\accent"20 \char"3D %
		\else \if I##1\accent"20 \char"04 %
		\else \accent"20 ##1\fi \fi }}

\endinput

%			*****	CYRACC.DEF	*****		18 Aug 84, bb
%
%	Access to the cyrillic is through the new MR transliteration scheme,
%	using TeX/Metafont ligature capability.  (An alternate set of
%	ligatures exists, for accessing letters beyond the 26 located in
%	the font positions of the 26 roman letters.  An authoritative list
%	of the ligature rules is in the file  cyrillic.ligs.)  Successful
%	use of this file requires appropriate cyrillic and accent fonts,
%	arranged according to the AMS/MR scheme.
%
%	This is an interim version.  Not everything works yet.
%	The following are known to be less than satisfactory:
%
%	the intermediate `ligatures' for shch access numerals;
%	primes (transliteration of hard/soft signs) use math mode;
%	underbar on `cap' double prime is too low (hard sign);
%	thorn d's don't yet exist;
%	\cydot uses math mode.
%
%
%	Notes on the macros:
%
%	The single space following each hex character code is necessary
%	to prevent the next input character from being gobbled.