%
% \iffalse % meta-comment
%<*package>
% \begin{macrocode}
%%
%% mt11p.dtx
%% Copyright 1997, 2002 Drahoslav L\'im
%%
%% This program may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.2
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%% http://www.latex-project.org/lppl.txt
%% and version 1.2 or later is part of all distributions of LaTeX
%% version 1999/12/01 or later.
%%
%% This program consists of the following files:
%% 0readme
%% mt11p.dtx (this file)
%% mt11p.ins
%% mt11p.ps (formatted documentation)
%% mt11p.map
%% the binary tfm files:
%% mtex.tfm mtexb.tfm mtexh.tfm mtgu.tfm
%% mtgub.tfm mtmi.tfm mtmib.tfm mtmih.tfm
%% mtms.tfm mtmsb.tfm mtmu.tfm mtmub.tfm
%% mtmuh.tfm mtsyb.tfm mtsyh.tfm mtsyn.tfm
%% rmtmi.tfm rmtmib.tfm rmtmih.tfm rmtmub.tfm
%% rmtmuh.tfm
%%
%% the binary vf files:
%% mtmi.vf mtmib.vf mtmih.vf mtmu.vf
%% mtmub.vf mtmuh.vf
%%
%% Use at your own risk.
%%
%% Send bug reports to DrahoslavL@seznam.cz
%%
%%
% \end{macrocode}
%
% QUICK INSTALLATION GUIDE:
%
% Run LaTeX on this dtx file to generate the documentation.
%
% Run TeX on mt11p.ins to generate the style file mt11p.sty.
% Run latex on mt11p.drv to get documentation with commented source code.
%
% Copy mt11p.sty to the TeX input file area.
%
% Copy the PFA or PFB files from the Y&Y distribution
% diskettes to the appropriate area on your system.
% Edit mt11p.map, and/or rename/convert the Type1 font
% files so that the data in the map file and the actual file names
% are consistent.
%
% Copy the TFMs and VFs into the appropriate areas on your system.
% Pass the information in mt11p.map to your dvi driver, e.g.,
% append it to psfonts.map. Note that the TFM files are not
% identical to the ones on the Y&Y floppies.
%
% NOTE: The VFs assume the 8r-base version of PSNFSS is available, the
% style files check whether files called
% ``\encodingdefault\[rm|sf|tt]default.fd'' (e.g., T1ptm.fd or t1ptm.fd)
% exist, and if the metric file ``ptmr8r.tfm'' is available.
%
% \fi
%
% \CharacterTable
% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
% Digits \0\1\2\3\4\5\6\7\8\9
% Exclamation \! Double quote \" Hash (number) \#
% Dollar \$ Percent \% Ampersand \&
% Acute accent \' Left paren \( Right paren \)
% Asterisk \* Plus \+ Comma \,
% Minus \- Point \. Solidus \/
% Colon \: Semicolon \; Less than \<
% Equals \= Greater than \> Question mark \?
% Commercial at \@ Left bracket \[ Backslash \\
% Right bracket \] Circumflex \^ Underscore \_
% Grave accent \` Left brace \{ Vertical bar \|
% Right brace \} Tilde \~}
%
\def\fileversion{0.4a}% corected minor typos in documentation; code not touched
\def\filedate{1997/01/27}
\def\docdate {2002/04/05}
%
% \iffalse
%</package>
%
%<*driver>\ProvidesFile{mt11p.drv}
% \begin{macrocode}
% [\filedate: setup\space for\space Times\space
% +\space MathTime\space +\space MathTimePlus]
% \end{macrocode}
%
\NeedsTeXFormat{LaTeX2e}
\documentclass{ltxdoc}
%</driver>
%<*!driver>
%<*!package>
%<*!demo>
\OnlyDescription
\message{^^JRun LaTeX on mt11p.drv to get the full docs.^^J^^J}
%</!demo>
%</!package>
%</!driver>
%<*driver>
\begin{document}
\GetFileInfo{mt11p.dtx}
\DocInput{mt11p.dtx}
\end{document}
%</driver>
%
%<*package>
% \fi
%
% \CheckSum{2389}
% \providecommand{\pkg}[1]{\texttt{#1}}
% \providecommand{\file}[1]{\texttt{#1}}
% \providecommand{\cs}[1]{\texttt{\char`\\#1}}
% \providecommand{\AmS}{{\fontencoding{OMS}\fontfamily{cmsy}\selectfont
% \kern-0.06em A\kern-.15em \lower.5ex\hbox{M}\kern-.1em S\kern.07em}}%
% \newcommand{\deit}[1]{\item[{\boldmath$^\ddag$}\texttt{\bfseries#1}]}
% \newcommand{\opit}[1]{\item[\texttt{\bfseries#1}]}
% \newcommand{\brarg}[1]{\texttt\{$\langle\!$\textit{#1}$\rangle\!$\texttt\}}
%
% \title{A package for using the\\
% MathT\i me and MathT\i me\textsc{plus}
% fonts\thanks{This file
% has version number \fileversion, last
% revised \filedate.
% This file has no connection with the \pkg{mathtime} package
% commisioned by Y\&Y\@.}}
% \author{Drahoslav L\'\i m\\\texttt{DrahoslavL@seznam.cz}}
% \date{\docdate}
% \maketitle
% \begin{abstract}
% \pkg{mt11p} is a package to relatively painlessly
% get access to everything
% available in the MathT\i me and MathT\i me\textsc{plus} commercial
% math fonts in \LaTeXe. It is compatible with the \AmS{} packages.
% This package is self-contained and only
% the Type\,1 font programs need to be copied off of the distribution media.
% \end{abstract}
%
% \begin{multicols}{2}
% \tableofcontents
% \end{multicols}
%
% \section{Introduction}
% The use of Computer Modern fonts for equations has been
% one of the tell-tale signs indicating a document
% was typeset by \TeX\@. The reasons for this are that
% there are no good freely available substitute fonts, and
% that even if there were,
% changing \TeX's math fonts is a tedious and somewhat cryptic
% exercise. The first problem can be overcome by purchasing
% math fonts such as MathT\i me or Lucida. This package
% is one of the ways overcoming the second, though not the only one.
% It provides everything \emph{except} the fonts themselves.
% (You have shell out money and buy those,~\textsc{sorry}).
%
% It is assumed you are running \TeX\,3.x and a recent
% release of \LaTeX\@, and that you have the standard
% `resident' \textsc{Post\-Script} fonts installed for
% use as text fonts in~\TeX~(``PSNFSS'')\@.
%
% \section{Installation}
%
% This package is useless unless you buy the fonts called
% \emph{MathT\i me} and \textit{MathT\i me{\footnotesize PLUS\/}}
% from~Y\&Y; the address is listed in~Sec.\,\ref{ack}.
%
% \paragraph{Prerequisites}
% The ``\texttt{8r}-based'' version of~PSNFSS must be
% installed on your system to use this package, because the
% \texttt{VF}s~refer to the \texttt{8r}~``raw'' fonts.
% Search on CTAN for the string ``\textsf{psnfss}'',
% consult the \textit{\LaTeX{} Companion}, and/or the \LaTeXe{}
% distribution
% on how to do this. You can check if your system already has
% the relevant files by searching for the \TeX~metric
% file ``\file{ptmr8r.tfm}'' in the \file{tfm} file area,
% and for the file ``\file{T1ptm.fd}'' (or
% maybe~``\file{t1ptm.fd}'') in the \TeX~input
% file area; if both are present you are probably
% \textsc{ok} and everything will work.
%
% \bigskip
%
% This \file{dtx}~file should have come with several
% sets of accompanying files, whose installation
% should be routine:
%
% Run \TeX~on \file{mt11p.ins}\@; that will generate
% the package ``style'' file,~\file{mt11p.sty}\@.
% Copy that file to the \TeX~input file area.
% Run \LaTeX~on \file{mt11p.drv}~to get commented source code
% (that's what you're reading now).
%
% The \textbf{\texttt{.tfm}~metric files} should be copied to the area
% where \TeX{} and the \texttt{dvi}~driver program search for
% font metrics.
% The \textbf{\texttt{.vf}~definition files} should be copied to
% the area where the \texttt{dvi}~driver program searches for virtual font
% definitions. Note that the metric files supplied are \emph{not} identical to the
% ones distributed with the MathT\i me fonts.
%
% The file~\file{mt11p.map} should be
% ``passed'' to the \texttt{dvi}~driver program to tell it that the
% MathT\i me fonts are downloadable \textsc{Post\-Script} fonts
% and what the relevant invocation commands are, or perhaps the file
% should be passed to
% a \textsc{Post\-Script} rasterizer (``PS--to--PK'')
% program if the \texttt{dvi}~driver must use \texttt{PK}~bitmaps.
% For Rokicki's \textsf{dvips}~driver, the contents
% of~\file{mt11p.map} can be appended to the
% ``\file{psfonts.map}''~file.
%
% Copy the Type\,1~font ``programs''---files
% with extension \file{pfa} or \file{pfb}---from Y\&Y's distribution
% media to the area where your \texttt{dvi}~driver or rasterizer
% searches for downloadable fonts.
% Some fonts may be provided in both \file{pfa} and \file{pfb}
% formats; just pick one, most systems can deal with either.
% (The \file{pfb}~format is more compact, albeit binary.
% The \texttt{dvi}~driver can probably
% convert
% \file{.pfb} to~\file{.pfa} ``on the fly''.)
% There are two versions of the normal weight symbol font,
% \file{mtsy} and~\file{mtsyn}. The difference is minor,
% but you might as well use the newer~\file{mtsyn}.
% See the paragraph called ``Symbols'' in the documented
% source code.\footnote{Run \LaTeX{} on the
% file~\file{mt11p.drv} to get the commented source code;
% it follows after~Sec.\,5.}
%
% The names and types (\file{pfa}/\file{pfb})
% of the downloadable files
% in~\file{mt11p.map} should be made consistent with the actual names
% and types under
% which the Type\,1 font programs are stored on your system.
% Either rename and/or convert the Type\,1 fonts, or simply edit
% the contents of~\file{mt11p.map}; beware of case sensitivity.
%
% The \texttt{dvi}~driver program will probably not need the
% \file{afm}~files from the distribution medea, but a
% ``PS--to--PK'' rasterizer might; consult the rasterizer
% documentation. Note that \file{afm}~files are \textsc{ascii}~files,
% convert line endings as appropriate.
%
% At least for this package, no other files from the distribution medea
% are required.
%
% \subsection{Previewing}
% Whether or not you can preview \file{dvi}~files which use
% MathT\i me fonts depends on your setup. If you can preview
% \file{dvi}~files containing other \textsc{Post\-Script}
% fonts, chances are you can preview with MathT\i me as well,
% perhaps after running some utility to generate bitmaps, resolve
% \texttt{VF}~references, etc.
% Otherwise, it is possible to view the final \textsc{Post\-Script}
% output of the \file{dvi}~driver on practically all platforms
% using viewers based on the \textsc{Ghost\-Script}
% rasterizer, or perhaps using Display\textsc{Post\-Script}.
%
% \section{Usage \& Package Options}
% To switch to Times text and math, it should suffice
% to say~|\usepackage{mt11p}| in the preamble. The oder
% of packages should not matter, with one exception:
% \pkg{mt11p} should be loaded after \AmS{} math packages.
% Any reasonably cleanly written \LaTeX{} input
% file will then be typeset with MathT\i me being used
% for all standard mathematical symbols that would have
% otherwise been typeset in Computer Modern.
% There are two notable exceptions, see~Sec.\,\ref{varGamma}.
%
% Expect a few dozen lines of warnings as this package is being read,
% and a notice about substituted fonts at the end of the run.
% I think it is better to live with these NFSS warnings rather than
% do some hacks to turn them off.
%
% At the end of the run expect a warning about size substitutions
% if the \texttt{resize}~option was in effect (it is by default).
% They are are due to the Computer Modern fonts usually having
% a set of sizes available rather than being declared scalable in the
% \file{.fd}~file, i.e., a \cs{DeclareFontShape}
% argument of something like |<10><10.95><12><14.4>|
% rather than~|<->|.
% Whether or not something should be done about this depends on
% what Computer Modern glyphs were used. It may be the case
% that, in fact, none were---the warnings come from NFSS having
% loaded fonts for. e.g., \cs{oldstylenums}
% for math, eventhough you never actually used them.
% You can change the \file{.fd}~files if you system is
% capable of generating bitmaps on-the-fly or if you're using
% \textsc{Post\-Script} versions of the Computer Modern fonts.
% Consult the \emph{\LaTeX~Companion} or the standard
% documentation file~\file{fntguide.tex}.
%
% \subsection{List of options}
% This packages has lots of options controlling
% some detailed aspects of font and math character handling.
% In general, use the defaults, unless you have some
% idea of what the implications of a particular option
% are.
%
% Options in effect by default are indicated by
% a double dagger~($\ddag$).
%
% \begin{itemize}
% \deit{T1} reset the \cs{encodingdefault} (applicable to text fonts and
% some math operators, symbols and accents) to~\texttt{T1}.
% \opit{OT1} reset the \cs{encodingdefault} to the archaic
% \texttt{OT1}~encoding; upper case Greek letters are never
% taken from the text font, so the only reasons to
% do this are human inertia and legacy code.
% \opit{noenc} assume the current \cs{encodingdefault} is the desired one;
% see the commented source
% code if you use something other than \texttt{T1}
% or~\texttt{OT1}.
% \bigskip\par
% \deit{opsafe} use symbols and accents from the
% \texttt{operators} math family only when it is
% safe to do so.
% \opit{opnone} do not use the \texttt{operators}~math
% family for accents or symbols, except when
% this can't be helped;
% if \cs{encodingdefault} is
% not recognized, this option is auto-invoked.
% \opit{opmax} take as much from the \texttt{operators}~math
% family as possible.
% Doing so can produce problematic
% output in some circumstances, but it will make the
% maximum use of printer resident fonts;
% don't use this option
% unless you know why you are doing so. See
% the paragraph ``Symbols from either
% \texttt{operators} or from elsewhere'' in the documented
% source code.
% \bigskip\par
% \deit{opaccents} take math accents from the \texttt{operators}
% math family, and make them follow math alphabet
% changes where possible; see~Sec.\,\ref{ACCs}.
% \opit{symaccents} take math accents from the a fixed (within a
% math version) font; if \cs{encodingdefault} is not
% recognized, this option is auto-invoked;
% see~Sec.\,\ref{ACCs}.
% \bigskip\par
% \deit{mtcal} make the MathT\i me script font the
% math alphabet \cs{mathcal} and make
% \cs{mathscr} and synonym of~\cs{mathcal};
% see~Sec.\,\ref{Script}.
% \opit{cmcal} make the MathT\i me script font the math alphabet
% \cs{mathscr} and the Computer Modern symbol
% font the \cs{mathcal}~alphabet;
% see~Sec.\,\ref{Script}.
% \opit{nomtms} use the Computer Modern symbol
% font as the \cs{mathcal}~alphabet and do not
% load the MathT\i me script font
% at all; see~Sec.\,\ref{Script}.
% \bigskip\par
% \deit{dohbar} overwrite any existing definition of the
% \cs{hbar}~($\hbar$)~symbol with one synthesized from
% an~``$h$'' and a bar accent. The
% definition here is actually rather decent, unlike the simple
% one usually used. (At least try it before resorting
% to the glyph in the \AmS~fonts\ldots)
% \opit{nohbar} do nothing with the \cs{hbar} definition,
% retain the existing one (if any); e.g.,
% the \AmS~fonts
% have~\cs{hbar} as a single Computer Modern-like glyph.
% \bigskip\par
% \deit{subs} the \texttt{bold} and \texttt{heavy}
% math versions in principle need some
% `ultra' and `poster' weight fonts; usually
% no such fonts are available, so define
% substitutes.
% \opit{nosubs} assume suitable fonts are available
% and will be loaded, e.g., using a configuration
% file \file{mt11p.cfg}; do not declare
% any font substitutions. If should be apparent from
% the commented source code or from \file{mt11p.sty} what
% \textit{family}/\textit{series}/\textit{shape}~NFSS
% declaration the extra fonts should get.
% Search for the string ``\textsf{SUBS}''
% in the \file{.dtx} or \file{.sty}~file.
% \deit{do8r} use the raw \texttt{8r}~fonts for the
% four symbols \S, \P, \dag, \ddag. The math italic
% fonts use the italic \texttt{8r}~raw fonts, so
% it's not unreasonable to assume the upright
% ones are also available; no support for using
% the \texttt{8r}~encoding need be installed on the system,
% though we make use of it if it is. \texttt{8r}~is
% not used for anything other than these four symbols;
% see~Sec.\,\ref{8R}.
% \opit{no8r} do not use the raw fonts, and take the four
% symbols \S, \P, \dag, \ddag\, from a Computer Modern font;
% see~Sec.\,\ref{8R}.
% \opit{nodag} don't touch the definitions of \S, \P, \dag, \ddag{}
% at all; assume suitable definitions have been or will be
% supplied, e.g., as part of a \texttt{TS1} setup.
% See~Sec.\,\ref{8R}.
% \bigskip\par
% \deit{bsy} load the \AmS~packages needed to define
% the \cs{boldsymbol}~macro, and define analogous
% \cs{heavysymbol} and \cs{normalsymbols}~macros.
% \opit{nobsy} don't load the \AmS~packages for \cs{boldsymbol}
% and define \cs{boldsymbol}~and \cs{heavysymbol} to produce
% messages and behave as no-ops.
% \bigskip\par
% \deit{mathgr} get upright Greek letters as the math alphabet
% \cs{mathgr}; see~Sec.\,\ref{par:mathgr}.
% \opit{nomathgr} do not load the math alphabet \cs{mathgr};
% this is only useful if you are running out of
% math families, in which case you can use
% \cs{greekshape} in an \cs{hbox} with the
% obvious limitations. See~ec.\,\ref{par:mathgr}.
% \bigskip\par
% \deit{mathOS} get oldstyle digits as a math alphabet;
% Computer Modern oldstyle digits are always available
% in text.
% \opit{nomathOS} do not load Computer Modern oldstyle digits
% as a math alphabet. See the \texttt{nomathgr} option.
% \bigskip\par
% \deit{resize} change the subscript and text font sizing
% to better account for the
% fact that we are using linearly (not optically) scaled fonts.
% \opit{noresize} don't touch the math subscript and text font sizing.
% \bigskip\par
% \deit{activesb} to improve the spacing in certain subscript
% situations, the subscript character ``|_|'' (an
% underscore) is made active; this \emph{might} break
% some macros; see~Sec.\,\ref{SB}
% \opit{noactivesb} don't do anything with the underscore.
% \bigskip\par
% \deit{times} assume the package (style file) which changes the
% roman, sans and typewriter text families to
% ``Times\,\&\,Helvetica\,\&\,Courier'' is
% called~``\file{times.sty}''; this package
% is loaded via \cs{RequirePackage}.
% \item[\textbf*] any other option will be interpreted as the
% name of the style file to use instead of~%
% \pkg{times}; e.g., the option ``\texttt{btdutch}''
% will attempt to `require' the \pkg{btdutch}~package
% instead of the \pkg{times}~package.
% \end{itemize}
%
% \subsection{Interaction with \AmS~macros and other math packages}
% \label{varGamma}
% This package does nothing terribly anti-social and can co-exist with
% \AmS~packages, e.g., \pkg{amsmath}, \pkg{amsfonts}, etc., provided
% those packages are read \emph{before} (i.e., prior~to) reading this package.
% Some types of macros are hardwired to Computer Modern fonts,
% e.g., the ``\kern-.08em\AmS\kern.02em''~logo and would
% have to be redefined.
% The fonts~\texttt{msam} and~\texttt{msbm} will, or course, still be used
% for the more uncommon math symbols.
% See below about math accents.
%
% The default \TeX~math setup treats upper case Greek letters
% as mathematical ``letters'' and lower case Greek letters
% as mathematical ``symbols''. Hence |\mathbf{\Gamma\gamma}|
% produces a bold upper case~$\mathbf\Gamma$, but
% does not affect the lower case~$\gamma$; similarly for~\cs{mathit}.
% This package uses the same conventions as the \AmS~macros:
% names like ``\cs{varGamma}'' are used
% for italic upper case Greek~($\mathit{\Gamma}$), and math version
% switching is needed (\cs{boldsymbol}) to get bold Greek.
% The `legacy' input code
% |\mathbf{\Delta}\mathit{\Gamma}|~(``$\mathbf{\Delta}\mathit{\Gamma}\,$'')
% \emph{does not work} with the \AmS~\LaTeX~macros nor with this package.
% See~Sec.\,\ref{ACCs} about accents in math.
%
% It is likely that other math font related packages can
% co-exist with~\pkg{mt11p}, particularly if they merely add
% a math alphabet or symbol font, e.g., \pkg{mathbbol},
% \pkg{stmaryrd} or~\pkg{wasysym}. The chances of running out
% of math symbol font families are slim unless you also
% load the \pkg{oldlfont}~package. Note that
% the \AmS{} symbol packages need two math families.
% Of course it makes no
% sense to use \pkg{mt11p}~together with another
% complete math setup package like~\pkg{euler}.
%
% One package that \emph{will} clash with~\pkg{mt11p} is~\pkg{yhmath}.
% If you load that package after~\pkg{mt11p}, all \texttt{largesymbols}
% in all math versions
% will be taken from the fixed size font~\texttt{yhcmex10};
% loading~\pkg{yhmath} before~\pkg{mt11p} will break~\pkg{yhmath}'s
% wide math accents. If you only need the extra-wide accents,
% change all instances of the word ``\textsf{largesymbols}'' in the
% file~\file{yhmath.sty}
% to something else, e.g.,~\textsf{YHlargesymbols}, and input that altered
% file. If you want the extra delimiter sizes, you're on your own, but
% see the paragraph ``Declaring additional math delimiters'' towards the end
% of the commented source code.
%
% \subsection{Math Accents}\label{ACCs}
%
% MathT\i me provides an additional accent called
% \cs{widebar} or~\cs{overbar}. It's about~$1\mathrm{em}$~long.
% If the \AmS{} macros \cs{Hat}, etc., are defined, we also
% define the similar \cs{Overbar} and~\cs{Widebar}.
%
% The Computer Modern layout causes some encoding-related
% problems with math accents and math alphabets.
% NFSS~has hooks to fix the problems, but does not actually
% do it; the \AmS{} package~\pkg{amsmath}
% does fix them by redefining most math accents.
%
% \pkg{mt11p}~incorporates fixes similar to the \AmS~ones,
% and overwrites any existing math accent
% definitions (it pretty much has to), so that
% any combination of math alphabets and accents
% (and accents options: \texttt{opaccents} or~\texttt{symaccents})
% will output the expected glyphs. Some curious combinations
% will, however, lead to odd-looking accent positioning.
% In a construct such as |\mathit{\hat{x}}|
% the accent positioning will always be ``wrong'', because
% the accent is a \emph{text} accent---the (text) italic font
% implied by \cs{mathit} doesn't have the appropriate font metrics
% because it's assumed that \cs{mathit} will be used when a
% group of letters (a~`word') is to be treated as
% a math symbol, e.g., $x_{\mathit{initial}}$
% or~$\widehat{\mathit{final}}$.
% However, ``$x$''~is a mathematical symbol by itself. If you want
% an italic hat on the symbol~$x$ you have to say
% |\mathit{\hat{\mathnormal{x}}|
% (assuming it's a big deal to have an italic~\cs{hat}\ldots).
% Even then the spacing will not be optimal and
% will usually require some fiddling with the \cs{skew} macro.
%
% \subsection{Script and calligraphy math fonts}\label{Script}
% This package makes the distinction between two
% ``calligraphy'' math alphabets: \emph{calligraphy} and
% \textit{script}. This is necessitated by the fact that
% the Computer Modern fonts only have upper case
% ``calligraphy'' letters, and that you perhaps may not like
% the MathT\i me \texttt{mtms}*~fonts or that you
% may want to use letters from both fonts.
%
% Irrespective of the options in use, the two math alphabet
% commands \cs{mathcal} and \cs{mathscr} will be defined.
% (The old ``\cs{mit}''~is not defined.)
%
% The default (\texttt{mtcal})~is to make both alphabets
% refer to a \texttt{mtms}*~font. The variant
% forms of some letters are available with the commands
% \cs{varA}, \cs{varE}, \cs{varG}, \cs{varvarG}, \cs{varI}, \cs{varL},
% \cs{varQ}, \cs{varS}, \cs{varr}, \cs{varz},
% \cs{iscript} and~\cs{jscript}. (\cs{i}~and \cs{j}~are
% invalid in math mode and \cs{imath} and~\cs{jmath}
% cannot be redefined.) Both upper and lower case letters
% will work in~\cs{mathcal}.
%
% Another possibility, \texttt{cmcal}, is to
% have both Computer Modern and
% MathT\i me fonts available; \cs{mathscr}~will
% be the latter, and \cs{mathcal} the former.
% \cs{mathcal} will then not have lower case letters.
%
% A third setting, \texttt{nomtms},~avoids using the
% MathT\i me \texttt{mtms}*~fonts entirely.
% \cs{mathcal}~is then the Computer Modern symbols font,
% and \cs{mathscr} gives a warning before calling~\cs{mathcal}.
%
% A certain amount of ``reasonableness'' is assumed with respect
% to the usage of ``calligraphic'' alphabets.
% The \texttt{mtcal}~option does not give any warning
% about the fact that \cs{mathcal} and \cs{mathscr}
% are identical. With the \texttt{cmcal} or \texttt{nomtms}
% options in effect you will get warnings if you try to use
% a~\cs{var}\kern-.035em\textit{X\/} letter in~\cs{mathcal}, but
% \cs{mathcal} will never try to check its argument
% to verify that it consists of \emph{upper} case letters only, even
% when no font with ``calligraphy'' lower case letters
% is available. Consider using \cs{mathcal} when the argument
% is known to contain nothing but upper case letters and
% use \cs{mathscr} when using lower case letters as well;
% that way you will at least get a warning pertaining to
% script math alphabets if the options are
% set to avoid the use of~\texttt{mtms}* or if
% the document is reset without MathT\i me fonts.
%
%
% The MathT\i me manuals describe a \cs{script} macro;
% \pkg{mt11p}~defines an equivalent macro. Note that
% \cs{script} should only be followed by white space, an
% optional~``\texttt*'', and then a single letter,
% with no space between the asterisk and the letter, e.g.,
% \verb*+\script *AB+ is equivalent to
% |\mathscr{\varA}B|, \emph{not}~|\mathscr{AB}|,
% and \verb*+\script* AB+ is an error.
%
% \subsection{The symbols \dag, \ddag, \S, and \P}\label{8R}
% The standard \LaTeX~setup takes these symbols, in both text and math
% from the Computer Modern symbols font. The MathT\i me symbols
% font does not have these glyphs, so something must be done
% to have them available for footnote markers,~etc.
%
% There is a fairly standard \textsc{Post\-Script} text
% symbol font setup, which uses the \texttt{TS1}~encoding,
% but it seems to not (yet) be in general use.
%
% This package offers three relevant options. The option
% \texttt{nodag}~does absolutly nothing with the four symbols,
% but this can only be used if they've already been or are about to be
% redefined (perhaps in the \file{mt11p.cfg} file),
% because the default definitions assume the use
% of Computer Modern fonts and \emph{will} produce incorrect glyphs
% after switching to MathT\i me.
%
% The default option \texttt{do8r}
% takes these four symbols (and \emph{only}
% these four symbols) from the ``raw'' \texttt{8r}~encoded
% fonts, upon which the virtual \texttt{T1} and \texttt{OT1}
% \textsc{Post\-Script} fonts are built. If \file{.fd}~files
% or an~\file{8r.sty} are available, we use them; if they're not, we supply
% just enough code to be able to use the symbols in NFSS\@.
% It is not unreasonable to do so, because the \texttt{8r}~metric
% file~\file{ptmri8r.tfm} must be on the system (the
% \file{mtmi.vf} virtual font uses it), so the
% upright font~\file{ptmr8r.tfm} is probably available too.
% Note that \texttt{8r}~is an ``unsupported'' encoding.
%
% The option \texttt{no8r} overwrites any existing definition
% and forces the use of Computer Modern for these four symbols
% (without affecting anything else) and avoids the direct use of
% \texttt{8r}~raw fonts.
%
% \subsection{``New'' symbols}
% {\sloppy
% MathT\i me has a few mathematical symbols that aren't available
% in Computer Modern. Here is the list, with alternate names
% in parentheses:
% \cs{overbar}~(\cs{widebar}),
% \cs{openclubsuit},
% \cs{shadedclubsuit},
% \cs{openspadesuit},
% \cs{shadedspadesuit},
% \cs{triangleleft},
% \cs{triangleright},
% \cs{cupprod},
% \cs{capprod},
% \cs{varcirc}~(\cs{comp}).}
%
% \subsection{Avoiding the use of bitmap fonts}
% Often the point of buying the MathT\i me fonts is not
% just to get something other than Computer Modern math, but also
% to avoid the use of bitmap (Type\,3) fonts and
% use scalable (Type\,1) fonts nstead. The default option are
% set so that this condition is satisfied, as long as you
% don't use glyphs that are not available
% in either the resident fonts nor in MathT\i me, i.e.,
% oldstyle digits, or you force the use of
% Computer Modern or other \textsc{Meta\-Font}
% fonts in some situations (the \texttt{cmcal},
% \texttt{nomtms}, or~\texttt{no8r} options, \AmS~packages, etc.) and
% you do not have substitute outline fonts. See the
% MathT\i me licence agreement about ``exporting''
% files containing outline fonts.
%
% \subsection{Subscript spacing}\label{SB}
% The sidebearings of math italic letters with descenders
% are such that a spacing adjustment is required
% in certain contexts, in particular in the very common
% case of~$j$ subscripts. The MathT\i me
% distribution suggests using an active subscript character,
% which checks if the first thing in a subscript is
% one of the letters \texttt{f}, \texttt{j} or~\texttt{p},
% and inserts a small negative kern if is it.
% The macro \cs{jadjust} can be used if the correction
% needs to be done by hand; see Appendix~B.2 of the
% MathT\i me \textit{Reference Manual}.
%
% Changing category codes is akin to Russian roulette: we can
% try to make the magazine larger, but it will still hold
% a bullet \textit{somewhere}. It is unreasonable to
% assume that other people's packages will
% take steps to work even when the \texttt{underscore}
% is a macro. \texttt{underscore}s can crop up
% in font names or reference labels, for example.
%
% The macro we use is slightly different from the original one
% in the MathT\i me distribution. The \cs{catcode} of
% the \texttt{underscore} ends up being~$12$, i.e., ``other''
% rather than~$13$~(``active''), which is much more forgiving.
% We rely on the fact that the
% \texttt{underscore}'s \cs{mathcode} is \texttt{"8000}
% to get subscripts in math mode. This seems to be~\textsc{ok}
% when used in most contexts. In text mode this will
% produce whatever the current font has in slot~|`\_|, but
% you shouldn't be using a `naked'
% \texttt{underscore} in text anyway\ldots{}
%
% Nothing is done with the \texttt{underscore} unless
% its \cs{catcode} is ``subscript''~($8$),
% \emph{and} its \cs{mathcode} is~\texttt{"8000}; if
% both conditions are not fulfilled, someone has
% presumably already fiddled with the \texttt{underscore},
% so we don't touch it.
%
% The option~\texttt{noactivesb} keeps the underscore as it was,
% in order to quickly ascertain whether the active
% \texttt{underscore} is braking some macros. Reports of
% such cases are welcome.
%
% \subsection{Upright Greek lower case letters}
% \label{par:mathgr}
% MathT\i me contains an upright Greek letters (text)
% which are used in some disciplines to designate
% units or particles. Such letters are normally not used
% as math \textit{symbols}. We provide three relevant commands:
% \textbf{\cs{greekshape}},~which is a font switch like~\cs{itshape}),
% \textbf{\cs{textgr}},~which takes an argument similarly to~\cs{textit},
% and the math alphabet command~\textbf{\cs{mathgr}}.
%
% Alternate forms of some letters can be obtained as
% ligatures---see Section~8 of the \textit{MathT\i me\/}\textsc{plus}
% reference manual. However, in math (\cs{mathgr})
% it is not possible to use
% the ligatures with the asterisk character~(\texttt*) suggested
% in the manual, because the asterisk will not be interpreted as
% a character from the same font as the Greek letters.
% The TFM~metric files accompanying this package contain extra ligatures
% which produce the variants: in lieu of~\texttt{O*} or~\texttt{o*},
% write~\texttt{vO} or~\texttt{vo}, respectively; in place
% of~\texttt{e*} write~\texttt{vev}.
%
% This package does not define any \cs{gr}~font switch. \cs{greekshape}
% performs the same function in text; use the \cs{mathgr}~form
% in math.
%
% MathT\i me\textsc{plus} comes with two ``hybrid'' fonts,
% \texttt{mtmub} and \texttt{mtmuh}, which
% are math~\texttt{letters} fonts with upright
% (instead of sloping) lower case Greek letters. The
% two fonts contain both upright and italic \emph{upper case}
% Greek letter. For reasons listed in the reference
% manual, there is no font~\file{mtmu}. This package comes with
% a \file{mtmu}~font, created as a~\file{VF} using
% \file{mtmi} and~\file{mtgu}, in case you decide to
% use such a font after all.
%
% See the commented source
% about declaring upright Greek letters
% as math \textit{symbols} and about using~\file{mtgu}.
%
% \subsection{Oldstyle Digits}\label{OSdig}
% None of the ``standard\,35'' \textsc{Post\-Script}
% fonts has oldstyle digits (\oldstylenums{1234567890})
% and neither do any of the MathT\i me fonts.
% The standard \TeX~math \texttt{letters}~font
% has such digits, and some packages make use of the glyphs.
% \pkg{mt11p}~defines an
% \cs{oldstylenums}~macro which is essentially equivalent to the
% one provided in \LaTeX, but note that the Computer Modern
% oldstyle digits don't go well with Times text fonts.
% A \file{mt11p.cfg}~file or a subsequent package could redefine
% the macro to use a more suitable font.
%
% \subsection{Mixing math versions}
% Like both the standard \TeX{} math setup and the \AmS~math
% setup, we assume that it will be relatively rare to require
% bold~(unbold) \emph{symbols}\footnote{%
% The arguments of \cs{mathbf} are not
% considered `symbols'. The input text \cs{mathbf\{a\}}
% produces a bold \emph{upright}~``$\mathbf a$'' not
% the bold math symbol~``{\boldmath$a$}''.}
% in a formula set in the unbold~(bold) math version.
% We load the \AmS~\pkg{amsbsy} package which defines
% a \cs{boldsymbol}~macro, that sets its argument
% using the bold math version, and define corresponding
% corresponding \cs{heavysymbol} and
% \cs{normalsymbol}~macros.
%
% However, it's awkward
% to use the \cs{boldsymbol}, etc., macros in situations
% where alignment is critical (accents) or for
% large delimiters. For those cases one could declare
% additional symbol fonts and define things like
% \cs{boldalpha}, \cs{boldhat} or \cs{Lheavybrace}, and then
% an input text like
% \begin{center}
% |\[\left\Lheavybrace 2\boldalpha|%
% $\langle\!\hbox{\itshape some big formula}\rangle$%
% |\right\Rheavybrace\]|
% \end{center}
% would do what would otherwise
% take unreadable input code (\cs{vphantom} constructs) to produce.
% This requires some knowledge of the
% details of \TeX's math workings, but nothing
% too esoteric. For a simple example
% the commented source code. Such a setup could be placed
% in~\file{mt11p.cfg}. Consult also the standard \LaTeX{}
% documentation file~\file{fntguide.tex}. Note that
% the \AmS~macros do not provide such a setup, because
% it's somewhat rare to actually need it, but it can be done.
%
% \subsection{Local Configuration}
% After setting everything up but before `undefining'
% internal auxiliary macros and flags,
% and before changing the subscript
% sizing this package inputs the file~\file{mt11p.cfg}, if
% it can find one. Further definitions (bold or
% upright Greek letters as symbols, etc.\@) could be placed in
% such a file.
%
% \section{Bugs}
% Any reports about bugs, suspected bugs or package
% clashes are welcome provided you also send just enough
% \TeX~code to reproduce the bug and your \TeX{}
% \file{.log}~file---use the e-mail
% address given on the title page of this document and
% at various places in the files.
% Report of \emph{usage} are also welcome\texttt{\small;-)}.
%
% \section{Acknowledgment \&{} Misc.}\label{ack}
%
% {
% \setlength{\parindent}{0pt}
% \setlength{\parskip}{1.0ex plus 0.5ex minus 0.5ex}
% \raggedright
% This section has been put here, in case you don't print out the
% commented source code.
%
% Thanks to the authors and maintainers of \LaTeX, and particularly
% to the authors of NFSS\@.
%
% Portions of this package were stolen from the \pkg{mathtimy}~package
% by Aloysius Helminck, and from the \TeX~files provided with the
% MathT\i me distribution.
%
% The ``operative'' part of this package was written before
% the release of the \pkg{mathtime} package by Y\&Y\@.
%
% \small
% MathT\i me is a trademark of Publish or Perish, Inc.
%
% A bunch of other names are trademarks or
% registered trademarks, as everybody knows\ldots
%
% The contact address for Y\&Y is\\
% \begin{quote}
% Y\&Y, Inc.\\
% 106 Indian Hill\\
% Carlisle, MA 01741\\
% USA\\
% \texttt{http://www.yandy.com}
% \end{quote}
%
% This software is provided ``\textsc{as-is}'', with no warranty
% of any kind; the user assumes all responsibility for its use.
% }
%
% \noindent The author has no association with Y\&Y,\,Inc., other than
% having purchased the MathT\i me fonts.
%
% \StopEventually{}
% \bigskip
% \hrule height0.6pt\relax
%
% \section{Implementation}
% We start by the usual identifications. We need a few commands
% not present in early versions of~NFSS\,2, so check for the date.
% \begin{macrocode}
\NeedsTeXFormat{LaTeX2e}[1994/12/01]
\ProvidesPackage{mt11p}%
[\filedate: setup\space for\space Times\space
+\space MathTime\space +\space MathTimePlus]
% \end{macrocode}
% Before we do anything real,
% check the catcodes of a few characters in case some fanatic
% changed them already. These are the characters I've
% seen activated in various packages.
%
% We hope the the single left quote wasn't\ldots
% \begin{macrocode}
\chardef\mt@quotedbl \catcode`\"
\chardef\mt@quotesinglr\catcode`\'
\chardef\mt@colon \catcode`\:
\chardef\mt@question \catcode`\?
\chardef\mt@semicolon \catcode`\;
\chardef\mt@exclam \catcode`\!
\@makeother\"
\@makeother\'
\@makeother\:
\@makeother\?
\@makeother\;
\@makeother\!
% \end{macrocode}
%
% \subsection{Option Declarations}
% We will need the option setting in conditionals at various points,
% so use integers (\cs{chardef}s) as flags.
%
% There are three options relevant to text font encodings:
% either make the default \texttt{T1},
% or make the default~\texttt{OT1},
% or don't touch \cs{encodingdefault}. The upright
% ``roman'' (\cs{rmdefault}) is used for
% the \texttt{operators}~math family, so the choice
% of text encoding has implications for math.
% This package can handle (in as much as it needs to) with
% any of the following: \texttt{T1}, \texttt{OT1} or a superset thereof,
% \texttt{8r} and~\texttt{8a}. See the commented source
% code if you need more information,~Sec.\,\ref{fromops}.
% \begin{macrocode}
\DeclareOption{T1}{\def\mt@enc{\def\encodingdefault{T1}}}
\DeclareOption{OT1}{\def\mt@enc{\def\encodingdefault{OT1}}}
\DeclareOption{noenc}{\let\mt@enc\relax}
% \end{macrocode}
%
% Next the options for dealing with what math symbols to
% take from the \texttt{operator} family.
% Either take everything from elsewhere,
% or take `safe' things from \texttt{operators},
% or take as much as possible from \texttt{operators}, which could be
% dangerous in some circumstances; see~Sec.\,\ref{fromops}\@.
% \begin{macrocode*}
\DeclareOption{opnone}{\chardef\mt@ops0 }
\DeclareOption{opsafe}{\chardef\mt@ops1 }
\DeclareOption{opmax}{\chardef\mt@ops2 }
% \end{macrocode*}
%
% Accents can either come from \texttt{operators} and follow
% math alphabets (usual case),
% or be always taken from \texttt{symbols}.
% \begin{macrocode*}
\DeclareOption{opaccents}{\chardef\mt@accs0 }
\DeclareOption{symaccents}{\chardef\mt@accs1 }
% \end{macrocode*}
%
% We need options to control the handling of
% script/calligraphy fonts.
% \begin{macrocode*}
\DeclareOption{mtcal}{\chardef\mt@cal0 }
\DeclareOption{cmcal}{\chardef\mt@cal1 }
\DeclareOption{nomtms}{\chardef\mt@cal2 }
% \end{macrocode*}
%
% In order to cooperate with \AmS~macros,
% we provide a switch to \emph{not} define~\cs{hbar},
% i.e., retain the present definition~(if~any).
% You may want to use this to keep~\cs{hbar}
% pointing to the glyph in the \texttt{msbm}~fonts,
% rather than use the faked one we define here,
% though then you'll have a Computer Modern~``$h$''
% which looks too light among Times, and the one provided
% herein isn't too shabby\ldots
% \begin{macrocode*}
\DeclareOption{dohbar}{\chardef\mt@hbar1 }
\DeclareOption{nohbar}{\chardef\mt@hbar0 }
% \end{macrocode*}
%
% The \texttt{bold} and \texttt{heavy} math versions
% will probably need some font substitutions, but if you
% have the additional fonts, you can skip the substitutions
% contained herein.
% \begin{macrocode*}
\DeclareOption{subs}{\chardef\mt@sub1 }
\DeclareOption{nosubs}{\chardef\mt@sub0 }
% \end{macrocode*}
%
% For historical reasons the~\cs{dag}\@, \cs{ddag}\@,
% \cs{S}~and \cs{P}~symbols have to be dealt with.
% The \texttt{mtmi} virtual fonts use \texttt{ptmi8r}
% raw fonts, so at least
% the TFM~files should be available, and we include just enough
% code to use them for these four symbols.
% Provide an option to explicitly avoid using \texttt{8r}~for
% these symbols; in that case we'll have to use \texttt{OMS}\@.
% A subsequent package could redefine them to use
% the \texttt{TS1}~encoding or something.
% Also provide an option that does nothing at all
% with any of the relevant definitions.
% \begin{macrocode*}
\DeclareOption{no8r}{\chardef\mt@eightR0 }
\DeclareOption{do8r}{\chardef\mt@eightR1 }
\DeclareOption{nodag}{\chardef\mt@eightR2 }
% \end{macrocode*}
%
% It may be convenient to get the \cs{boldsymbol}
% macro from the \AmS~style files.
% \begin{macrocode*}
\DeclareOption{nobsy}{\chardef\mt@bsy0 }
\DeclareOption{bsy}{\chardef\mt@bsy1 }
% \end{macrocode*}
%
% Before exiting this package should reset the
% subscript sizing, because we're using linearly scaled fonts.
% Provide an option to switch that off.
% \begin{macrocode}
\DeclareOption{resize}{\def\mt@exit{\MathTimeSizes}}
\DeclareOption{noresize}{\let\mt@exit\relax}
% \end{macrocode}
%
% This is mainly to test if the active underscore
% is causing any problems.
% \begin{macrocode*}
\DeclareOption{activesb}{\chardef\mt@sb1 }
\DeclareOption{noactivesb}{\chardef\mt@sb0 }
% \end{macrocode*}
%
% Now a few options to save math families. The default leaves room
% for four, which may be too little if you also load \AmS, etc.
% \begin{macrocode*}
\DeclareOption{nomathgr}{\chardef\mt@mgr0 }
\DeclareOption{mathgr}{\chardef\mt@mgr1 }
\DeclareOption{nomathOS}{\chardef\mt@osdg0 }
\DeclareOption{mathOS}{\chardef\mt@osdg1 }
% \end{macrocode*}
%
% The package to get ``Times/Helvetica/Courier'' might
% have some wiered name:
% \begin{macrocode}
\DeclareOption{times}{\def\times@style{times}}
\DeclareOption*{\edef\times@style{\CurrentOption}}
% \end{macrocode}
%
% The defaults are
% \begin{itemize}
% \item \texttt{T1} encoding;
% \item assume the text font package is called \file{times.sty};
% \item use \texttt{operators} for safe glyphs and accents;
% \item use \texttt{mtms} as the \cs{mathcal} font;
% \item declare substitutions for the bold and heavy math versions;
% \item overwrite any existing definition of \cs{hbar};
% \item use \texttt{8r} for \cs{dag}\@, etc.;
% \item fetch the \cs{boldsymbol} \AmS~macro;
% \item get upright Greek and oldstyle digits;
% \item switch to different subscript sizing; and
% \item use the active underscore character.
% \end{itemize}
% Then read the option list.
% \begin{macrocode}
\ExecuteOptions{T1,times,opsafe,opaccents,mtcal,%
dohbar,subs,do8r,bsy,resize,mathgr,mathOS,activesb}
\ProcessOptions*
% \end{macrocode}
%
% \subsection{Text Encoding}
% We have to know that the text \cs{encodingdefault} is, because accents in math mode
% may get taken from the \texttt{operators} font. We make \cs{encodingdefault}
% either \texttt{T1} (default, and preferred), or \texttt{OT1}\@, or
% do nothing with \cs{encodingdefault}\@.
% \begin{macrocode}
\mt@enc
% \end{macrocode}
%
% \subsection{Text font setup}
% Here we fetch ``Times +~Helvetica +~Courier'' using the \pkg{times} package,
% or whatever we were told to use, or just do it by hand. On exit
% \cs{rmdefault}\@, \cs{sfdefault} and \cs{ttdefault}
% should be~\textsc{ok}.
% \begin{macrocode}
\IfFileExists{\times@style.sty}%
{\RequirePackage{\times@style}}%
{\PackageWarning{mt11p}{No file `\times@style.sty' found.%
\MessageBreak
Guessing what the text
font familes \MessageBreak
are called}
\renewcommand{\sfdefault}{phv}
\renewcommand{\rmdefault}{ptm}
\renewcommand{\ttdefault}{pcr}
\renewcommand{\bfdefault}{b}}
% \end{macrocode}
%
% \subsection{Font Sizing} The documentation accompanying MathT\i me
% suggests different subscript sizing. We do it the same way
% the \pkg{mathtimy} package does it, by redefining things like
% \cs{@ixpt} to actually be something other than what the name implies.
% Then we reset all math sizes, from \cs{tiny} to \cs{Huge}\@.
% This is the sizing used in \pkg{mathtimy}\@, which appeares to be
% taken from the files in the MathT\i me distribution. This macro
% gets called just before we exit. Switching between MathT\i me~sizing
% and the default Computer Modern~sizing on the fly makes little sense,
% so we don't try to preserve the original settings.
% The standard sizes are, in sequence, 5, 6, 7, 8, 9, 10, 10.95,
% 12, 14.4, 17.28, 20.74~and 24.88~points, i.e., we decrease the
% `spread' somewhat.
% \begin{macrocode}
\def\MathTimeSizes{%
\def\@vpt{6.0}%
\def\@vipt{6.8}%
\def\@viipt{7.6}%
\def\@viiipt{8.4}%
\def\@ixpt{9.2}%
\def\@xpt{10.0}%
\def\@xipt{10.8}%
\def\@xiipt{11.6}%
\def\@xivpt{13.2}%
\def\@xviipt{15.6}%
\def\@xxpt{18.0}%
\def\@xxvpt{22.0}%
\DeclareMathSizes\@vpt \@vpt \@vpt \@vpt
\DeclareMathSizes\@vipt \@vipt \@vpt \@vpt
\DeclareMathSizes\@viipt \@viipt \@vpt \@vpt
\DeclareMathSizes\@viiipt\@viiipt\@vipt \@vpt
\DeclareMathSizes\@ixpt \@ixpt \@vipt \@vpt
\DeclareMathSizes\@xpt \@xpt \@viipt \@vpt
\DeclareMathSizes\@xipt \@xipt \@viipt \@vpt
\DeclareMathSizes\@xiipt \@xiipt \@viiipt\@vipt
\DeclareMathSizes\@xivpt \@xivpt \@xpt \@viipt
\DeclareMathSizes\@xviipt\@xviipt\@xiipt \@xpt
\DeclareMathSizes\@xxpt \@xxpt \@xivpt \@xiipt
\DeclareMathSizes\@xxvpt \@xxvpt \@xxpt \@xviipt
\PackageInfo{mt11p}{Adjusting math subscript sizing}}
% \end{macrocode}
%
% \subsection{Fetch the MathT\i me and MathT\i me\textsc{plus} fonts.}
% We don't create \texttt{.fd}~files,
% since the fonts are not for general use.
% We declare them as separate encodings, called \texttt{Lmt}*,
% because they differ quite
% a bit from the \texttt{OM}* encodings, which might lead to trouble if,
% e.g., someone assumed the \texttt{letters}
% font has oldstyle digits or that the \texttt{symbols}
% font has calligraphic letters.
%
% There will be a \emph{heavy} series for some fonts, which we denote by
% the macro \cs{hvdefault}, and an upright italic
% shape, \cs{uidefault}. For the bold and heavy math versions
% we would need additional bold, \emph{ultra}~(\cs{uldefault}) and
% \emph{poster}~(\cs{psdefault}) weight fonts;
% pretend they exist, and then define substitutes.
% For the off chance that these are already
% defined, we ``provide'' them, rather than define them.
% Only the macros are used in the rest of this file, i.e.,
% ``|{ui}|'' never appears again, so no font designations are
% hardwired into this file (except those for common Computer Modern fonts).
% \begin{macrocode}
\providecommand{\hvdefault}{h}
\providecommand{\uidefault}{ui}
\providecommand{\uldefault}{u}
\providecommand{\psdefault}{p}
% \end{macrocode}
%
% \paragraph{Letters} Declare the \texttt{letters} fonts.
% Include \cs{noaccents@} so math accents don't break in
% \cs{mathnormal}.
% \begin{macrocode*}
\DeclareFontEncoding{LmtL}{}{\noaccents@}
\DeclareFontFamily{LmtL}{mtl}{\skewchar\font=45 }
\DeclareFontShape{LmtL}{mtl}{\mddefault}{\itdefault}{<->mtmi}{}
\DeclareFontShape{LmtL}{mtl}{\bfdefault}{\itdefault}{<->mtmib}{}
% \end{macrocode*}
% \begin{macrocode}
\DeclareFontShape{LmtL}{mtl}{\hvdefault}{\itdefault}{<->mtmih}{}% see dtx SUBS
% \end{macrocode}
% Note that the font~\texttt{mtmih} is a virtual font that
% uses~\texttt{ptmbi8r}, so even if you have a ``heavy''
% weight Times italic font, you can't use it as a math
% \texttt{letters} font unless you know how to
% create a suitable raw font and change~\file{mtmih.vf}
% and~\file{mtmih.vf}. The same applies to~\file{mtmuh}.
%
% Declare the \texttt{letters} font with upright lower case Greek letters too; we won't
% do anything with them, but we will describe how to set them up, if someone
% wants to use them as symbols~(Sec.\,\ref{unused}).
% \begin{macrocode}
\DeclareFontShape{LmtL}{mtl}{\mddefault}{\uidefault}{<->mtmu}{}
\DeclareFontShape{LmtL}{mtl}{\bfdefault}{\uidefault}{<->mtmub}{}
\DeclareFontShape{LmtL}{mtl}{\hvdefault}{\uidefault}{<->mtmuh}{}
% \end{macrocode}
%
% \paragraph{Symbols} Now the \texttt{symbols} font:
% \begin{macrocode}
\DeclareFontEncoding{LmtS}{}{\no@accents}%
\DeclareFontFamily{LmtS}{mts}{}% the fonts have no skewkerns
% \end{macrocode}
% Why do we say \cs{no@accents} when this is the \emph{one} font that
% \emph{will} have accents if we don't find any elsewhere?---because
% they are in non-standard slots. There is no ``\cs{mathsy}''
% alphabet, but someone could try to be clever and define
% one. Since we said \cs{noaccents@}, we might as well do the following
% re-declarations (\AmS~does them too).
% \begin{macrocode}
\DeclareFontEncoding{OML}{}{\noaccents@}
\DeclareFontEncoding{OMS}{}{\noaccents@}
% \end{macrocode}
% \texttt{mtsyn} and the older \texttt{mtsy} differ only in the
% \texttt{radical1}~glyph
% (\texttt{C132},~$\mathit{'204}$), which is a surd/radical
% at the baseline (as opposed to below it),
% otherwise identical to the other radical sign
% at~$\mathit{'160}$; see~Sec.\,\ref{realunused}.
% \begin{macrocode}
\DeclareFontShape{LmtS}{mts}{\mddefault}{\updefault}{<->mtsyn}{}
\DeclareFontShape{LmtS}{mts}{\bfdefault}{\updefault}{<->mtsyb}{}
\DeclareFontShape{LmtS}{mts}{\hvdefault}{\updefault}{<->mtsyh}{}
% \end{macrocode}
%
% \paragraph{Script Letters} The letters-only \texttt{mtms}* fonts, which
% we use for \cs{mathcal} and/or~\cs{mathscr}.
% \begin{macrocode*}
\DeclareFontEncoding{LmtW}{}{\noaccents@}
\DeclareFontFamily{LmtW}{mtw}{\skewchar\font=42 \hyphenchar\font=-1 }
\DeclareFontShape{LmtW}{mtw}{\mddefault}{\updefault}{<->mtms}{}
\DeclareFontShape{LmtW}{mtw}{\bfdefault}{\updefault}{<->mtmsb}{}
% \end{macrocode*}
%
% \paragraph{Math Extention}
% The \texttt{largesymbols} and math extension fonts \texttt{mtex}*
% are compatible with \texttt{OMX}; the only difference is an extra radical
% in slot~$\mathit{'237}$, which we don't use, because it is identical
% to the one in the \texttt{symbols} font~($\mathit{'160}$).
% \begin{macrocode}
\DeclareFontFamily{OMX}{mtx}{}% this really is OMX, thank you
\DeclareFontShape{OMX}{mtx}{\mddefault}{\updefault}{<->mtex}{}
\DeclareFontShape{OMX}{mtx}{\bfdefault}{\updefault}{<->mtexb}{}
\DeclareFontShape{OMX}{mtx}{\hvdefault}{\updefault}{<->mtexh}{}
% \end{macrocode}
%
% \paragraph{Greek Text} MathT\i me includes a font with
% upright Greek letters, upper and lower case, meant for
% use as \emph{letters} (as opposed to \textit{symbols})\@.
% The fonts have ligatures with empty slots to get
% alternate forms---see Section~8 of the
% \textit{MathT\i me\/}\textsc{plus} reference manual.
% \begin{macrocode}
\DeclareFontEncoding{LmtG}{}{\noaccents@}
\DeclareFontFamily{LmtG}{mtg}{}
\DeclareFontShape{LmtG}{mtg}{\mddefault}{\updefault}{<->mtgu}{}
\DeclareFontShape{LmtG}{mtg}{\bfdefault}{\updefault}{<->mtgub}{}
% \end{macrocode}
%
% Lastly, declare default for the new encodings, so NFSS~is happy.
% \begin{macrocode}
\DeclareFontSubstitution{LmtL}{mtl}{\mddefault}{\itdefault}
\DeclareFontSubstitution{LmtS}{mts}{\mddefault}{\updefault}
\DeclareFontSubstitution{LmtW}{mtw}{\mddefault}{\updefault}
\DeclareFontSubstitution{LmtG}{mtg}{\mddefault}{\updefault}
% \end{macrocode}
%
% \subsection{Math declarations}
% We assume the usual math setup was loaded into
% the format and change things around to use MathT\i me.
% If for some reason you don't read a standard math setup
% into the format, you'll have to read the setup in before
% loading this package. Note that it is not necessary to
% ``preload'' the standard Computer Modern
% font metrics, if font memory is a problem.
%
% \paragraph{Math Versions}
% We use three math versions, \textit{normal}\@,
% \textit{bold}\@, and \textit{heavy}\@, and keep everything separate,
% as if there really were three sets of fonts available for everything. Actually,
% they're not, but one could use the hooks to supply such fonts if one had them.
%
% Give a notice so people don't freak when they see all the warnings
% messages NFSS~emits.
% \begin{macrocode}
\PackageWarning{mt11p-Font}{Expect LOTS of NFSS warnings}
% \end{macrocode}
%
% Some of the code that follows is redundant.
% \begin{macrocode}
\DeclareMathVersion{normal}
\DeclareMathVersion{bold}
\DeclareMathVersion{heavy}
\def\normalmath{\@nomath\normalmath\mathversion{normal}}
\def\boldmath{\@nomath\boldmath\mathversion{bold}}
\def\heavymath{\@nomath\heavymath\mathversion{heavy}}
\def\unboldmath{\normalmath}
\let\unheavymath\unboldmath
% \end{macrocode}
% This is a private joke\ldots
% \begin{macrocode}
\let\unnormalmath\relax
% \end{macrocode}
%
% \paragraph{Declare Math Font Families}
% The following does not depend on any options:
% \begin{macrocode}
\DeclareSymbolFont{operators}{\encodingdefault}%
{\rmdefault}{\mddefault}{\updefault}
\DeclareSymbolFont{letters}{LmtL}%
{mtl}{\mddefault}{\itdefault}
\DeclareSymbolFont{symbols}{LmtS}%
{mts}{\mddefault}{\updefault}
\DeclareSymbolFont{largesymbols}{OMX}%
{mtx}{\mddefault}{\updefault}
\DeclareSymbolFontAlphabet \mathnormal {letters}
\DeclareSymbolFontAlphabet \mathrm {operators}
\DeclareMathAlphabet \mathbf {\encodingdefault}%
{\rmdefault}{\bfdefault}{\updefault}
\DeclareMathAlphabet \mathsf {\encodingdefault}%
{\sfdefault}{\mddefault}{\updefault}
\DeclareMathAlphabet \mathit {\encodingdefault}%
{\rmdefault}{\mddefault}{\itdefault}
\DeclareMathAlphabet \mathtt {\encodingdefault}%
{\ttdefault}{\mddefault}{\updefault}
% \end{macrocode}
%
% The calligraphy stuff depends on what `\texttt{cal}' option is being used;
% we either
% use \texttt{mtms} as the \cs{mathcal} font,
% \textsc{or}
% we make \texttt{cmsy} the \cs{mathcal} font
% and make \texttt{mtms} a ``script'' font~\cs{mathscr}\@,
% \textsc{or}
% we make \texttt{cmsy} the \cs{mathcal} font
% and don't use \texttt{mtms} for anything.
% \begin{macrocode}
\ifcase\mt@cal % case 0
\DeclareMathAlphabet \mathcal {LmtW}{mtw}{\mddefault}{\updefault}
\or % case 1
\DeclareMathAlphabet \mathscr {LmtW}{mtw}{\mddefault}{\updefault}
\DeclareMathAlphabet \mathcal {OMS}{cmsy}{m}{n}
\or % case 2
\DeclareMathAlphabet \mathcal {OMS}{cmsy}{m}{n}
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@cal}%
{The \string\mathcal/\string\mathscr setup is hosed.}
\fi
% \end{macrocode}
% We'll have to deal with more \cs{mathcal}-related stuff later.
%
% Note that things
% defined via \cs{DeclareSymbolFontAlphabet} switch math versions
% automatically with \cs{SetSymbolFont}; these include \cs{mathnormal}
% and \cs{mathrm}.
%
% \paragraph{Normal Math Version} This is largely redundant.
% \begin{macrocode}
\SetSymbolFont{operators}{normal}{\encodingdefault}%
{\rmdefault}{\mddefault}{\updefault}
\SetSymbolFont{letters}{normal}{LmtL}%
{mtl}{\mddefault}{\itdefault}
\SetSymbolFont{symbols}{normal}{LmtS}%
{mts}{\mddefault}{\updefault}
\SetSymbolFont{largesymbols}{normal}{OMX}%
{mtx}{\mddefault}{\updefault}
\SetMathAlphabet \mathsf {normal}%
{\encodingdefault}{\sfdefault}{\mddefault}{\updefault}
\SetMathAlphabet \mathtt {normal}%
{\encodingdefault}{\ttdefault}{\mddefault}{\updefault}
\SetMathAlphabet \mathit {normal}%
{\encodingdefault}{\rmdefault}{\mddefault}{\itdefault}
\SetMathAlphabet \mathbf {normal}%
{\encodingdefault}{\rmdefault}{\hvdefault}{\updefault}
% \end{macrocode}
% \cs{mathcal} and \cs{mathscr} have several cases.
% \begin{macrocode}
\ifcase\mt@cal % case 0
\SetMathAlphabet \mathcal {normal}{LmtW}{mtw}{\mddefault}{\updefault}
\or % case 1
\SetMathAlphabet \mathscr {normal}{LmtW}{mtw}{\mddefault}{\updefault}
\SetMathAlphabet \mathcal {normal}{OMS}{cmsy}{m}{n}
\or % case 2
\SetMathAlphabet \mathcal {normal}{OMS}{cmsy}{m}{n}
\fi
% \end{macrocode}
%
% \paragraph{Bold Math Version} Same story as above.
% \begin{macrocode}
\SetSymbolFont{operators}{bold}{\encodingdefault}%
{\rmdefault}{\bfdefault}{\updefault}
\SetSymbolFont{letters}{bold}{LmtL}%
{mtl}{\bfdefault}{\itdefault}
\SetSymbolFont{symbols}{bold}{LmtS}%
{mts}{\bfdefault}{\updefault}
\SetSymbolFont{largesymbols}{bold}{OMX}%
{mtx}{\bfdefault}{\updefault}
\SetMathAlphabet \mathsf {bold}{\encodingdefault}%
{\sfdefault}{\bfdefault}{\updefault}
\SetMathAlphabet \mathtt {bold}{\encodingdefault}%
{\ttdefault}{\bfdefault}{\updefault}
\SetMathAlphabet \mathit {bold}{\encodingdefault}%
{\rmdefault}{\bfdefault}{\itdefault}
\SetMathAlphabet \mathbf {bold}{\encodingdefault}%
{\rmdefault}{\uldefault}{\updefault}
% \end{macrocode}
% And the cases
% \begin{macrocode}
\ifcase\mt@cal % case 0
\SetMathAlphabet \mathcal {bold}{LmtW}{mtw}{\bfdefault}{\updefault}
\or % case 1
\SetMathAlphabet \mathscr {bold}{LmtW}{mtw}{\bfdefault}{\updefault}
\SetMathAlphabet \mathcal {bold}{OMS}{cmsy}{b}{n}
\or % case 2
\SetMathAlphabet \mathcal {bold}{OMS}{cmsy}{b}{n}
\fi
% \end{macrocode}
%
% \paragraph{Heavy Math Version} Still more of the same.
% \begin{macrocode}
\SetSymbolFont{operators}{heavy}{\encodingdefault}%
{\rmdefault}{\hvdefault}{\updefault}
\SetSymbolFont{letters} {heavy}{LmtL}%
{mtl}{\hvdefault}{\itdefault}
\SetSymbolFont{symbols} {heavy}{LmtS}%
{mts}{\hvdefault}{\updefault}
\SetSymbolFont{largesymbols}{heavy}{OMX}%
{mtx}{\hvdefault}{\updefault}
\SetMathAlphabet \mathsf {heavy}{\encodingdefault}%
{\sfdefault}{\hvdefault}{\updefault}
\SetMathAlphabet \mathtt {heavy}{\encodingdefault}%
{\ttdefault}{\hvdefault}{\updefault}
\SetMathAlphabet \mathit {heavy}{\encodingdefault}%
{\rmdefault}{\hvdefault}{\itdefault}
\SetMathAlphabet \mathbf {heavy}{\encodingdefault}%
{\rmdefault}{\psdefault}{\updefault}%
% \end{macrocode}
% And the cases for script,
% \begin{macrocode}
\ifcase\mt@cal % case 0
\SetMathAlphabet \mathcal {heavy}{LmtW}{mtw}{\hvdefault}{\updefault}
\or % case 1
\SetMathAlphabet \mathscr {heavy}{LmtW}{mtw}{\hvdefault}{\updefault}
\SetMathAlphabet \mathcal {heavy}{OMS}{cmsy}{\hvdefault}{\updefault}
\or % case 2
\SetMathAlphabet \mathcal {heavy}{OMS}{cmsy}{\hvdefault}{\updefault}
\fi
% \end{macrocode}
%
% \subsection{Bold \& heavy font substitutions}
% We pretended there are all sorts of weights available,
% but, in fact, they're not. Declare substitutions, unless we were told not to.
% NFSS~will complain if we use an as-of-yet undeclared font as a substitute, so
% we explicitly read in the \file{.fd}~files (this happens later
% for other fonts too). No harm will be done if they
% have already been read. Read in even \file{OMScmsy.fd}, in case the
% format has zilch preloaded.
%
% \begin{macrocode}
\ifcase\mt@sub % case 0
\PackageWarning{mt11p}{No math font substitutions set}
% \end{macrocode}
% Check for and read in the files
% $\langle$\cs{encodingdefault}$\!\rangle %
% \langle$\texttt{\char`\\}\textit{xy\/}\texttt{default}$
% \!\rangle$\texttt{.fd} for the three text families.
% Be nice and check for the all-lower case name too.
% \begin{macrocode}
\or % case 1
\def\mt@fd@check#1{%
\edef\reserved@a{\lowercase{\noexpand
\InputIfFileExists{\encodingdefault #1.fd}}}%
\reserved@a\relax{\InputIfFileExists{\encodingdefault #1.fd}\relax
{\PackageError{mt11p}%
{No file `\encodingdefault#1.fd' found}%
{Your text \string#1 setup looks inconsistent.}}}}
\mt@fd@check\rmdefault
\mt@fd@check\sfdefault
\mt@fd@check\ttdefault
\edef\reserved@a{\lowercase{\noexpand\InputIfFileExists{omscmsy.fd}}}%
\reserved@a\relax{\InputIfFileExists{OMScmsy.fd}\relax
{\PackageError{mt11p}{No OMScmsy.fd file}%
{Your are missing a basic distribution file. %
Check the LaTeX installation.}}}
\DeclareFontShape{\encodingdefault}%
{\rmdefault}{\hvdefault}{\updefault}% heavy \rm SUBS
{<->ssub*\rmdefault/\bfdefault/\updefault}{}
\DeclareFontShape{\encodingdefault}%
{\sfdefault}{\hvdefault}{\updefault}% heavy \sf SUBS
{<->ssub*\sfdefault/\bfdefault/\updefault}{}
\DeclareFontShape{\encodingdefault}%
{\ttdefault}{\hvdefault}{\updefault}% heavy \tt SUBS
{<->ssub*\ttdefault/\bfdefault/\updefault}{}
\DeclareFontShape{\encodingdefault}%
{\rmdefault}{\psdefault}{\updefault}% poster \rm SUBS
{<->ssub*\rmdefault/\bfdefault/\updefault}{}
\DeclareFontShape{LmtW}%
{mtw}{\hvdefault}{\updefault}% heavy mtms SUBS
{<->ssub*mtw/\bfdefault/\updefault}{}
\DeclareFontShape{OMS}{cmsy}{\hvdefault}{\updefault}%
{<->ssub*cmsy/b/n}{}% heavy cmsy SUBS
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@sub}%
{No math font substitutions set.}
\fi
% \end{macrocode}
%
% \subsection{Mathcodes} The MathT\i me fonts are \emph{nearly}
% replacements
% for Computer Modern, but there are a few things to fix up.
% We also make it possible to take some
% symbols and accents from either
% \texttt{operators} or from elsewhere,
% depending on the options; this will be done later.
%
% \paragraph{\texttt{letters} Font} Upright upper case
% Greek no longer comes from
% the \texttt{operators} font, but from the
% \texttt{letters} font, so
% upper and lower case Greek letters now behave identically,
% namely as math symbols.
% This means that something like
% |$\mathit{\Delta\Gamma}\mathbf{\Xi}$| no longer
% works---upper case Greek letters are not affected by math alphabet changes.
% There is no simple fix.
%
% Upright upper case Greek:
% \begin{macrocode}
\DeclareMathSymbol\Gamma {\mathord}{letters}{'060}
\DeclareMathSymbol\Delta {\mathord}{letters}{'061}
\DeclareMathSymbol\Theta {\mathord}{letters}{'062}
\DeclareMathSymbol\Lambda {\mathord}{letters}{'063}
\DeclareMathSymbol\Xi {\mathord}{letters}{'064}
\DeclareMathSymbol\Pi {\mathord}{letters}{'065}
\DeclareMathSymbol\Sigma {\mathord}{letters}{'066}
\DeclareMathSymbol\Upsilon {\mathord}{letters}{'067}
\DeclareMathSymbol\Phi {\mathord}{letters}{'070}
\DeclareMathSymbol\Psi {\mathord}{letters}{'071}
\DeclareMathSymbol\Omega {\mathord}{letters}{'177}
% \end{macrocode}
% Italic upper case Greek; \AmS~calls these
% \cs{var}$\langle\!\mathit{Greek\;Letter}\rangle$.
% \begin{macrocode}
\DeclareMathSymbol\varGamma {\mathord}{letters}{'000}
\DeclareMathSymbol\varDelta {\mathord}{letters}{'001}
\DeclareMathSymbol\varTheta {\mathord}{letters}{'002}
\DeclareMathSymbol\varLambda {\mathord}{letters}{'003}
\DeclareMathSymbol\varXi {\mathord}{letters}{'004}
\DeclareMathSymbol\varPi {\mathord}{letters}{'005}
\DeclareMathSymbol\varSigma {\mathord}{letters}{'006}
\DeclareMathSymbol\varUpsilon {\mathord}{letters}{'007}
\DeclareMathSymbol\varPhi {\mathord}{letters}{'010}
\DeclareMathSymbol\varPsi {\mathord}{letters}{'011}
\DeclareMathSymbol\varOmega {\mathord}{letters}{'012}
% \end{macrocode}
% Lower case Greek letters are \textsc{ok}, except for
% \begin{macrocode}
\DeclareMathSymbol\varkappa {\mathord}{letters}{'176}
\DeclareMathSymbol\omicron {\mathord}{letters}{`\o}% for completeness
% \end{macrocode}
%
% \paragraph{\texttt{symbols} Font}
% There are a few new symbols, and the fonts no longer contain
% calligraphic letters.
% Easy things (those where no alternatives are available) first; the
% new names are those used in the MathT\i me distribution.
% \begin{macrocode}
\DeclareMathSymbol\openclubsuit {\mathord}{symbols}{"78}
\DeclareMathSymbol\shadedclubsuit {\mathord}{symbols}{"79}
\DeclareMathSymbol\openspadesuit {\mathord}{symbols}{"7A}
\DeclareMathSymbol\shadedspadesuit{\mathord}{symbols}{"7B}
\DeclareMathSymbol\triangleleft {\mathbin}{symbols}{"47}
\DeclareMathSymbol\triangleright {\mathbin}{symbols}{"46}
\DeclareMathSymbol\cupprod {\mathbin}{symbols}{"59}
\DeclareMathSymbol\capprod {\mathbin}{symbols}{"5A}
% \end{macrocode}
% The \cs{varcirc} symbol is slightly smaller than the `open bullet'.
% \pkg{mathtimy} calls it ``\cs{comp}''.
% \begin{macrocode}
\DeclareMathSymbol\varcirc{\mathbin}{symbols}{"42}
\let\comp=\varcirc
% \end{macrocode}
% \cs{vec} used to be in \texttt{letters}, now it's
% in \texttt{symbols}\@.
% \begin{macrocode}
\DeclareMathAccent\vec {\mathord}{symbols}{"45}
% \end{macrocode}
% \texttt{mtsy} has an accent glyph called \texttt{overbar},
% which \pkg{mathtimy} calls \cs{widebar}\@.
% \begin{macrocode}
\DeclareMathAccent\overbar{\mathord}{symbols}{"53}
\let\widebar\overbar
% \end{macrocode}
%
% The glyph called \texttt{backslash} in the AFM~file
% of~\texttt{mtsyn} is the one usually used for
% \cs{setminus}\@, and the format file has a definition
% for it (\texttt{symbols},~slot~|"6E|).
% There is a \texttt{setminus} in the AFM~file, but it looks
% somewhat like a tilted minus sign.
% \AmS~packages call that glyph ``\cs{smallsetminus}''.
% \begin{macrocode}
\DeclareMathSymbol\varsetminus{\mathbin}{symbols}{"58}
\let\smallsetminus\varsetminus
% \end{macrocode}
%
% \paragraph{Calligraphic letters and their variants}
% Irrespective of the options, both \cs{mathcal}
% and \cs{mathscr} get defined; warn only when
% the \texttt{nomtms}~option is used.
% \begin{macrocode}
\ifcase\mt@cal % case 0
\let\mathscr\mathcal % don't warn
\or % case 1
\or % case 2
\def\mathscr#1{\mathcal{#1}%
\PackageWarning{mt11p}{no \string\mathscr\space available;
\MessageBreak using OMScmsy \string\mathcal}}
\fi
% \end{macrocode}
% We don't try to trap cases like |\mathcal{a}| when
% the \cs{mathcal} alphabet is~\texttt{OMS} (and hence
% has no lowercase letters!). Presumably by
% writing |\mathcal{a}| you know that \cs{mathcal}~is
% \texttt{LmtW}, i.e., the \texttt{mtcal}~option is in effect.
% Writing |\mathscr{a}| when \cs{mathscr} is essentially
% a synonym for~\cs{mathcal} will at least produce a warning.
%
% \texttt{mtms}* has alternate forms of a few letters. We define
% math commands to fetch them, assuming we
% have an \texttt{mtms}*~font as~\cs{mathscr}.
% (The script letters have sidebearings which make them
% unsuitable for text; use math mode for logos and such.)
% The auxiliary macro will be defined later.
% \begin{macrocode}
\def\varA {\mt@al@hexsy\mathscr{30}}
\def\varE {\mt@al@hexsy\mathscr{31}}
\def\varG {\mt@al@hexsy\mathscr{32}}
\def\varvarG{\mt@al@hexsy\mathscr{33}}
\def\varI {\mt@al@hexsy\mathscr{34}}
\def\varL {\mt@al@hexsy\mathscr{35}}
\def\varQ {\mt@al@hexsy\mathscr{36}}
\def\varS {\mt@al@hexsy\mathscr{37}}
\def\varr {\mt@al@hexsy\mathscr{38}}
\def\varz {\mt@al@hexsy\mathscr{39}}
\def\iscript{\mt@al@hexsy\mathscr{7B}}% can't use \imath
\def\jscript{\mt@al@hexsy\mathscr{7C}}% can't use \jmath
% \end{macrocode}
% The MathT\i me
% distribution defines the macro~\cs{script}, which is
% supposed to produce the script letter~``A'' and its alternate
% form with~``|\script A|'' and~``|\script*A|'', respectively.
% The argument of~\cs{script} had better be
% a single token (or an asterisk and a single token),
% else we get a mess; in order to
% get the expected output that token should be a
% single~$\mathrm{letter}_{11}$, one of those that have variant forms.
% \begin{macrocode}
\DeclareRobustCommand\script{\@ifstar\@varscript\@script}
\ifnum\mt@cal<2 % mtms available
\def\@script#1{\mathscr{#1}}
\def\@varscript#1{%
\ifx#1A\varA
\else\ifx#1E\varE
\else\ifx#1G\varG
\else\ifx#1g\varvarG
\else\ifx#1I\varI
\else\ifx#1L\varL
\else\ifx#1Q\varQ
\else\ifx#1S\varS
\else\ifx#1r\varr
\else\ifx#1z\varz
\else\ifx#1i\iscript
\else\ifx#1j\jscript
\else \PackageWarning{mt11p}{#1: no such variant letter}%
\mathscr{#1}%
\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else % OMS only
\def\@script#1{\mathscr{#1}}
\def\@varscript#1{\PackageWarning{mt11}%
{no variant letters available in OMS}%
\@script{#1}}
\fi
% \end{macrocode}
% The above will produce \emph{two} warnings if you say |$\mathcal{a}$|
% with the \texttt{nomtms}~option in effect.
%
% \paragraph{Symbols from either \texttt{operators} or from elsewhere}
% \label{fromops}
% Many symbols and punctuation marks can be taken from either
% the \texttt{operators} math family, or from
% \texttt{letters}/\texttt{symbols}\@. Most of the glyphs
% are virtually identical in either font. The `optimal' choice
% depends on several things, e.g., do you wish to use as few glyphs from
% the MathT\i me fonts as possible, do you prefer `thinner' symbols, etc.
% The \texttt{opmax} option will take as many things from
% \texttt{operators} as possible, but
% risk, e.g., that the $=$~sign will not line up with double
% arrows,~etc.
% The \texttt{opsafe}~option uses \texttt{operators}
% glyphs only when absolutly nothing can go wrong;
% the \texttt{opnone} option \emph{avoids} \texttt{operators}
% whenever possible and uses MathT\i me glyphs instead.
%
% The \texttt{operators} font is uses the encoding
% \cs{encodingdefault}. We \emph{must} recognize that encoding
% in order to take any symbols from \texttt{operators}.
% The only encodings I know of that someone might possibly be
% using with \LaTeXe{} are
% \texttt{T1}\@, \texttt{OT1}~or a superset thereof, \texttt{8r} and
% \texttt{8a}. It's easy to hack in another encoding, if required,
% as would be the case with a superset or \texttt{OT1}\@.
% If we don't recognize the encoding, stick to using
% \texttt{symbols} and~\texttt{letters}.
%
% NFSS~has a ``\cs{DeclareMathDelimiter}'' but nothing
% to assign \cs{delcode}s. We try to make a general macro
% and insist on saying ``\cs{symletters}'' rather than
% just saying~``\texttt{1}'', eventhough it's pretty
% much out of the question that \cs{symoperators},
% \cs{symletters}, \cs{symsymbols} and \cs{symlargeoperators}
% are something other than 0, 1, 2 and~3, respectively, since
% \TeX~itself checks for extra \texttt{fontdimen}s
% of \cs{fam2} and~\cs{fam3} before it agrees to typeset math.
% (The second and fourth arguments should be hexadecimal numbers
% without the~``\texttt"''.)
% \begin{macrocode}
\def\mt@assign@del#1#2#3#4#5{%
\edef\reserved@a{\expandafter\the\csname sym#2\endcsname}%
\edef\reserved@b{\expandafter\the\csname sym#4\endcsname}%
\delcode#1="\reserved@a#3\reserved@b#5 \relax}
% \end{macrocode}
%
% This code is read once and not stored, so
% we just write the whole thing out case by case.
% \cs{colon}~is defined in some of the \AmS~packages, so
% don't overwrite an existing definition.
%
% Here's the overly conservative option:
% \begin{macrocode}
\ifcase\mt@ops % case 0
\DeclareMathSymbol{(}{\mathopen}{letters}{"2E}
\mt@assign@del{`\(}{letters}{2E}{largesymbols}{00}
\DeclareMathSymbol{)}{\mathclose}{letters}{"2F}
\mt@assign@del{`\)}{letters}{2F}{largesymbols}{01}
\DeclareMathSymbol{+}{\mathbin}{symbols}{"43}
\DeclareMathSymbol{=}{\mathrel}{symbols}{"44}% identical one at "48
\DeclareMathSymbol{;}{\mathpunct}{symbols}{"49}
\DeclareMathSymbol{[}{\mathopen}{symbols}{"54}
\mt@assign@del{`\[}{symbols}{54}{largesymbols}{02}
\DeclareMathSymbol{]}{\mathclose}{symbols}{"55}
\mt@assign@del{`\]}{symbols}{55}{largesymbols}{03}
\DeclareMathSymbol{:}{\mathrel}{symbols}{"56}
\ifx\colon\undefined
\DeclareMathSymbol{\colon}{\mathpunct}{symbols}{"56}
\fi
\DeclareMathSymbol{!}{\mathclose}{symbols}{"57}
\DeclareMathSymbol{.}{\mathord}{letters}{"3A}
\DeclareMathSymbol{\period}{\mathpunct}{letters}{"3A}
\DeclareMathSymbol{,}{\mathpunct}{letters}{"3B}
%\DeclareMathSymbol{<}{\mathrel}{letters}{"3C}% format defaults
%\DeclareMathSymbol{>}{\mathrel}{letters}{"3E}
%\DeclareMathSymbol{|}{\mathord}{symbols}{"6A}
%\DeclareMathSymbol{/}{\mathord}{letters}{"3D}
%\DeclareMathSymbol{-}{\mathbin}{symbols}{"00}
% \end{macrocode}
% Now the safe version; the stuff we take from operators
% never gets used in ``synthesized'' or extensible symbols.
% \begin{macrocode}
\or % case 1
\DeclareMathSymbol{(}{\mathopen}{operators}{`\(}
\mt@assign@del{`\(}{operators}{28}{largesymbols}{00}
\DeclareMathSymbol{)}{\mathclose}{operators}{`\)}
\mt@assign@del{`\)}{operators}{29}{largesymbols}{01}
\DeclareMathSymbol{+}{\mathbin}{symbols}{"43}
\DeclareMathSymbol{=}{\mathrel}{symbols}{"44}% identical one at "48
\DeclareMathSymbol{;}{\mathpunct}{operators}{`\;}
\DeclareMathSymbol{[}{\mathopen}{operators}{`\[}
\mt@assign@del{`\[}{operators}{5B}{largesymbols}{02}
\DeclareMathSymbol{]}{\mathclose}{operators}{`\]}
\mt@assign@del{`\]}{operators}{5D}{largesymbols}{03}
\DeclareMathSymbol{:}{\mathrel}{operators}{`\:}
\ifx\colon\undefined % AMS defines it differently; don't overwrite that
\DeclareMathSymbol{\colon}{\mathpunct}{operators}{`\:}
\fi
\DeclareMathSymbol{!}{\mathclose}{operators}{`\!}
\DeclareMathSymbol{.}{\mathord}{operators}{`\.}
\DeclareMathSymbol{\period}{\mathpunct}{operators}{`\.}
\DeclareMathSymbol{,}{\mathpunct}{operators}{`\,}
%\DeclareMathSymbol{<}{\mathrel}{letters}{"3C}% format defaults
%\DeclareMathSymbol{>}{\mathrel}{letters}{"3E}
%\DeclareMathSymbol{|}{\mathord}{symbols}{"6A}
%\DeclareMathSymbol{/}{\mathord}{letters}{"3D}
%\DeclareMathSymbol{-}{\mathbin}{symbols}{"00}
% \end{macrocode}
% Now \texttt{opmax}. This is risky, or more exactly
% some glyphs \emph{will} be flawed, because the minus
% and equal signs won't line up with arrows, etc. On the
% other hand, this will minimize the use of non-resident fonts,
% so it may make the final output marginally smaller if
% you have partial font downloading or if you include
% the MathT\i me fonts as bitmaps.
% \begin{macrocode}
\or % case 2
\PackageWarning{mt11p}{opmax enabled}
\DeclareMathSymbol{(}{\mathopen}{operators}{`\(}
\mt@assign@del{`\(}{operators}{28}{largesymbols}{00}
\DeclareMathSymbol{)}{\mathclose}{operators}{`\)}
\mt@assign@del{`\)}{operators}{29}{largesymbols}{01}
\DeclareMathSymbol{+}{\mathbin}{operators}{`\+}
\DeclareMathSymbol{=}{\mathrel}{operators}{`\=}% dangerous
\DeclareMathSymbol{;}{\mathpunct}{operators}{`\;}
\DeclareMathSymbol{[}{\mathopen}{operators}{`\[}
\mt@assign@del{`\[}{operators}{5B}{largesymbols}{02}
\DeclareMathSymbol{]}{\mathclose}{operators}{`\]}
\mt@assign@del{`\]}{operators}{5D}{largesymbols}{03}
\DeclareMathSymbol{:}{\mathrel}{operators}{`\:}
\ifx\colon\undefined
\DeclareMathSymbol{\colon}{\mathpunct}{operators}{`\:}
\fi
\DeclareMathSymbol{!}{\mathclose}{operators}{`\!}
\DeclareMathSymbol{.}{\mathord}{operators}{`\.}
\DeclareMathSymbol{\period}{\mathpunct}{operators}{`\.}
\DeclareMathSymbol{,}{\mathpunct}{operators}{`\,}
\DeclareMathSymbol{/}{\mathord}{operators}{`\/}
\mt@assign@del{`\/}{operators}{2F}{largesymbols}{0E}
% \end{macrocode}
% Now we have to be careful: \texttt{<}\@, \texttt{>} and \texttt{\string|}
% can be taken from \texttt{operators}
% if \cs{encodingdefault} is anything \emph{except}~\texttt{OT1}\@.
% We use an \texttt{endash} instead of a hyphen for the minus sign
% if we recognize the encoding to get at least something close
% to a real minus sign. That's a sloppy kludge,
% but choosing the~\texttt{opmax} option implies you've lowered your
% standards somewhat.
% \begin{macrocode}
\def\reserved@a{OT1}\edef\reserved@b{\encodingdefault}
\ifx\reserved@a\reserved@b % unavailable in OT1...
%\DeclareMathSymbol{<}{\mathrel}{letters}{"3C}% format defaults
%\DeclareMathSymbol{>}{\mathrel}{letters}{"3E}
%\DeclareMathSymbol{|}{\mathord}{symbols}{"6A}
\DeclareMathSymbol{-}{\mathbin}{operators}{"7B}% dangerous
\else
\def\reserved@a{T1}%
\ifx\reserved@a\reserved@b
\DeclareMathSymbol{-}{\mathbin}{operators}{"15}% dangerous
\else
\def\reserved@a{8r}%
\ifx\reserved@a\reserved@b
\DeclareMathSymbol{-}{\mathbin}{operators}{150}% dangerous
\else
\def\reserved@a{8a}%
\ifx\reserved@a\reserved@b
\DeclareMathSymbol{-}{\mathbin}{operators}{"B1}% dangerous
\else
% keep symbols, slot "00
\fi % 8a
\fi % 8r
\fi % T1
\DeclareMathSymbol{<}{\mathrel}{operators}{`\<}% ascii positions
\DeclareMathSymbol{>}{\mathrel}{operators}{`\>}
\DeclareMathSymbol{|}{\mathord}{operators}{`\|}
\mt@assign@del{`\|}{operators}{7C}% ascii bar
{largesymbols}{0C}
\DeclareMathDelimiter\backslash\mathord{operators}{"5C}% ascii backslash
{largesymbols}{"0F}
\DeclareMathDelimiter\lbrace \mathopen{operators}{`\{}% ascii `{'
{largesymbols}{"08}
\DeclareMathDelimiter\rbrace \mathclose{operators}{`\}}% ascii `}'
{largesymbols}{"09}
\fi
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@ops}%
{The mathsymbol setup is hosed; expect bad output.}
\fi
% \end{macrocode}
%
% \paragraph{Math Accents}
% Accents in math can be made to either use a fixed font,
% or to obey math alphabets. In order to have
% accents of the latter type,
% we \emph{must} recognize the \cs{encodingdefault}
% (which the \texttt{operators} math family is in)
% and set the corresponding accent codes up for that encoding.
% If we don't recognize the encoding we have to use fixed accents;
% MathT\i me provides suitable accents in the \texttt{symbols}~font.
%
% For some reason the ring accent~``\aa'' is always
% left out, so we define it, but don't warn if
% we're stuck with \texttt{symbols} accents
% which have no ring accent glyph and just make \cs{ring} a no-op.
%
% The code below is written out long hand style, to keep it
% legible. It does not get stored, it's read only once, and
% most of it is skipped, so it would be only a marginal
% improvement to merge everything.
%
% The \texttt{opaccents} case:
% \begin{macrocode}
\ifcase\mt@accs % case 0
% \end{macrocode}
% We do something similar to what \AmS~does, but rather
% simple-mindedly: choose between `fixed' (class~\texttt0)
% or `variable' (class~\texttt7) based on the value of
% \cs{mt@acc@class}, whose value should be either~\texttt0
% or~\texttt7,
% depending on whether the (encoding of the)
% current math alphabet has accents \textit{in the expected positions}.
% We could use the \AmS{} hook (\cs{accentclass@}), but
% we ought to make our own\ldots{} Actually, this is
% slightly naughty; we could have gone
% through the \cs{DeclaterMathAccent}
% command, declare two accents, and have the user-level
% accent command pick the right one based on something
% \cs{noaccents@} says, but that's kind of pointless.
%
% All of this works as long as we recognize the encoding. If we don't,
% use fixed accents from \texttt{symbols} and complain.
% The slot specification must be in hex.
% \begin{macrocode*}
\def\mt@accent@make#1#2{\def#1{\mathaccent"\mt@acc@class0#2 }}
% \end{macrocode*}
% Here are the encodings we recognize:
% \begin{macrocode}
\edef\reserved@a{\encodingdefault}
\def\reserved@b{T1}% a.k.a Cork or DC or EC
\ifx\reserved@a\reserved@b
\mt@accent@make{\grave}{00}
\mt@accent@make{\acute}{01}
\mt@accent@make{\hat}{02}
\mt@accent@make{\tilde}{03}
\mt@accent@make{\ddot}{04}
\mt@accent@make{\ring}{06}
\mt@accent@make{\check}{07}
\mt@accent@make{\breve}{08}
\mt@accent@make{\bar}{09}
\mt@accent@make{\dot}{0A}
\else
\def\reserved@b{OT1}% ``Knuth roman''
\ifx\reserved@a\reserved@b
\mt@accent@make{\grave}{12}
\mt@accent@make{\acute}{13}
\mt@accent@make{\check}{14}
\mt@accent@make{\breve}{15}
\mt@accent@make{\bar}{16}
\mt@accent@make{\ring}{17}
\mt@accent@make{\hat}{5E}
\mt@accent@make{\dot}{5F}
\mt@accent@make{\tilde}{7E}
\mt@accent@make{\ddot}{7F}
\else
\def\reserved@b{8r}% TeXBase1
\ifx\reserved@a\reserved@b
\mt@accent@make{\dot}{01}
\mt@accent@make{\ring}{09}
\mt@accent@make{\breve}{0B}}
\mt@accent@make{\check}{10}
\mt@accent@make{\grave}{1E}
\mt@accent@make{\hat}{88}
\mt@accent@make{\tilde}{98}
\mt@accent@make{\ddot}{A8}
\mt@accent@make{\bar}{AF}
\mt@accent@make{\acute}{B4}
\else
\def\reserved@b{8a}% AdobeStandard
\ifx\reserved@a\reserved@b
\mt@accent@make{\grave}{C1}
\mt@accent@make{\acute}{C2}
\mt@accent@make{\hat}{C3}
\mt@accent@make{\tilde}{C4}
\mt@accent@make{\bar}{C5}
\mt@accent@make{\breve}{C6}
\mt@accent@make{\dot}{C7}
\mt@accent@make{\ddot}{C8}
\mt@accent@make{\ring}{CA}
\mt@accent@make{\check}{CF}
% \end{macrocode}
% If we don't recognize the encoding, we have to resort to \texttt{symbols}:
% \begin{macrocode}
\else % I give up...
\DeclareMathAccent\grave{\mathord}{symbols}{"4A}
\DeclareMathAccent\acute{\mathord}{symbols}{"4B}
\DeclareMathAccent\check{\mathord}{symbols}{"4C}
\DeclareMathAccent\breve{\mathord}{symbols}{"4D}
\DeclareMathAccent\bar {\mathord}{symbols}{"4E}
\DeclareMathAccent\hat {\mathord}{symbols}{"4F}
\DeclareMathAccent\dot {\mathord}{symbols}{"50}
\DeclareMathAccent\tilde{\mathord}{symbols}{"51}
\DeclareMathAccent\ddot {\mathord}{symbols}{"52}
\def\ring#1{{#1}} % no \ring in the symbols font
\PackageError{mt11p}%
{Unknown \string\encodingdefault\space
\encodingdefault. \MessageBreak
Reverting to fixed accents
from symbols font}%
{I had to make math accents ignore alphabet
changes,\MessageBreak
because I don't recognize the
`\encodingdefault' encoding.}
\fi % 8a
\fi % 8r
\fi % OT1
\fi % T1
% \end{macrocode}
% Add the switch to \cs{noaccents@} (and check that that's defined before
% hand) and initialize the flag.
% \begin{macrocode}
\ifx\noaccents@\@undefined\let\noaccents@\@empty\fi % be safe
\g@addto@macro{\noaccents@}{\def\mt@acc@class{0}}
\def\mt@acc@class{7}
% \end{macrocode}
%
% The \texttt{symaccents} case is easy; just make everything fixed,
% and make sure \cs{noaccents@} is defined.
% \begin{macrocode}
\or % case 1, accents from symbols
\DeclareMathAccent\grave{\mathord}{symbols}{"4A}
\DeclareMathAccent\acute{\mathord}{symbols}{"4B}
\DeclareMathAccent\check{\mathord}{symbols}{"4C}
\DeclareMathAccent\breve{\mathord}{symbols}{"4D}
\DeclareMathAccent\bar {\mathord}{symbols}{"4E}
\DeclareMathAccent\hat {\mathord}{symbols}{"4F}
\DeclareMathAccent\dot {\mathord}{symbols}{"50}
\DeclareMathAccent\tilde{\mathord}{symbols}{"51}
\DeclareMathAccent\ddot {\mathord}{symbols}{"52}
\def\ring#1{{#1}} % no \ring in the symbols font
\ifx\noaccents@\@undefined\let\noaccents@\@empty\fi % be safe
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@accs}%
{The math accent setup is hosed; expect bad output.}
\fi
% \end{macrocode}
%
% Now another messy part: the \AmS~package \pkg{amsmath}
% has the macros~\cs{Hat}, etc., defined with hard-coded
% accent positions. We redo the definition to work with whatever
% encoding or accents we're using. The code below is basically
% copied from the \AmS~package. We omit this patch unless
% all of the following conditions are satisfied:
% \textit{i\/})~the macro \cs{mathaccent@} exists;
% \textit{iii\/})~the macros \cs{Hat} and~\cs{Check} exist;
% \textit{iii\/})~there exists a macro \cs{accentclass@} whose
% definition is ``7''. If all of that is~\textsc{ok}
% we pretty likely have the \pkg{amsmath}~package and the following
% should be safe. Note that \cs{mathaccent@} is a
% rather large macro that figures out what skew kern is needed
% to get double accents to line up.
% \begin{macrocode}
\ifx\mathaccent@\undefine\else % (i)
\ifx\Hat\undefine\else % (iia)
\ifx\Check\undefine\else % (iib)
\def\@tempa{7}%
\ifx\@tempa\accentclass@ % (iii)
\PackageInfo{mt11p}{amsmath detected; redefining double accents}
% \end{macrocode}
% Define fancy versions of \cs{hat},~etc., called ``\cs{Hat}'',~etc.,
% that perform skew calculations. To get a double accent say
% something like~|\Hat{\Hat{x}}|.
%
% There are two versions of the definition macro: one for
% fixed accents, another for variable ones.
% \begin{macrocode}
\def\@tempa#1#2{% variable 7/0
\def#1{\relax % write it out
\ifmmode
\def\next@{\mathaccent@{"\accentclass@#2 }}%
\else
\def\next@{\nonmatherr@{#1}}%
\fi
\next@}}
\def\@tempb#1#2{% fixed
\def#1{\relax % write it out
\ifmmode
\def\next@{\mathaccent@{"0#2 }}%
\else
\def\next@{\nonmatherr@{#1}}%
\fi
\next@}}
% \end{macrocode}
% These two accents are from the \texttt{symbols} fonts:
% \begin{macrocode}
\@tempb\Vec{245}
\@tempb\Overbar{253}
\def\Widebar{\Overbar}% synonym
% \end{macrocode}
% Go through the encodings we know and define the accents again\ldots{}
% The \texttt{symaccents}~option affects this too.
% \begin{macrocode}
\ifnum\mt@accs=0 %
\edef\reserved@a{\encodingdefault}
\def\reserved@b{T1}% a.k.a Cork or DC or EC
\ifx\reserved@a\reserved@b
\@tempa\Hat{002}
\@tempa\Check{007}
\@tempa\Tilde{003}
\@tempa\Acute{001}
\@tempa\Grave{000}
\@tempa\Dot{00A}
\@tempa\Ddot{004}
\@tempa\Breve{008}
\@tempa\Bar{009}
\else
\def\reserved@b{OT1}% DEK's
\ifx\reserved@a\reserved@b
\@tempa\Grave{012}
\@tempa\Acute{013}
\@tempa\Check{014}
\@tempa\Breve{015}
\@tempa\Bar{016}
\@tempa\Hat{05E}
\@tempa\Dot{05F}
\@tempa\Tilde{07E}
\@tempa\Ddot{07F}
\else
\def\reserved@b{8r}% TeXBase1
\ifx\reserved@a\reserved@b
\@tempa\Dot{001}
\@tempa\Breve{00B}
\@tempa\Check{010}
\@tempa\Grave{01E}
\@tempa\Hat{088}
\@tempa\Tilde{098}
\@tempa\Ddot{0A8}
\@tempa\Bar{0AF}
\@tempa\Acute{0B4}
\else
\def\reserved@b{8a}% AdobeStandard
\ifx\reserved@a\reserved@b
\@tempa\Grave{0C1}
\@tempa\Acute{0C2}
\@tempa\Hat{0C3}
\@tempa\Tilde{0C4}
\@tempa\Bar{0C5}
\@tempa\Breve{0C6}
\@tempa\Dot{0C7}
\@tempa\Ddot{0C8}
\@tempa\Check{0CF}
\else % beats me...
% \end{macrocode}
% If we don't know the encoding use fixed accents from \texttt{symbols}.
% We already gave an error message before, so just warn.
% \begin{macrocode}
\@tempb\Grave{24A}
\@tempb\Acute{24B}
\@tempb\Check{24C}
\@tempb\Breve{24D}
\@tempb\Bar{24E}
\@tempb\Hat{24F}
\@tempb\Dot{250}
\@tempb\Tilde{251}
\@tempb\Ddot{252}
\PackageWarning{mt11p}{using fixed accents for amsmath}
\fi % 8a
\fi % 8r
\fi % OT1
\fi % T1
\else % symaccents option
\@tempb\Grave{24A}
\@tempb\Acute{24B}
\@tempb\Check{24C}
\@tempb\Breve{24D}
\@tempb\Bar{24E}
\@tempb\Hat{24F}
\@tempb\Dot{250}
\@tempb\Tilde{251}
\@tempb\Ddot{252}
\fi
\fi\fi\fi\fi
% \end{macrocode}
%
% \paragraph{Upright Greek Text}
% The \texttt{mtgu}* fonts are not meant to be used as symbols,
% so we provide only text-type support: text mode font
% changing commands, and a math alphabet.
% Note that this means you \emph{can} use
% the fonts in math with correct subscript sizing, etc.; just
% say something like |\mathgr{m}| for an upright~$\mu$ (Computer
% Modern does not have such a glyph); in text |\textgr{m}| will work.
% Note also that the ligatures involving nonprinting \emph{letters}
% for getting variant forms will work inside of~\cs{mathgr},
% but \texttt{o*}, \texttt{O*} or~\texttt{e*} will not, which is why we
% added some ligatures to the \file{tfm}~file~(Sec.\,\ref{par:mathgr}).
% The text commands are
% non-fragile, because the components of the macros are robust.
% See~Sec.\,\ref{unused} for making upright Greek letters
% into math \textit{symbols}\@.
% Trap the \texttt{nomathgr} case.
% \begin{macrocode}
\def\greekshape{\fontencoding{LmtG}\selectfont}%
\DeclareTextFontCommand{\textgr}{\greekshape}
\ifcase\mt@mgr % case 0
\def\mathgr#1{\PackageError{mt11p}{upright Greek not loaded for math}%
{Don't use the nomathgr option.}%
\hbox{\greekshape #1}}% as good as anything else
\or % case 1
\DeclareMathAlphabet\mathgr {LmtG}{mtg}{\mddefault}{\updefault}
\SetMathAlphabet \mathgr {normal}{LmtG}{mtg}{\mddefault}{\updefault}
\SetMathAlphabet \mathgr {bold} {LmtG}{mtg}{\bfdefault}{\updefault}
\SetMathAlphabet \mathgr {heavy} {LmtG}{mtg}{\hvdefault}{\updefault}
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@mgr}%
{The \string\mathgr\space setup is hosed.}
\fi
\ifnum\mt@sub=1 %
\DeclareFontShape{LmtG}{mtg}{\hvdefault}{\updefault}%
{<->ssub*mtg/\bfdefault/\updefault}{}% heavy mtgu SUBS
\fi
% \end{macrocode}
% The MathT\i me distribution defines the~\cs{gk} font switch macro,
% roughly equivalent to~\cs{greekshape}; we don't.
%
% \paragraph{\cs{hbar}} needs to be defined a bit carefully.
% The plain\TeX{} definition is just a macron (bar)
% accent with an~`$h$' backed up into it:
% |{\mathchar'26\mkern-9muh}|.
% This is pretty horrible, and doesn't work in Times,
% no matter what \cs{mkern} you use. The definition below
% actually looks rather decent in all math versions.
% We define a private bar accent to be taken from the
% \texttt{symbols}~math family, since we don't know what the
% \cs{bar} accent is (it might follow math alphabets changes).
% Force the~`\textit h' to be taken from~\texttt{letters}.
% \begin{macrocode}
\ifnum\mt@hbar=1 %
\DeclareMathSymbol \mt@hbar@macron {\mathord}{symbols}{"4E}%
\DeclareMathSymbol \mt@hbar@h {\mathord}{letters}{`\h}
\def\hbar@macron#1{\hbox to\z@{\m@th\raisebox{-0.16\height}%
{$\csname#1style\endcsname
\mkern.65mu\mt@hbar@macron$}\hss}}
\def\hbar{\mathord{\mathchoice{\hbar@macron{display}}%
{\hbar@macron{text}}%
{\hbar@macron{script}}%
{\hbar@macron{scriptscript}}%
\mt@hbar@h}}
\fi
% \end{macrocode}
%
% \paragraph{\cs{dag}\@, \cs{ddag}\@, \cs{S} and \cs{P}}
% First a comment: the only reason we are dealing with these symbols
% at all is that they historically came from math
% (\texttt{OMS})~fonts;
% it would be easier to use a text symbol font, but
% such a font is not yet commonly in use,
% so we hack around with~\texttt{8r}. If you do have
% such a setup, the \texttt{nodag}~option will
% skip all of the stuff below and not touch
% these four symbols, but check that the setup you use
% does not assume \cs{fam2}~is~\texttt{OMS}\@.
%
% The default is to fetch the symbols from~\texttt{8r}.
% We do not use anything else from~\texttt{8r},
% in particular we don't touch \cs{textregistered},
% \cs{texttrademark},~etc.
% The \file{8r.sty}~``emulation'' included herein only deals with
% the four symbols.
%
% The format files defines these to use text or math
% versions of the character commands by using definitions similar
% to\footnote{Lines not proceeded by a line number are a part of this
% description and do not wind up in the \file{sty}~file!}
% \begin{verbatim}
% \def\P{\ifmmode\mathparagraph\else\textparagraph\fi}
% \end{verbatim}
% (The actual definition is made robust.) The text versions have
% declared defaults taken from~\texttt{OMS}\@;
% the math versions were
% \cs{mathchar}s pointing to the (\texttt{OMS})~\texttt{symbols}
% math family. We do the text versions first,
% since the handling of the math versions depends on them.
%
% We take the text symbols from \texttt{8r}~fonts, unless we're told
% not to (or unless we're skipping the whole thing).
% The format file makes the default test encoding for these
% four symbols~\texttt{OMS}, so we don't have to do anything.
% \texttt{8r}~fonts.
% \begin{macrocode}
\ifcase\mt@eightR % case 0
\PackageInfo{mt11p}{Retaining CM for \string\textdagger, etc}%
% \end{macrocode}
% We have to be careful here, because the use of
% \texttt{8r}~fonts is ``non-standard''. So check if we have an
% \texttt{8r}~\file{.fd}~file for \cs{rmdefault}\@. If so, check for
% \file{8r.sty}, read that, and (re)declare the four text commands we need.
% If there's no \file{8r.sty}\@, supply just enough to get to the
% four symbols we need. We assume the TFM~files \emph{do exist}
% (they have to, because MathT\i me virtual fonts use them),
% but we try loading the \file{tfm}~file just to make sure.
% \begin{macrocode}
\or % case 1
\IfFileExists{8r\rmdefault.fd}%
{\IfFileExists{8r.sty}%
{\PackageInfo{mt11p}%
{MT math using 8r.sty}%
\RequirePackage{8r}%
\DeclareTextSymbol{\textsection}{8r}{167}% section
\DeclareTextSymbol{\textparagraph}{8r}{182}% paragraph
\DeclareTextSymbol{\textdagger}{8r}{134}% dagger
\DeclareTextSymbol{\textdaggerdbl}{8r}{135}% daggerdbl
\DeclareTextSymbolDefault{\textsection}{8r}%
\DeclareTextSymbolDefault{\textparagraph}{8r}%
\DeclareTextSymbolDefault{\textdagger}{8r}%
\DeclareTextSymbolDefault{\textdaggerdbl}{8r}%
}% using 8r.sty
{\PackageWarning{mt11p}%
{No file 8r.sty found. Winging it}%
\DeclareFontEncoding{8r}{}{\no@accents}%
\DeclareFontSubstitution{8r}{\rmdefault}%
{\mddefault}{\updefault}%
\DeclareTextSymbol{\textsection}{8r}{167}% section
\DeclareTextSymbol{\textparagraph}{8r}{182}% paragraph
\DeclareTextSymbol{\textdagger}{8r}{134}% dagger
\DeclareTextSymbol{\textdaggerdbl}{8r}{135}% daggerdbl
\DeclareTextSymbolDefault{\textsection}{8r}%
\DeclareTextSymbolDefault{\textparagraph}{8r}%
\DeclareTextSymbolDefault{\textdagger}{8r}%
\DeclareTextSymbolDefault{\textdaggerdbl}{8r}%
}% faked 8r.sty
\input{8r\rmdefault.fd}%
}% 8r\rmdefault.fd was available
{\PackageWarning{mt11p}%
{No fd file for 8r-coded \string\rmdefault\space
found; guessing TFM file names}%
% \end{macrocode}
% If there's no \file{.fd}~file for \cs{rmdefault}
% we have to wing it. Just declare the
% \texttt{8r}~fonts for \cs{rmdefault} text family.
% (That's all you would have with Computer Modern fonts anyway,
% and since we're here, no elaborate setup exists on the system.)
% Hopefully the TFM~files are available and they have the
% expected names. This will work when someone has the
% \texttt{8r}-based fonts installed,
% but no support for using the raw fonts. To catch the fatal case right now,
% we just load the \texttt{8r}~font by hand and put a somewhat illuminating
% comment on the same line in case \TeX~complains.
% \begin{macrocode}
\font\preloaded=\rmdefault r8r\relax % next time try the `no8r' option
\let\preloaded\undefined
\DeclareFontEncoding{8r}{}{\no@accents}%
\DeclareFontFamily{8r}{\rmdefault}{\hyphenchar\font=-1 }%
\DeclareFontSubstitution{8r}{\rmdefault}{\mddefault}{\updefault}%
\DeclareFontShape{8r}{\rmdefault}{\mddefault}{\updefault}%
{<->\rmdefault r8r}{}%
\DeclareFontShape{8r}{\rmdefault}{\bfdefault}{\updefault}%
{<->\rmdefault b8r}{}%
\DeclareFontShape{8r}{\rmdefault}{\mddefault}{\itdefault}%
{<->\rmdefault ri8r}{}%
\DeclareFontShape{8r}{\rmdefault}{\bfdefault}{\itdefault}%
{<->\rmdefault bi8r}{}%
\DeclareTextSymbol{\textsection}{8r}{167}% section
\DeclareTextSymbol{\textparagraph}{8r}{182}% paragraph
\DeclareTextSymbol{\textdagger}{8r}{134}% dagger
\DeclareTextSymbol{\textdaggerdbl}{8r}{135}% daggerdbl
\DeclareTextSymbolDefault{\textsection}{8r}%
\DeclareTextSymbolDefault{\textparagraph}{8r}%
\DeclareTextSymbolDefault{\textdagger}{8r}%
\DeclareTextSymbolDefault{\textdaggerdbl}{8r}%
}% no 8r\rmdefault.fd
% \end{macrocode}
% Perhaps we're skipping this altogether.
% \begin{macrocode}
\or % case 2
\PackageInfo{mt11p}{not doing anything with \string\textdagger, etc.}
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@eightR}%
{\string\dag, \string\ddag, \string\S\space and
\string\P\space are probably hosed.}
\fi
% \end{macrocode}
%
% If we're told not to use \texttt{8r}~fonts
% (\cs{mt@eightR}$\,=0$) and
% if \cs{mt@cal}$\,=0$, we have no choice but to get
% \texttt{OMS}~as a `private' math alphabet
% and fetch the symbols from there. The auxiliary macro
% \cs{mt@al@hexsy} gets defined later.
% \begin{macrocode}
\ifcase\mt@eightR % 0: avoid 8r
\ifnum\mt@cal=0 %
\DeclareMathAlphabet\mt@sy{OMS}{cmsy}{m}{n}
\SetMathAlphabet \mt@sy{normal}{OMS}{cmsy}{m}{n}
\SetMathAlphabet \mt@sy{bold} {OMS}{cmsy}{b}{n}
\SetMathAlphabet \mt@sy{heavy} {OMS}{cmsy}{\hvdefault}{\updefault}
\def\mathsection {\mt@al@hexsy\mt@sy{78}}
\def\dagger {\mt@al@hexsy\mt@sy{79}}
\def\ddagger {\mt@al@hexsy\mt@sy{7A}}
\def\mathparagraph{\mt@al@hexsy\mt@sy{7B}}
% \end{macrocode}
% (Substitutions have already been declared.)
% If \cs{mt@cal}$\,>0$ we just use~\cs{mathcal}, which
% will be~\texttt{OMS}.
% \begin{macrocode}
\else % \mt@cal>0
\def\mathsection {\mt@al@hexsy\mathcal{78}}
\def\dagger {\mt@al@hexsy\mathcal{79}}
\def\ddagger {\mt@al@hexsy\mathcal{7A}}
\def\mathparagraph{\mt@al@hexsy\mathcal{7B}}
\fi
% \end{macrocode}
% If it's~\textsc{ok} to use the \texttt{8r}~fonts, make
% them a ``private'' math alphabet.
% Here we do need substitution declarations. The \file{.fd}~file
% has already been read (or the data supplied).
% \begin{macrocode}
\or % 1: 8r is ok
\DeclareMathAlphabet\mt@sy{8r}{\rmdefault}{\mddefault}{\updefault}
\SetMathAlphabet \mt@sy {normal}{8r}%
{\rmdefault}{\mddefault}{\updefault}
\SetMathAlphabet \mt@sy {bold} {8r}%
{\rmdefault}{\bfdefault}{\updefault}
\SetMathAlphabet \mt@sy {heavy} {8r}%
{\rmdefault}{\hvdefault}{\updefault}
\def\mathparagraph{\mt@al@hexsy\mt@sy{B6}}
\def\dagger {\mt@al@hexsy\mt@sy{86}}
\def\ddagger {\mt@al@hexsy\mt@sy{87}}
\def\mathsection {\mt@al@hexsy\mt@sy{A7}}
\ifnum\mt@sub=1 %
\DeclareFontShape{8r}{\rmdefault}{\hvdefault}{\updefault}% heavy \rm in 8r SUBS
{<->ssub*\rmdefault/\bfdefault/\updefault}{}
\fi
% \end{macrocode}
% Or skip it\ldots
% \begin{macrocode}
\or % 2: nothing
\PackageInfo{mt11p}{not doing anything with (math) \string\dagger, etc.}
\fi
% \end{macrocode}
% Actually, the code above is suboptimal in the sense that is \cs{encodingdefault}
% happens to be~\texttt{8r}, we waste a math family. Hopefully, no heavy
% math user is running~\texttt{8r}\ldots
%
% \subsection{Auxiliary macro}
% In a few instances we need a macro to get
% a specific character from a particular math alphabet,
% i.e., some thing like
% ``\hbox{\cs{math}\textit{alph}\texttt{\char`\{}\cs{char}\relax
% \texttt{"\itshape yy}\texttt{\char`\}}}''. You can't do that
% though, you would get \cs{mathchar"00yy}. The \TeX{} math
% class~\texttt7 and \cs{fam} are used to get letters and digits
% from math alphabets, so we can just say
% \hbox{\cs{math}\textit{alph}\texttt{\char`\{}\cs{mathchar}\relax
% \texttt{"70\itshape yy}\texttt{\char`\}}}.
% The macro below is shorthand for the operation
% ``set character $\langle\mathit{slot}\rangle$ from the font of
% the math alphabet \cs{math}\textit{alph\/}''.
% \begin{macrocode}
\def\mt@al@hexsy#1#2{#1{\mathchar"70#2}}
% \end{macrocode}
% where \texttt{\#1}~is the math alphabet macro (e.g.,~\cs{mathcal})
% and \texttt{\#2}~is the hexadecimal number of the slot (no double quote).
%
% \subsection{Assorted Fixes, Odds \&{} Ends}
% Here are a few assorted (sordid\texttt{\small;-)}) fixes.
%
% \paragraph{Active Underscore}
% Make the underscore character
% active so we can kern to
% \texttt j,~\texttt f~and~\texttt p
% in subscripts. This is rather messy
% and probably breaks on occasion. The code
% was basically copied from the MathT\i me distribution.
% \begin{macrocode}
\ifcase\mt@sb % case 0
\PackageInfo{mt11p}{not using active underscore}
\or % case 1
\ifnum\the\catcode`\_=8 %
\ifnum\the\mathcode`\_=32768 % "8000
\PackageInfo{mt11p}{redefining the underscore \string\catcode}
\PackageInfo{mt11p}{\string\catcode\space of underscore made 12 (other)}
\def\space@.{\futurelet\space@\relax}
\space@. %
\let\mt@orig@sb_
\catcode`\_=\active
\def_{\ifmmode\expandafter\sb@\else\expandafter\mt@orig@sb\fi}
\let\sb_
\def\sb@#1{\mt@orig@sb{\futurelet\next\sb@@#1}}
\def\sb@@{\ifx\next\space@\def\next@. {\futurelet\next\sb@@}%
\else
\def\next@.{\ifx\next j\jadjust
\else\ifx\next f\jadjust
\else\ifx\next p\mkern-\@ne mu%
\fi\fi\fi}%
\fi
\next@.}
\@makeother\_
\else % \the\mathcode`\_<>"8000 !
\PackageWarning{mt11}{underscore did not have mathcode "8000;
\MessageBreak Underscore not made active}
\fi
\else % \the\catcode`\_ <>8 !
\PackageWarning{mt11}{underscore was not of category 8;\MessageBreak
Underscore not made active}
\fi
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@sb}%
{Underscore not made active.}
\fi
% \end{macrocode}
% \cs{jadjust} is just a small negative kern:
% \begin{macrocode}
\def\jadjust{\mkern-\tw@ mu}
% \end{macrocode}
%
% \paragraph{\cs{vdots}\@, \cs{ddots} and \cs{angle}}
% might be missing \cs{m@th}s in the \cs{hbox}es.
% \begin{macrocode}
\def\vdots{\vbox{\baselineskip4\p@\lineskiplimit\z@\kern6\p@
\hbox{$\m@th.$}\hbox{$\m@th.$}\hbox{$\m@th.$}}}
\def\ddots{\mathinner{%
\mkern1mu\raise7\p@\vbox{\kern7\p@\hbox{$\m@th.$}}\mkern2mu
\raise4\p@\hbox{$\m@th.$}\mkern2mu%
\raise\p@\hbox{$\m@th.$}\mkern1mu}}
% \end{macrocode}
%
% The plain\TeX{} definition of~\cs{angle} has an \cs{hrule}~height
% of~$0.34\mathrm{pt}$; the MathT\i me distribution says~``$0.48\mathrm{pt}$''.
% Both of those numbers are suspiciously close to the default rule thickness
% of the (scaled) extention font.
% We define \cs{angle} to use the default rule thickness, i.e.,
% \cs{fontdimen~8} of the appropriate extention (family~\texttt3)
% font. This does not work in \cs{scriptscriptstyle}, but that
% case is unlikely to occur. The \file{.tfm}~files have been
% slightly changed to make \cs{fontdimen~8} really be the rule
% thickness implied, e.g., by the height of the root glyphs.
% \begin{macrocode}
\def\mt@angle#1#2{{\vbox{\ialign{$\m@th#1##$\crcr
\not\mathrel{\mkern14mu}\crcr
\noalign{\nointerlineskip}%
\mkern2.5mu\leaders\hrule height1.05\fontdimen8#2 3 %
\hfill\mkern2.5mu\crcr}}}}
\def\angle{\mathchoice{\mt@angle{\scriptstyle}{\scriptfont}}
{\mt@angle{\scriptstyle}{\scriptfont}}
{\mt@angle{\scriptscriptstyle}{\scriptscriptfont}}
{\mt@angle{\scriptscriptstyle}{\scriptscriptfont}}}
% \end{macrocode}
%
% \paragraph{The Tie Accent} Usually, the \cs{t}~accent~(\t oo)
% is taken from an~\texttt{OML}~font (position~|"7F|).
% MathT\i me has the tie in \texttt{symbols},
% so we take it from there, and make it the dafault.
% \begin{macrocode}
\DeclareTextAccent{\t}{LmtS}{"41}
\DeclareTextAccentDefault{\t}{LmtS}
% \end{macrocode}
%
% \paragraph{\cs{textcircled}} The large-ish circle for
% constructing~\copyright, \textregistered,~etc.,
% is usually taken from~\texttt{OMS}. The \texttt{LmtS}~fonts have
% the same glyph in the same slot, so just redefine
% the default to point to~\texttt{LmtS}.
% A text symbol font might have~\copyright, etc., available as single
% characters, e.g., the raw \texttt{8r}~fonts do, but
% it's not our business to deal with all that.
% \begin{macrocode}
\DeclareTextAccentDefault{\textcircled}{LmtS}
\DeclareTextCommand{\textcircled}{LmtS}[1]{{%
\ooalign{\hfil\raise.07ex\hbox{\upshape#1}\hfil\crcr\char13}}}
% \end{macrocode}
%
% \paragraph{Misc.~text symbols} Some text versions
% of a few symbols (\cs{text}$\langle\!\mathit{symb}\rangle$)
% point to~\texttt{OM}* encodings; change the defaults.
% Those symbols that exists in~\texttt{T1} will
% be taken from~\texttt{T1} in text if that's
% the \cs{encodingdefault}. Try to be nice even if
% \cs{encodingdefault}~is \texttt{OT1} and point
% the defaults to MathT\i me,
% so we don't needlessly resort to Computer Modern.
% Noone uses these definitions directly, but macros might.
% \begin{macrocode}
\DeclareTextSymbol{\textless}{LmtL}{60}% afm names
\DeclareTextSymbol{\textgreater}{LmtL}{62}
\DeclareTextSymbol{\textperiodcentered}{LmtS}{1}
\DeclareTextSymbol{\textasteriskmath}{LmtS}{3}% centered
\DeclareTextSymbol{\textopenbullet}{LmtS}{14}
\DeclareTextSymbol{\textbullet}{LmtS}{15}
\DeclareTextSymbol{\textbraceleft}{LmtS}{102}
\DeclareTextSymbol{\textbraceright}{LmtS}{103}
\DeclareTextSymbol{\textbar}{LmtS}{106}
\DeclareTextSymbol{\textbackslash}{LmtS}{110}
% \end{macrocode}
% Make these the default:
% \begin{macrocode}
\DeclareTextSymbolDefault{\textperiodcentered}{LmtS}
\DeclareTextSymbolDefault{\textasteriskmath}{LmtS}
\DeclareTextSymbolDefault{\textopenbullet}{LmtS}
\DeclareTextSymbolDefault{\textbullet}{LmtS}
\DeclareTextSymbolDefault{\textbraceleft}{LmtS}
\DeclareTextSymbolDefault{\textbraceright}{LmtS}
\DeclareTextSymbolDefault{\textbar}{LmtS}
\DeclareTextSymbolDefault{\textbackslash}{LmtS}
\DeclareTextSymbolDefault{\textless}{LmtL}
\DeclareTextSymbolDefault{\textgreater}{LmtL}
% \end{macrocode}
%
% \paragraph{Oldstyle Digits}
% (See~Sec.\,\ref{OSdig}).
% MathT\i me has no oldstyle digits, so we
% grab the ones from~\texttt{OML}\@.
% I'm not sure it's useful to have this command
% in math mode, but we might as well do that too, though not via
% a math family---we define a private \cs{math@OS}~alphabet instead. Read
% the \texttt{.fd}~file, in case the format did no preloading.
% \texttt{nomathOS} disables the math family.
% \begin{macrocode}
\ifcase\mt@osdg % case 0
\def\math@OS#1{\PackageError{mt11p}{oldstyle digits not loaded for math}%
{Don't use the nomathOS option.}%
{\hbox{\oldstylenums{#1}}}}% as good as anything else
\or % case 1
\DeclareMathAlphabet\math@OS {OML}{cmm}{m}{it}
\SetMathAlphabet \math@OS {normal}{OML}{cmm}{m}{it}
\SetMathAlphabet \math@OS {bold} {OML}{cmm}{b}{it}
\SetMathAlphabet \math@OS {heavy} {OML}{cmm}{\hvdefault}{\itdefault}
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@osdg}%
{Oldsyle digits in math are hosed.}
\fi
\ifnum\mt@sub=1 %
\InputIfFileExists{omlcmm.fd}\relax % grrr...
{\InputIfFileExists{OMLcmm.fd}\relax
{\PackageError{mt11p}{No OMLcmm.fd file}%
{Your are missing a basic distribution file. %
Check the LaTeX installation.}}}
\DeclareFontShape{OML}{cmm}{\hvdefault}{\itdefault}%
{<->ssub*cmm/b/it}{}% heavy cmmi SUBS
\fi
% \end{macrocode}
% The \cs{oldstylenums} macro just picks between
% using the \texttt{OML}~font
% as a text font, or the \cs{math@OS} math alphabet. If the argument
% contains things other than digits, the result will be amusing\ldots
% \begin{macrocode}
\def\oldstylenums#1{%
\ifmmode
\math@OS{#1}%
\else
{\usefont{OML}{cmm}{\f@series}{it}#1}%
\fi}
% \end{macrocode}
%
% \subsection{\cs{boldsymbol} and \cs{heavysymbol}}
% As mentioned above, we assumed that formul\ae{}
% do not require simultaneous access to fonts in different math versions,
% or, more precisely, that a single math list need not contain
% several weights of, e.g., the \texttt{symbols} fonts.
% In other words, that it is not worth while to
% \emph{simultaneously} have
% several weights of, e.g., the \texttt{symbols} fonts available as
% ``\cs{mathchar}s''. Instead we fetch the \AmS~package
% \pkg{amsbsy}, which defines a ``\cs{boldsymbol}''~macro
% and define a similar ``\cs{heavysymbol}'' macro.
% Don't do it if we're told not to, or if we can't find
% \file{amsbsy.sty} and don't overwrite existing definitions.
% \begin{macrocode}
\ifcase\mt@bsy % case 0
\providecommand{\boldsymbol}[1]{\PackageError{mt11p}%
{Get or load the package amsbsy
to use \string\boldsymbol}{See above.}#1\relax}
\providecommand{\heavysymbol}[1]{\PackageError{mt11p}%
{Get or load the package amsbsy
to use \string\heavysymbol}{See above.}#1\relax}
\providecommand{\normalsymbol}[1]{\PackageError{mt11p}%
{Get or load the package amsbsy
to use \string\normalsymbol}{See above.}#1\relax}
\or % case 1
\IfFileExists{amsbsy.sty}%
{\RequirePackage{amsbsy}%
\DeclareRobustCommand{\heavysymbol}[1]{%
\begingroup
\let\@nomath\@gobble \mathversion{heavy}%
\math@atom{##1}{%
\mathchoice
{\hbox{$\m@th\displaystyle##1$}}%
{\hbox{$\m@th\textstyle##1$}}%
{\hbox{$\m@th\scriptstyle##1$}}%
{\hbox{$\m@th\scriptscriptstyle##1$}}}%
\endgroup}%
\DeclareRobustCommand{\normalsymbol}[1]{%
\begingroup
\let\@nomath\@gobble \mathversion{normal}%
\math@atom{##1}{%
\mathchoice
{\hbox{$\m@th\displaystyle##1$}}%
{\hbox{$\m@th\textstyle##1$}}%
{\hbox{$\m@th\scriptstyle##1$}}%
{\hbox{$\m@th\scriptscriptstyle##1$}}}%
\endgroup}%
}% using amsbsy.sty
{\PackageError{mt11p}{No file `amsbsy.sty' found}%
{Use the `nobsy' option if you don't have or \MessageBreak
don't want the AMS \string\boldsymbol\space macro.}
\let\boldsymbol\@firstofone
\let\heavysymbol\@firstofone
\let\normalsymbol\@firstofone
}% no amsbsy.sty
\else % oops
\PackageError{mt11p}{PANIC: Unexpected value of \string\mt@bsy}%
{The \string\boldsymbol\space macro is probably hosed.}
\fi
% \end{macrocode}
%
% \subsection{Examples of new math symbol definitions}
% \label{unused}
% Note that code in this section, and some of the code in
% the following sections is not included in the package
% \file{.sty}~file. It's meant as an example of things that
% could be put into a \file{mt11p.cfg}~file.
%
% Here follow a few examples of defining more
% math symbols in order to easily and efficiently
% mix symbols normally found in different math versions.
% Note that it is rarely worth it perform such
% definitions---not even the \AmS~document classes
% do it. For more details about NFSS see the
% standard \LaTeX{} documentation file~\file{fntguide.tex}.
%
% \paragraph{Upright lower case Greek letters as symbols.}
% The font set includes a \texttt{letters} font with
% upright lower case Greek letters~(l.c.G.)\@.
% Usually \textit{italic\/} or \textsl{slanted\/} l.c.G.~are used as
% symbols, though
% recently it's possible see the \textsc{Post\-Script}
% \texttt{Symbols}~font
% (upright; noone bothers to skew it)
% used a lot, but that is a more a sign of weak software.
% The upright l.c.G.~letters are made available in both text and
% math (Sec.\,\ref{par:mathgr}).
% It would be possible to make them available as math
% \emph{symbols} by using the code below.
% (The code is not available as an option, because there is no common definition
% for how the symbols should be named; for illustration we call the symbols
% \cs{upalpha}\@, \cs{upbeta}\@, etc.)
%
% First define a math symbol font:
% \begin{verbatim}
% \DeclareSymbolFont{upgreek}{LmtL}{mtl}{\mddefault}{\uidefault}
% \end{verbatim}
% Don't redefine \cs{mathgr} to point to the \texttt{upgreek}~family,
% because the encodings aren't even close.
%
% Next set the math versions:
% \begin{verbatim}
% \SetSymbolFont{upgreek}{normal}{LmtL}{mtl}{\mddefault}{\uidefault}
% \SetSymbolFont{upgreek}{bold}{LmtL}{mtl}{\bfdefault}{\uidefault}
% \SetSymbolFont{upgreek}{heavy}{LmtL}{mtl}{\hvdefault}{\uidefault}
% \end{verbatim}
% If this step is omitted, the \texttt{upgreek} symbol font family
% will be the same in all math versions.
%
% Lastly, make the symbol declarations (choose names that don't conflict with
% existing symbols):
% \begin{verbatim}
% \DeclareMathSymbol{\upalpha}{\mathord}{upgreek}{"0B}
% \DeclareMathSymbol{\upbeta}{\mathord}{upgreek}{"0C}
% \DeclareMathSymbol{\upgamma}{\mathord}{upgreek}{"0D}
% \DeclareMathSymbol{\updelta}{\mathord}{upgreek}{"0E}
% \DeclareMathSymbol{\upepsilon}{\mathord}{upgreek}{"0F}
% \DeclareMathSymbol{\upzeta}{\mathord}{upgreek}{"10}
% \DeclareMathSymbol{\upeta}{\mathord}{upgreek}{"11}
% \DeclareMathSymbol{\uptheta}{\mathord}{upgreek}{"12}
% \DeclareMathSymbol{\upiota}{\mathord}{upgreek}{"13}
% \DeclareMathSymbol{\upkappa}{\mathord}{upgreek}{"14}
% \DeclareMathSymbol{\uplambda}{\mathord}{upgreek}{"15}
% \DeclareMathSymbol{\upmu}{\mathord}{upgreek}{"16}
% \DeclareMathSymbol{\upnu}{\mathord}{upgreek}{"17}
% \DeclareMathSymbol{\upxi}{\mathord}{upgreek}{"18}
% \DeclareMathSymbol{\uppi}{\mathord}{upgreek}{"19}
% \DeclareMathSymbol{\uprho}{\mathord}{upgreek}{"1A}
% \DeclareMathSymbol{\upsigma}{\mathord}{upgreek}{"1B}
% \DeclareMathSymbol{\uptau}{\mathord}{upgreek}{"1C}
% \DeclareMathSymbol{\upupsilon}{\mathord}{upgreek}{"1D}
% \DeclareMathSymbol{\upphi}{\mathord}{upgreek}{"1E}
% \DeclareMathSymbol{\upchi}{\mathord}{upgreek}{"1F}
% \DeclareMathSymbol{\uppsi}{\mathord}{upgreek}{"20}
% \DeclareMathSymbol{\upomega}{\mathord}{upgreek}{"21}
% \DeclareMathSymbol{\upvarepsilon}{\mathord}{upgreek}{"22}
% \DeclareMathSymbol{\upvartheta}{\mathord}{upgreek}{"23}
% \DeclareMathSymbol{\upvarpi}{\mathord}{upgreek}{"24}
% \DeclareMathSymbol{\upvarrho}{\mathord}{upgreek}{"25}
% \DeclareMathSymbol{\upvarsigma}{\mathord}{upgreek}{"26}
% \DeclareMathSymbol{\upvarphi}{\mathord}{upgreek}{"27}
% \DeclareMathSymbol{\upvarkappa}{\mathord}{upgreek}{'176}
% \end{verbatim}
% That is the complete set; of course, you need not define them all.
%
% Additional \textbf{math accents} can be defined
% in an entirely analogous way by using \cs{DeclareMathAccent}.
% NFSS~can define two types of accents:
% \cs{mathord}, which are taken from a fixed font, and
% \cs{mathalpha}, which change with math alphabets.
% A specially declared accent will probably be~\cs{mathord};
% do not use~\cs{mathalpha} unles you know what you're doing.
% An example for
% a math symbol font family called~\texttt{boldsyms}
% which has an accent in slot~\texttt{"52} is
% \begin{verbatim}
% \DeclareMathAccent{\boldddot}{\mathord}{boldsyms}{"52}
% \end{verbatim}
%
% \paragraph{Declaring additional math delimiters}
% Although any combination of symbols from various
% math versions can be achieved through the use of
% \cs{boldsymbol} and \cs{heavysymbol}, it can be
% inefficient and awkward to have to do so frequently.
% Particularly tedious are delimiters,
% which either require freezing their
% size~(|\boldsymbol{\Bigg(}|), or cryptic constructs
% involving~\cs{vphantom}s.
% In this case it is also possible to define special math symbols
% that work as expected. The procedure is similar to the one
% for declaring upright Greek letters as symbols, an outline follows.
% \TeX's math workings are described in D.\,E.\,Knuth's
% \emph{The \TeX book} and, e.g., in \emph{\TeX~by topic}
% by V.\,Eijkhout.
%
% First declare a new symbol font, e.g.,
% \begin{verbatim}
% \DeclareSymbolFont{hvlargesymbols}{OMX}{mtx}{\hvdefault}{\updefault}
% \end{verbatim}
% Next define the delimiter itself:
% \begin{center}
% \centerline{\cs{DeclareMathDelimiter}\brarg{cmd}\brarg{math\,type}%
% \brarg{small}\brarg{small\,slot}\brarg{large}\brarg{large\,slot}}
% \end{center}
% where \brarg{small} and \brarg{large} are two symbol font math families.
% If you're defining a new delimiter from some special font,
% you probably only have one variant (or more precisely one chain
% of linked delimiters).
% This command does not allow making a variant null~(\texttt{000})
% without assuming that \texttt{operators} is math family~\texttt0,
% but it is possible to make sure the small variant ``succeeds''
% in finding a delimiter
% (e.g., an extensible delimiter will always terminate a search),
% so that the large variant is irrelevant.
%
% For example, assuming there is a math symbol font family
% called \texttt{hvlargesymbols} (see above),
% \cs{lbraceHV} and \cs{rbraceHV}
% will produce correctly sized heavy braces:
% \begin{verbatim}
% \DeclareMathDelimiter{\lbraceHV}{\mathopen}{hvlargesymbols}{"08}%
% {hvlargesymbols}{"08}
% \DeclareMathDelimiter{\lbraceHV}{\mathclose}{hvlargesymbols}{"09}%
% {hvlargesymbols}{"09}
% \end{verbatim}
% (The small and large variants are identical, but since the small
% one will always
% succeed---the last delimiter in the chain is extendible---the
% large one never comes into play.)
% \cs{delcode}s are not normally changed.
%
% \paragraph{Running out of math families}
% \TeX{} with NFSS is limited to 16~math font families
% in any single math version, and
% it's not all too difficult
% to run into the limit. With the default options,
% it's possible to load \emph{four} more math symbol fonts/alphabets.
% (A \cs{DeclareSymbolFont} and an accompanying
% \cs{DeclareSymbolFontAlphabet} take up one family.)
% The options \texttt{nomathgr} and \texttt{nomathOS}
% will each cause one less math family to be used.
% The \texttt{cmcal}~option uses one math family more
% than \texttt{mtcal} or~\texttt{nomtms} (as long as \texttt{8r}
% is~\textsc{ok} for the four infamous symbols).
% If you do run out of math families, declare a new math version,
% or define infrequently used symbols as explicit font/character
% references in text mode (in an~\cs{hbox}), possibly
% wrapped in \cs{mathchoice} and an explicit class command,
% e.g.,~\cs{mathbin}. See~\file{fntguide.tex}.
%
% \subsection{Unused glyphs}\label{realunused}
% This package leaves no unique MathT\i me glyphs inaccessible.
% A few glyphs are repeated more than once in a font, or are present
% in more than one font. It makes no difference to \TeX~whether
% a font is taken from \texttt{letters} or~\texttt{symbols}.
%
% It would be possible to take the small square root sign
% from the \texttt{largesymbols}
% font, rather than from the \texttt{symbols} font.
% That \texttt{largesymbols} radical
% (\texttt{"9F}) is, however, completely identical
% to the one in \texttt{symbols}, so it's
% rather pointless. The command would be
% \begin{verbatim}
% \DeclareMathRadical{\sqrtsign}{largesymbols}{"9F}{largesymbols}{"70}
% \end{verbatim}
% The extra root sign in \texttt{mtsyn} (not present
% in~\texttt{mtsy}) is identical to the usual one, except for a
% vertical shift. Since a `radical' sign is normally of
% class~\texttt1~(\cs{mathop}),
% it gets vertically centered anyway. This alternate radical glyph could be
% used by defining something like
% \begin{verbatim}
% \DeclareMathSymbol{\varsurd}{\mathop}{symbols}{"84}
% \end{verbatim}
%
% \subsection{\texttt{muskip} Assignments} A little smaller than for Computer Modern.
% The original setting is
% \begin{verbatim}
% \thinmuskip=3mu
% \medmuskip=4mu plus 2mu minus 4mu
% \thickmuskip=5mu plus 5mu
% \end{verbatim}
% and we'll use
% \begin{macrocode*}
\thinmuskip=2mu \relax
\medmuskip=2.5mu plus 1mu minus 1mu \relax
\thickmuskip=4mu plus 1.5mu minus 1mu \relax
% \end{macrocode*}
%
% \subsection{Local Configuration File}
% Provide a hook to load anything important or complicated
% enough to be inappropriate for the main input file.
% \begin{macrocode}
\InputIfFileExists{mt11p.cfg}%
{\typeout{**************************************^^J%
* Local config file mt11p.cfg loaded *^^J%
**************************************}%
}{}
% \end{macrocode}
%
% \subsection{Cleanup}
% Do the resizing now:
% \begin{macrocode}
\mt@exit
% \end{macrocode}
% Restore any crazy catcodes.
% \begin{macrocode}
\catcode`\"\mt@quotedbl
\catcode`\'\mt@quotesinglr
\catcode`\:\mt@colon
\catcode`\?\mt@question
\catcode`\;\mt@semicolon
\catcode`\!\mt@exclam
% \end{macrocode}
% Make the various scratch macros, etc., we used \cs{undefined},
% but keep \cs{mt@cal} and \cs{mt@ops}, in case we need to
% decide something based on them. A `real' input file should
% not do such a thing, but a demo document might.
% \begin{macrocode}
\let\mt@quotedbl \undefined
\let\mt@quotesinglr\undefined
\let\mt@colon \undefined
\let\mt@question \undefined
\let\mt@semicolon \undefined
\let\mt@exclam \undefined
\let\mt@exit \undefined
\let\MathTimeSizes\undefine
\let\mt@enc \undefined
\let\times@style \undefined
\let\mt@fd@check \undefined
\let\mt@accs \undefined
\let\mt@accent@make\undefined
\let\mt@hbar \undefined
\let\mt@eightR \undefined
\let\mt@bsy \undefined
\let\mt@sb \undefined
\let\mt@mgrs \undefined
\let\mt@osdg \undefined
\let\mt@assign@del\undefined
%\let\mt@cal \undefined
%\let\mt@ops \undefined
% \end{macrocode}
% \ldots and we're done.
%
% \Finale