1.1 --- a/doc-src/iman.sty Mon Nov 22 18:26:46 1993 +0100
1.2 +++ b/doc-src/iman.sty Tue Nov 23 10:47:33 1993 +0100
1.3 @@ -142,18 +142,40 @@
1.4 \def\@makeschapterhead#1{ { \parindent 0pt \raggedright
1.5 \@rulehead{#1} \par \nobreak \vskip 40pt } }
1.6
1.7 +% "itmath.sty" use cmr italic for letters in math mode and get the
1.8 +% usual letter spacing of text mode.
1.9 +%
1.10 +% Michael Lawley, April 1993
1.11 +% (lawley@cit.gu.edu.au)
1.12 +%
1.13 +% Derived from itma.sty (of unknown origin).
1.14 %
1.15 % MATHCODES
1.16 %
1.17 % The mathcodes for the letters A, ..., Z, a, ..., z are changed to
1.18 -% generate text italic font rather than math italic by default. This makes
1.19 +% generate text italic rather than math italic by default. This makes
1.20 % multi-letter identifiers look better. The mathcode for character c
1.21 -% is set to "7000 (variable family) + "400 (text italic) + c.
1.22 -% See the TeXBook, page 154.
1.23 +% is set to "7000 (variable class) + "400 (text italic) + c.
1.24 +%
1.25 +% For NFSS the mathcode is "7000 (variable class) + (hex)\itfam + c
1.26 +% \itfam is probably equal to 7.
1.27 +%
1.28 +
1.29 +\ifx\undefined\hexnumber@
1.30 + \def\hexnumber@#1{\ifcase#1 \z@
1.31 + \or \@ne \or \tw@ \or \thr@@
1.32 + \or 4\or 5\or 6\or 7\or 8\or
1.33 + 9\or A\or B\or C\or D\or E\or F\fi}
1.34 +\fi
1.35
1.36 \def\@setmcodes#1#2#3{{\count0=#1 \count1=#3
1.37 - \loop \global\mathcode\count0=\count1 \ifnum \count0<#2
1.38 - \advance\count0 by1 \advance\count1 by1 \repeat}}
1.39 + \loop \global\mathcode\count0=\count1 \ifnum \count0<#2
1.40 + \advance\count0 by1 \advance\count1 by1 \repeat}}
1.41
1.42 -\@setmcodes{`A}{`Z}{"7441}
1.43 -\@setmcodes{`a}{`z}{"7461}
1.44 +\edef\@tempa{\hexnumber@\itfam}
1.45 +
1.46 +\@setmcodes{`A}{`Z}{"7\@tempa 41}
1.47 +\@setmcodes{`a}{`z}{"7\@tempa 61}
1.48 +
1.49 +\ifx\define@mathgroup\undefined\else
1.50 + \define@mathgroup\mv@normal{\itfam}{cmr}{m}{it}\fi