138 \chardef\ttrbrace=`\} % A right brace for \tt font |
138 \chardef\ttrbrace=`\} % A right brace for \tt font |
139 |
139 |
140 \newfont{\sltt}{cmsltt10} %% for output from terminal sessions |
140 \newfont{\sltt}{cmsltt10} %% for output from terminal sessions |
141 \newcommand\out{\ \sltt} |
141 \newcommand\out{\ \sltt} |
142 |
142 |
143 % "itmath.sty" use cmr italic for letters in math mode and get the |
|
144 % usual letter spacing of text mode. |
|
145 % |
|
146 % Michael Lawley, April 1993 |
|
147 % (lawley@cit.gu.edu.au) |
|
148 % |
|
149 % Derived from itma.sty (of unknown origin). |
|
150 % |
|
151 % MATHCODES |
|
152 % |
|
153 % The mathcodes for the letters A, ..., Z, a, ..., z are changed to |
143 % The mathcodes for the letters A, ..., Z, a, ..., z are changed to |
154 % generate text italic rather than math italic by default. This makes |
144 % generate text italic rather than math italic by default. This makes |
155 % multi-letter identifiers look better. The mathcode for character c |
145 % multi-letter identifiers look better. The mathcode for character c |
156 % is set to "7000 (variable class) + "400 (text italic) + c. |
146 % is set to |"7000| (variable family) + |"400| (text italic) + |c|. |
157 % |
147 % |
158 % For NFSS the mathcode is "7000 (variable class) + (hex)\itfam + c |
148 \DeclareSymbolFont{italics}{\encodingdefault}{\rmdefault}{m}{it}% |
159 % \itfam is probably equal to 7. |
|
160 % |
|
161 |
|
162 \ifx\undefined\hexnumber@ |
|
163 \def\hexnumber@#1{\ifcase#1 \z@ |
|
164 \or \@ne \or \tw@ \or \thr@@ |
|
165 \or 4\or 5\or 6\or 7\or 8\or |
|
166 9\or A\or B\or C\or D\or E\or F\fi} |
|
167 \fi |
|
168 |
|
169 \def\@setmcodes#1#2#3{{\count0=#1 \count1=#3 |
149 \def\@setmcodes#1#2#3{{\count0=#1 \count1=#3 |
170 \loop \global\mathcode\count0=\count1 \ifnum \count0<#2 |
150 \loop \global\mathcode\count0=\count1 \ifnum \count0<#2 |
171 \advance\count0 by1 \advance\count1 by1 \repeat}} |
151 \advance\count0 by1 \advance\count1 by1 \repeat}} |
172 |
152 \@setmcodes{`A}{`Z}{"7\hexnumber@\symitalics41} |
173 \edef\@tempa{\hexnumber@\itfam} |
153 \@setmcodes{`a}{`z}{"7\hexnumber@\symitalics61} |
174 |
|
175 \@setmcodes{`A}{`Z}{"7\@tempa 41} |
|
176 \@setmcodes{`a}{`z}{"7\@tempa 61} |
|
177 |
|
178 \ifx\define@mathgroup\undefined\else |
|
179 \define@mathgroup\mv@normal{\itfam}{cmr}{m}{it}\fi |
|