From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- fonts/utilities/mathinst/lu_ihax.mtx | 135 +++++++++++++++++++++++++++++++++++ 1 file changed, 135 insertions(+) create mode 100644 fonts/utilities/mathinst/lu_ihax.mtx (limited to 'fonts/utilities/mathinst/lu_ihax.mtx') diff --git a/fonts/utilities/mathinst/lu_ihax.mtx b/fonts/utilities/mathinst/lu_ihax.mtx new file mode 100644 index 0000000000..f020362cf7 --- /dev/null +++ b/fonts/utilities/mathinst/lu_ihax.mtx @@ -0,0 +1,135 @@ +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% +%% This is the file lu_ihax.mtx, part of the MathInst package +%% (version 1.0, August, 1998) for math font +%% generation. (Author: Alan Hoenig, ajhjj@cunyvm.cuny.edu) +%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + +\relax + +\metrics + +\needsfontinstversion{1.315} + +% \shiftglyph takes four parameters: +% +% #1 the name of the glyph +% #2 the amount of extra space at the left +% #3 the amount of extra space at the right +% #4 the amount to move in subscripts (should be -ve) + +\setcommand\shiftglyph#1#2#3#4{ + \ifisglyph{#1}\then + \resetglyph{#1} + \movert{#2} + \glyph{#1}{1000} + \movert{#4} + \resetitalic{\add{\italic{#1}}{\sub{#3}{#4}}} + \endresetglyph + \fi +} + +% \unfakable produces a missing glyph warning. + +\setcommand\unfakable#1{ + \setglyph{#1} + \glyphrule{500}{500} + \glyphwarning{missing glyph `#1'} + \endsetglyph +} + +% Zero the depth of a glyph. + +\setcommand\zerodepth#1{ + \ifisglyph{#1}\then + \resetglyph{#1} + \glyph{#1}{1000} + \resetdepth{0} + \endresetglyph + \fi +} + +% Values produced by trial and error... + +\shiftglyph{C}{-50}{0}{-25} +\shiftglyph{E}{0}{50}{0} +\shiftglyph{F}{0}{50}{-100} +\shiftglyph{H}{0}{25}{-25} +\shiftglyph{I}{0}{0}{-25} +\shiftglyph{K}{0}{0}{-25} +\shiftglyph{J}{0}{0}{-25} +\shiftglyph{N}{0}{0}{-25} +\shiftglyph{P}{0}{0}{-100} +\shiftglyph{T}{0}{50}{-75} +\shiftglyph{U}{-50}{50}{-25} +\shiftglyph{V}{-50}{50}{-50} +\shiftglyph{W}{-50}{50}{-50} +\shiftglyph{X}{0}{50}{-25} +\shiftglyph{Y}{-50}{50}{-50} +\shiftglyph{b}{0}{-25}{0} +\shiftglyph{d}{0}{25}{0} +\shiftglyph{f}{\scale{\depth{f}}{750}}{0}{25} +\shiftglyph{g}{0}{-50}{0} +\shiftglyph{j}{150}{25}{0} +\shiftglyph{l}{0}{50}{0} +\shiftglyph{o}{0}{-50}{0} +\shiftglyph{p}{75}{-25}{0} +\shiftglyph{t}{-25}{50}{0} +\shiftglyph{Upsilon}{0}{0}{-50} +\shiftglyph{Upsilon}{0}{0}{-100} +\shiftglyph{weierstrass}{-100}{-200}{-150} + +\unfakable{rho1} + +\ifisglyph{omega1}\then + \setglyph{pi1} + \glyph{omega1}{1000} + \endsetglyph +\fi + +\ifisglyph{epsilon}\then + \setglyph{epsilon1} + \glyph{epsilon}{1000} + \endsetglyph +\fi + +% \resetglyph{vector} +% \movert{-100} +% \glyph{vector}{1000} +% \movert{100} +% \endresetglyph + +% Accents have to have zero depth. + +\zerodepth{acute} +\zerodepth{grave} +\zerodepth{caron} +\zerodepth{breve} +\zerodepth{macron} +\zerodepth{ring} +\zerodepth{circumflex} +\zerodepth{dotaccent} +\zerodepth{tilde} +\zerodepth{dieresis} + +\ifisglyph{tie}\then + \resetglyph{tie} + \push + \movert{\div{\width{tie}}{2}} + \glyph{tie}{1000} + \pop + \samesize{tie} + \endresetglyph +\fi +\ifisglyph{vector}\then + \resetglyph{vector} + \moveup{1} + \glyph{vector}{1000} + \moveup{-1} + \endresetglyph +\fi + +\endmetrics + -- cgit v1.2.3