blob: 13332603e47fda7224a2d358df825fcd1f6b0fa4 (
plain)
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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
% This is the "arm10.tex" file
% This file is a part of the ArmTeX package (Version 1.0, 25 June 1997)
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Some (re)definitions to use some special symbols in armenian texts.
\chardef\?=127
\def\{{\ifmmode\lbrace\else\char94\relax\fi}
\def\}{\ifmmode\rbrace\else\char95\relax\fi}
\def\!{\ifmmode\mskip-\thinmuskip\else\char126\relax\fi}
\def\|{\ifmmode\Vert\else\leavevmode
\kern.01em\vbox{\hrule height.08em width1.2em}\kern.07em\relax\fi}
% Correction of some of plain.tex macros, not to interfere with armenian font.
\catcode`@=11
\def\vdots{\vbox{\baselineskip4\p@ \lineskiplimit\z@
\kern6\p@\hbox{$\ldotp$}\hbox{$\ldotp$}\hbox{$\ldotp$}}}
\def\ddots{\mathinner{\mkern1mu\raise7\p@\vbox{\kern7\p@\hbox{$\ldotp
$}}\mkern2mu\raise4\p@\hbox{$\ldotp$}\mkern2mu\raise
\p@\hbox{$\ldotp$}\mkern1mu}}
\catcode`@=12
% Laoading armenian fonts.
\font\tenartmrm=artmr10
\hyphenchar\tenartmrm=123
\def\artm{\tenartmrm}
\font\tenartmbf=artmb10
\hyphenchar\tenartmbf=123
\def\artmbf{\tenartmbf}
\font\tenartmsl=artmsl10
\hyphenchar\tenartmsl=123
\def\artmsl{\tenartmsl}
\font\tenartmbfsl=artmbs10
\hyphenchar\tenartmbfsl=123
\def\artmbfsl{\tenartmbfsl}
\font\tenartmit=artmi10
\hyphenchar\tenartmit=123
\def\artmit{\tenartmit}
\font\tenartmbfit=artmbi10
\hyphenchar\tenartmbfit=123
\def\artmbfit{\tenartmbfit}
\font\tenarssrm=arssr10
\hyphenchar\tenarssrm=123
\def\arss{\tenarssrm}
\font\tenarsssl=arsssl10
\hyphenchar\tenarsssl=123
\def\arsssl{\tenarsssl}
\font\tenarssbf=arssb10
\hyphenchar\tenarssbf=123
\def\arssbf{\tenarssbf}
\font\tenarssbfsl=arssbs10
\hyphenchar\tenarssbfsl=123
\def\arssbfsl{\tenarssbfsl}
\endinput
% That's all, Folks!
|