blob: 9fd1d91725b77fb7e51e8e2473f16653df2e77c1 (
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
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% This is the file ma3mi.mtx, part of the `makemma' subpackage
%% of the MathInst package
%% (version 0.8, January , 1998) for math font
%% generation. (Author: Alan Hoenig, ajhjj@cunyvm.cuny.edu)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\relax
This file renames glyphs to a more standard name. This is file
`ma3mi.mtx'; it selects and renames Mathematica glyphs in the Math3 font
to those in a traditional math italic font.
\metrics
\setcommand\renameas#1#2{\ifisglyph{#1}\then
\setglyph{#2}
\glyph{#1}{1000}
\endsetglyph
\unsetglyph{#1}
\fi}
\setcommand\renameandsave#1#2{\ifisglyph{#1}\then
\setglyph{#2saved}
\glyph{#1}{1000}
\endsetglyph
\unsetglyph{#1}
\fi}
%% Some glyphs are, by chance, properly named. We need to save them,
%% and not unset them when we cancel the Adobe encoding.
\setcommand\save#1{\renameas{#1}{#1saved}}
\renameas{summation}{rho1}
\renameas{at}{triangleright}
\renameas{zero}{triangleleft}
\renameas{macron}{star}
\renameas{partialdiff}{epsilon}
\renameas{Ydieresis}{flat}
\renameas{fraction}{natural}
\renameas{currency}{sharp}
\renameandsave{quotedblright}{dotlessi}
\renameas{quoteright}{dotlessj}
\endmetrics
|