blob: fd198712576a2865771a5fe5bbfed354d5212ed4 (
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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Module: ZzTeX MathTime Font Support
%
% Synopsis: This module contains various definitions and redefinitions
% necessary to use the MathTime fonts by The TeXplorators Corp.
%
% Author: Paul C. Anagnostopoulos
% Created: 24 March 1993
%
% Copyright 1989--2020 by Paul C. Anagnostopoulos
% under The MIT License (opensource.org/licenses/MIT)
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Type Styles
% ---- ------
\setstyleskewchar{\mit}{"2D}
% Redefine Text Accents
% -------- ---- -------
\def \t #1{% %~ Tie-after accent. %^accent
{\edef \znext {\the\font}\the\textfont2 \accent "41 \znext #1}}
% Redefine Math Characters
% -------- ---- ----------
\zmchar \Gamma \classord \mitfam {30}
\zmchar \Delta \classord \mitfam {31}
\zmchar \Theta \classord \mitfam {32}
\zmchar \Lambda \classord \mitfam {33}
\zmchar \Xi \classord \mitfam {34}
\zmchar \Pi \classord \mitfam {35}
\zmchar \Sigma \classord \mitfam {36}
\zmchar \Upsilon \classord \mitfam {37}
\zmchar \Phi \classord \mitfam {38}
\zmchar \Psi \classord \mitfam {39}
\zmchar \Omega \classord \mitfam {7F}
\zmchar \varkappa \classord \mitfam {7E}
\zmchar {`+} \classbinop \msyfam {43}
\zmchar \compose \classbinop \msyfam {42}
\zmchar \capprod \classbinop \msyfam {5A}
\zmchar \cupprod \classbinop \msyfam {59}
% Do not define \zmdagger and \zmddagger.
\zmchar \setdiff \classbinop \msyfam {58}
\zmchar \triangleleft \classbinop \msyfam {47}
\zmchar \triangleright \classbinop \msyfam {46}
\zmchar {`=} \classrel \msyfam {44}
\zmchar {`(} \classopen \mitfam {2E}
\definemathdelimiter {`(} \classord \mitfam {2E} \mexfam {00}
\zmchar {`)} \classclose \mitfam {2F}
\definemathdelimiter {`)} \classord \mitfam {2F} \mexfam {01}
\def \hbar {\mathord{h \llap{$\mathchar"024E \mkern 3.5mu$}}}
\def \acute {\zmtaccent{024B}{7013}} %~ Acute accent. %^math_accent
\def \bar {\zmtaccent{024E}{7016}} %~ Bar accent. %^math_accent
\def \breve {\zmtaccent{024D}{7015}} %~ Breve accent. %^math_accent
\def \check {\zmtaccent{024C}{7014}} %~ Check accent. %^math_accent
\def \ddot {\zmtaccent{0252}{????}} %~ Double dot accent. %^math_accent
\def \dot {\zmtaccent{0250}{700B}} %~ Dot accent. %^math_accent
\def \grave {\zmtaccent{024A}{7012}} %~ Grave accent. %^math_accent
\def \zmhat {\zmtaccent{024F}{7007}} %~ Hat accent. %^math_accent
\def \zmtilde {\zmtaccent{0251}{700F}} %~ Tilde accent. %^math_accent
\def \vec {\mathaccent "0245\relax} %~ Vector accent. %^math_accent
\def \widebar {\mathaccent "0253\relax} %~ Wide bar accent. %^math_accent
\def \zmtaccent #1#2{%
\if \eqlp{\fam}{-1}%
\mathaccent "#1\relax
\else
\mathaccent "#2\relax
\fi}
% Redefine General Tools
% -------- ------- -----
\zmchar \Relbar \classrel \msyfam {48}
|