% \def\filename{amsfonts.dtx}
% \def\fileversion{3.01}
% \def\filedate{2013/01/14}
%
% \iffalse meta-comment
%
% American Mathematical Society
% Technical Support
% Publications Technical Group
% 201 Charles Street
% Providence, RI 02904
% USA
% tel: (401) 455-4080
% (800) 321-4267 (USA and Canada only)
% fax: (401) 331-3842
% email: tech-support@ams.org
%
% Copyright 2001, 2009, 2013 American Mathematical Society.
%
% Unlimited copying and redistribution of this file are permitted as
% long as this file is not modified. Modifications, and distribution
% of modified versions, are permitted, but only if the resulting file
% is renamed.
%
% \fi
%
% \iffalse
%
\documentclass{amsdtx}
\usepackage{mflogo}
\begin{document}
\title{The \pkg{amsfonts} package}
\author{David M. Jones%
\thanks{Previous versions of this package were written by Frank
Mittelbach, Rainer Sch\"opf and Michael Downes. Most of the
code remains unchanged and the credit should continue accruing
to them. However, blame for the commentary and decisions
regarding the \opt{psamfonts} option and the handling of font
scaling belong to the current author alone.}%
}
\date{Version \fileversion, \filedate}
\DocInput{amsfonts.dtx}
\end{document}
%
% \fi
%
% \maketitle
%
% \MakeShortVerb\|
%
% \section{Introduction}
%
% The \pkg{amsfonts} package provides access to a limited selection
% of features from the AMSFonts package. For other features, see
% the following packages: \pkg{amssymb}, \pkg{eucal}, \pkg{eufrak},
% and \pkg{euscript}. (For wholesale substitution of Euler math,
% see Frank Jensen's \pkg{euler} package.)
%
% This file also contains the external font definitions
% (\texttt{.fd} files) needed to use the AMS font collection with
% \LaTeXe.
%
% \subsection{The \opt{psamsfonts} option}
%
% In early versions of AMSFonts, the 6, 8 and 9 point sizes of many
% fonts were implemented only in \MF\ and were not available as
% separate Type~1 fonts. Because of this, many AMS-\LaTeX\ classes
% and packages were given a \opt{psamsfonts} option that would
% adjust the font definitions so that only the TFM files
% corresponding to design sizes available as Type~1 fonts would be
% used. This relieved DVI-to-PostScript processors of the
% responsibility of doing an appropriate font substitution, which
% was of particular value in those early days when support for
% Type~1 fonts was still experimental and highly variable.
%
% However, the \opt{psamsfonts} option had a second, undocumented,
% effect: It changed the scaling behavior of the Euler and AMS
% Symbol fonts. Without the \opt{psamsfonts} option, the fonts
% were made available at the same set of ``quantized'' sizes used
% by default for the standard \LaTeX\ fonts. For example, if you
% asked for \fnt{msbm} at 13\,pt, you would instead get \fnt{msbm}
% at 12\,pt, with a warning about the substitution. With the
% \opt{psamsfonts} option, the AMS fonts were continuously
% scalable, so if you asked for \fnt{msbm} at 13\,pt, you would get
% a 13\,pt version of the font. This means that the
% \opt{psamsfonts} could change \TeX's formatting decisions,
% including which linebreaks were chosen.
%
% As of version~3 of the AMSFonts distribution, there is no longer
% a discrepancy between the \MF\ implementations and the Type~1
% implementations, which means that we can use a single set of font
% definitions for both. The question then becomes which approach
% we should adopt. Should we provide the fonts only in the
% standard \LaTeX\ quantized sizes or should we allow for full and
% continuous scaling?
%
% It is our position that the quantized font sizes are not
% desirable for their own merits; they are a legacy of the era when
% \MF\ was virtually the only source of fonts for use with
% \TeX\ and when generating a new size of a font was onerous and
% resulted in a potentially long-term use of precious disk space.
% In the modern \TeX\ environment, the cost of allowing arbitrary
% scaling of fonts is so low that most users will never even be
% aware of them. Furthermore, any user who sticks to the standard
% \LaTeX\ document classes and the font sizes they provide will
% never stray outside of the officially sanctioned sizes anyway,
% even when using the AMSFont package. Any users who do request
% nonstandard sizes presumably know what they are doing and should
% get the font size they ask for. Although they will have to take
% special measures to achieve that for the standard \LaTeX\ fonts,
% we can make their tasks easier by providing the AMS fonts in a
% fully scalable form from the beginning.
%
%^^A Besides, at normal document sizes, the difference between the
%^^A quantized sizes and the actually-requested size will be small and
%^^A probably not noticeable under normal circumstances.
%
% \subsection{The \fnt{cmex} fonts}
%
% The situation with \fnt{cmex} is even more stark. In standard
% \LaTeX, \fnt{cmex} is only supplied at 10\,pt. That is, no
% matter what size you ask for, you get \fnt{cmex} at~10\,pt. The
% \pkg{amsfonts} package redefines the \fnt{cmex} font family so
% that it is also continuously scalable. This means that
% \emph{merely loading the \pkg{amsfonts} package can change line
% breaks}.
%
%^^A Theoretically we could provide \opt{quantized} and/or
%^^A \opt{noscale} options, but that's probably just asking for
%^^A trouble.
%
% \section{Customization}
%
% You should \emph{not} change any of the files generated from this
% module. If you really want to change the font shape groups
% preloaded you should copy the relevant portions to another file
% (having a different name) and edit the other file according to
% your needs.
%
% \StopEventually{}
%
% \subsection{The \texttt{docstrip} modules}
%
% The following modules are used in an installation procedure to direct
% \texttt{docstrip} in generating external files:
% \begin{center}
% \begin{tabular}{ll}
% |sty| & generate \fn{amsfonts.sty} \\
% |eur| & generate \fn{fd} for Euler Roman\\
% |eus| & generate \fn{fd} for Euler Script\\
% |euf| & generate \fn{fd} for Euler Fraktur\\
% |euex| & generate \fn{fd} for Euler extra symbols\\
% |msa| & generate \fn{fd} for AMS symbols (A)\\
% |msb| & generate \fn{fd} for AMS symbols (B)\\
% \end{tabular}
% \end{center}
%
% \section{The implementation}
%
% Require \LaTeXe.
% \begin{macrocode}
%
\NeedsTeXFormat{LaTeX2e}[1994/12/01]
%
% \end{macrocode}
%
% Identify the file and version.
% \begin{macrocode}
%\ProvidesPackage{amsfonts}[2013/01/14 v3.01 Basic AMSFonts support]
%\ProvidesFile{ueur.fd} [2013/01/14 v3.01 Euler Roman]
%\ProvidesFile{ueus.fd} [2013/01/14 v3.01 Euler Script]
%\ProvidesFile{ueuf.fd} [2013/01/14 v3.01 Euler Fraktur]
%\ProvidesFile{ueuex.fd} [2013/01/14 v3.01 Euler extra symbols]
%\ProvidesFile{umsa.fd} [2013/01/14 v3.01 AMS symbols A]
%\ProvidesFile{umsb.fd} [2013/01/14 v3.01 AMS symbols B]
% \end{macrocode}
%
% \section{Package options}
%
% \begin{macrocode}
%
\DeclareOption{psamsfonts}{%
\PackageWarningNoLine{amsfonts}{The 'psamsfonts' option is
obsolete in AMSFonts v3}
}
% \end{macrocode}
%
% Process the options for this package.
% \begin{macrocode}
\ProcessOptions\relax
% \end{macrocode}
%
% \subsection{Font definitions for \fn{cmex}}
%
% The \opt{cmex10} option of \pkg{amsmath} is now obsolete, but it
% will be some time before we release an updated version of
% \pkg{amsmath}. In the meantime, when version~3 of \pkg{amsfonts}
% is used with older versions of the \pkg{amsmath} package, we want
% to disable the \opt{cmex10} option. So, we do two things: (a)~in
% \pkg{amsfonts}, we install the new \fnt{cmex} definitions
% unconditionally, and (b)~we set the \cs{cmex@opt} flag to a value
% that will cause \pkg{amsmath} to skip processing of the
% \opt{cmex10} option.
% \begin{macrocode}
\DeclareFontShape{OMX}{cmex}{m}{n}{%
cmex7%
<7.5-8.5>cmex8%
<8.5-9.5>cmex9%
<9.5->cmex10%
}{}%
\expandafter\let\csname OMX/cmex/m/n/10\endcsname\relax
\def\cmex@opt{10}
% \end{macrocode}
%
% \section{Miscellaneous}
%
% \begin{macro}{\ams@newcommand}
% Where \pkg{stix} and \pkg{amsfonts} define the same control
% sequences, we want to avoid inadvertently overriding \pkg{stix}'s
% definitions. If \pkg{stix} is loaded before \pkg{amsfonts}, the
% following conditional and a few more like it later in the code
% take care of the problem. There is similar code in the
% \pkg{stix} package in case \pkg{amsfonts} is loaded first.
% \begin{macrocode}
\@ifpackageloaded{stix}{%
\def\ams@DeclareMathDelimiter#1#2#3#4#5#6{}%
\def\ams@DeclareMathSymbol#1#2#3#4{}%
}{%
\let\ams@DeclareMathDelimiter\DeclareMathDelimiter
\def\ams@DeclareMathSymbol#1#2#3#4{%
\global\let#1\undefined
\DeclareMathSymbol{#1}{#2}{#3}{#4}%
}%
}
% \end{macrocode}
% \end{macro}
%
% In case the \pkg{amsfonts} package is used apart from the
% \pkg{amsmath} package, we need to define the following functions.
% \begin{macrocode}
\providecommand*{\@mathmeasure}[3]{%
\setbox#1\hbox{\frozen@everymath\@emptytoks\m@th$#2#3$}}
% \end{macrocode}
% \cs{newtoks} was still outer in early releases of \LaTeXe, so
% we need to take a little extra care here.
% \begin{macrocode}
\@ifundefined{@emptytoks}{\csname newtoks\endcsname\@emptytoks}{}
% \end{macrocode}
%
% \section{Preparing to use the extra math fonts}
%
% We declare the encoding schemes for two AMS math symbol fonts.
% \texttt{U} encoding with \cs{noaccents@} for math is already
% provided in base NFSS.
%
% The AMS symbol fonts will be assigned via \cs{DeclareSymbolFont}
% since most of their characters are accessed with the \cs{mathchardef}
% primitive. This means that these fonts are loaded for the
% particular size whenever a size or version switch is requested by
% the user. At the present time bold forms of these fonts don't
% exist. So there are no overriding \cs{SetSymbolFont} commands for
% mathversion `bold'.
% \begin{macrocode}
\DeclareSymbolFont{AMSa}{U}{msa}{m}{n}
\DeclareSymbolFont{AMSb}{U}{msb}{m}{n}
% \end{macrocode}
%
% The next constructs are symbols that work the same in text or math.
% They are built the hard way using |\hexnumber@\sym...|.
% We can't use \cs{DeclareTextSymbol} since it only specifies the
% font by its encoding, which, being \texttt{U} for both \fn{msam}
% \fn{msbm}, is ambiguous.
% \begin{macrocode}
\@ifundefined{yen}{%
\edef\yen{\noexpand\mathhexbox{\hexnumber@\symAMSa}55}
}{}
\@ifundefined{checkmark}{%
\edef\checkmark{\noexpand\mathhexbox{\hexnumber@\symAMSa}58}
}{}
\@ifundefined{circledR}{%
\edef\circledR{\noexpand\mathhexbox{\hexnumber@\symAMSa}72}
}{}
\@ifundefined{maltese}{%
\edef\maltese{\noexpand\mathhexbox{\hexnumber@\symAMSa}7A}
}{}
% \end{macrocode}
%
% We now define a few symbols which reside in the \fn{msam} and \fn{msbm}
% fonts. The \cs{catcode} change is to ensure that the double-quote
% character is not active (which at one time was a problem when something
% like \fn{german.sty} was used).
% \begin{macrocode}
\begingroup \catcode`\"=12
\ams@DeclareMathDelimiter{\ulcorner}{\mathopen} {AMSa}{"70}{AMSa}{"70}
\ams@DeclareMathDelimiter{\urcorner}{\mathclose}{AMSa}{"71}{AMSa}{"71}
\ams@DeclareMathDelimiter{\llcorner}{\mathopen} {AMSa}{"78}{AMSa}{"78}
\ams@DeclareMathDelimiter{\lrcorner}{\mathclose}{AMSa}{"79}{AMSa}{"79}
% \end{macrocode}
%
% The next two definitions redefine the \cn{widehat} and
% \cn{widetilde} command to use a special accent if their
% argument is suitably wide. (In plain \TeX{} these commands can
% produce three different accents depending on the size of the
% argument.) The current implementation will tend to give wrong results
% (tilde or hat symbol too wide) if these accents are used in script
% or scriptscript math style. But making that part work properly is
% too much effort given the limitations of \TeX{} 3.x.
% \begin{macrocode}
\@ifpackageloaded{stix}{}{%
\xdef\widehat#1{\noexpand\@mathmeasure\z@\textstyle{#1}%
\noexpand\ifdim\noexpand\wd\z@>\tw@ em%
\mathaccent"0\hexnumber@\symAMSb 5B{#1}%
\noexpand\else\mathaccent"0362{#1}\noexpand\fi}
\xdef\widetilde#1{\noexpand\@mathmeasure\z@\textstyle{#1}%
\noexpand\ifdim\noexpand\wd\z@>\tw@ em%
\mathaccent"0\hexnumber@\symAMSb 5D{#1}%
\noexpand\else\mathaccent"0365{#1}\noexpand\fi}
}
% \end{macrocode}
% Now we define two special arrows which are built with special
% characters from the first symbol font.
% \begin{macrocode}
\@ifpackageloaded{stix}{}{%
\DeclareMathSymbol{\dabar@}{\mathord}{AMSa}{"39}
\xdef\dashrightarrow{\mathrel{\dabar@\dabar@
\mathchar"0\hexnumber@\symAMSa 4B}}%
\xdef\dashleftarrow{\mathrel{\mathchar"0\hexnumber@\symAMSa 4C\dabar@
\dabar@}}%
\global\let\dasharrow\dashrightarrow
}
% \end{macrocode}
% To avoid using too many control sequence names by defining all
% new symbols provided with the two fonts, we defined so far only
% symbols which are not assigned via \cs{mathchardef}. The majority
% however will be defined only if the user loads the \fn{amssymb}
% package or explicitly defines symbols using the
% \cs{DeclareMathSymbol} macro.
%
% Finally we test the \cs{DeclareMathSymbol} command by redefining the
% \PlainTeX{} symbols which were made up from different characters
% (and thus could not change sizes properly) but are now available
% as real characters. Note that we have to make them undefined
% first, otherwise \cs{DeclareMathSymbol} will complain that they are
% already defined.
% \begin{macrocode}
\ams@DeclareMathSymbol{\rightleftharpoons}{\mathrel}{AMSa}{"0A}
\ams@DeclareMathSymbol{\angle} {\mathord}{AMSa}{"5C}
\ams@DeclareMathSymbol{\hbar} {\mathord}{AMSb}{"7E}
% \end{macrocode}
%
% Include a few common symbols which are both in \fn{msam} or \fn{msbm}
% and also in \fn{lasy}, which might have been loaded already, so it
% is a good idea to make them undefined.
% \begin{macrocode}
\ams@DeclareMathSymbol{\sqsubset} {\mathrel}{AMSa}{"40}
\ams@DeclareMathSymbol{\sqsupset} {\mathrel}{AMSa}{"41}
\ams@DeclareMathSymbol{\mho} {\mathord}{AMSb}{"66}
% \end{macrocode}
%
% Now we close the group so that |"| will get its old \cs{catcode}
% back.
% \begin{macrocode}
\endgroup
% \end{macrocode}
%
% \section{Defining \protect\meta{math alphabet identifiers}}
%
% \begin{macro}{\mathfrak}
% The Fraktur alphabet will be accessed by the command
% \cn{mathfrak} inside of math mode.
% \begin{macrocode}
\@ifundefined{mathfrak}{%
\DeclareMathAlphabet{\mathfrak}{U}{euf}{m}{n}
\SetMathAlphabet{\mathfrak}{bold}{U}{euf}{b}{n}
}{}
% \end{macrocode}
% \end{macro}
%
% \begin{macro}{\mathbb}
% The AMS symbol font B contains the blackboard bold math alphabet.
% There is only a single weight of this alphabet so it is used in
% all math versions.
% \begin{macrocode}
\@ifundefined{mathbb}{%
\DeclareSymbolFontAlphabet{\mathbb}{AMSb}%
}{}
% \end{macrocode}
% \end{macro}
%
% \subsection{Setting up the fonts for correct accents in math}
%
% There are a few \meta{math alphabets} which don't have any or
% enough accents for math in the corresponding fonts. For example the
% \cn{mathbb} \meta{math alphabet identifier} comes from a symbol font
% with none of the normal accents in the correct places. \AmSTeX{}
% has a sophisticated solution for this problem: all math
% accents are defined in a way that the font where the accents are
% taken from depends on the current value of a macro called
% \cs{accentclass@}. To support this idea \meta{math alphabet
% identfiers} which come with their own accents should set this macro
% to the number \texttt{7} (variable family in the terminology of the
% \TeX{}book); all others should set it to \texttt{0} so that the accents
% are taken from the \meta{math group} zero in the current \emph{math
% version}.
%
% There is a \cs{DeclareFontEncodingDefaults} macro which declares such
% defaults. For the \pkg{amsfonts} package we set this default in the
% following way. This information will be ignored unless the \pkg{amsmath}
% package is also loaded.
% \begin{macrocode}
\DeclareFontEncodingDefaults{\relax}{\def\accentclass@{7}}
% \end{macrocode}
%
% \section{Some backward compatibility definitions}
%
% The following commands are provided for compatibility with pre-1995
% versions of the \pkg{amsfonts} package. If a \cn{documentclass}
% command is used the \cs{@obsolete} function will issue a warning
% saying that the command is obsolete.
%
% Upgraded to robust commands. [bnb, 1996/09/29]
% \begin{macro}{\frak}
% \begin{macro}{\Bbb}
% \begin{macro}{\bold}
% \begin{macrocode}
\DeclareRobustCommand{\frak}[1]{%
{\@subst@obsolete{amsfonts}\frak\mathfrak{#1}}}
\DeclareRobustCommand{\Bbb}[1]{%
{\@subst@obsolete{amsfonts}\Bbb\mathbb{#1}}}
\DeclareRobustCommand{\bold}[1]{%
{\@subst@obsolete{amsfonts}\bold\mathbf{#1}}}
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
%
% The \cs{newsymbol} command has different syntax than
% \cs{DeclareMathSymbol} so it cannot use the direct substitution
% function \cs{@subst@obsolete}.
% \begin{macrocode}
\begingroup \catcode`\"=12 \relax
\gdef\newsymbol#1#2#3#4#5{%
\@obsolete{amsfonts}\newsymbol\DeclareMathSymbol
\@ifdefinable#1{%
\edef\next@
{\ifcase #2 \or
\hexnumber@\symAMSa\or
\hexnumber@\symAMSb\fi}%
\ifx\next@\@empty
\PackageError{amsfonts}{\Invalid@@\newsymbol}\@ehd%
\else
\global\mathchardef#1"#3\next@#4#5
\fi}}
\endgroup
% \end{macrocode}
%
% \begin{macro}{\@obsolete}
% This command gives a warning on the first use that the command given
% as second argument is deprecated/obsolete, with the third argument
% recommended as a substitute. In compatibility mode we just continue
% silently.
% \begin{macrocode}
\long\def\@gobblethree#1#2#3{}
\if@compatibility
\let\@obsolete\@gobblethree
\else
\def\@obsolete#1#2#3{\PackageWarning{#1}{%
Obsolete command \protect#2; \protect#3 should be used instead}}%
\fi
% \end{macrocode}
% \end{macro}
%
% \begin{macro}{\@subst@obsolete}
% For obsolete commands that have a substitute command.
% \begin{macrocode}
\def\@subst@obsolete#1#2#3{\@obsolete{#1}#2#3\gdef#2{#3}#2}
% \end{macrocode}
% \end{macro}
%
% \begin{macrocode}
\@ifpackageloaded{stix}{\endinput}{}
% \end{macrocode}
% First we load the symbols under the official AMS names and then
% define the \latex/ names via \cs{let} unless they are already
% defined (which probably means that the \fn{lasy} fonts are defined).
% \begin{macrocode}
\begingroup \catcode`\"=12
\DeclareMathSymbol{\square} {\mathord}{AMSa}{"03}
\DeclareMathSymbol{\lozenge} {\mathord}{AMSa}{"06}
\ams@DeclareMathSymbol{\vartriangleright} {\mathrel}{AMSa}{"42}
\ams@DeclareMathSymbol{\vartriangleleft} {\mathrel}{AMSa}{"43}
\ams@DeclareMathSymbol{\trianglerighteq} {\mathrel}{AMSa}{"44}
\ams@DeclareMathSymbol{\trianglelefteq} {\mathrel}{AMSa}{"45}
\ams@DeclareMathSymbol{\rightsquigarrow} {\mathrel}{AMSa}{"20}
% \end{macrocode}
% Check if the \pkg{latexsym} package has already been loaded
% \begin{macrocode}
\@ifpackageloaded{latexsym}{\@tempswafalse}{\@tempswatrue}
\if@tempswa
\global\let\Box\square
\global\let\Diamond\lozenge
\global\let\leadsto\rightsquigarrow
% \end{macrocode}
% \cn{lhd} and its relatives look like \cn{vartriangleleft} and its
% relatives, but the math atom types are different (according to the
% \latex/ book). So we need to issue different \cs{DeclareMathSymbol}
% statements.
% \begin{macrocode}
\global\let\lhd\@@undefined
\global\let\unlhd\@@undefined
\global\let\rhd\@@undefined
\global\let\unrhd\@@undefined
\DeclareMathSymbol{\lhd} {\mathbin}{AMSa}{"43}
\DeclareMathSymbol{\unlhd} {\mathbin}{AMSa}{"45}
\DeclareMathSymbol{\rhd} {\mathbin}{AMSa}{"42}
\DeclareMathSymbol{\unrhd} {\mathbin}{AMSa}{"44}
% \end{macrocode}
% No equivalent of the \cn{\Join} symbol in \fn{lasy} is available in
% \fn{msam} or \fn{msbm} so we make do with a composite of two characters.
% \begin{macrocode}
\xdef\Join{\mathrel{\mathchar"0\hexnumber@\symAMSb 6F\mkern-13.8mu%
\mathchar"0\hexnumber@\symAMSb 6E}}
\fi
\endgroup
%
% \end{macrocode}
%
% \section{The \texttt{.fd} files}
%
% \subsection{AMS symbol font A}
%
% \begin{macrocode}
%
\DeclareFontFamily{U}{msa}{}
\DeclareFontShape{U}{msa}{m}{n}{%
msam5%
<6-8>msam7%
<8->msam10%
}{}
%
% \end{macrocode}
%
% \subsection{AMS symbol font B}
%
% \begin{macrocode}
%
\DeclareFontFamily{U}{msb}{}
\DeclareFontShape{U}{msb}{m}{n}{%
msbm5%
<6-8>msbm7%
<8->msbm10%
}{}
%
% \end{macrocode}
%
% \subsection{Euler Fraktur}
%
% \begin{macrocode}
%
\DeclareFontFamily{U}{euf}{}
\DeclareFontShape{U}{euf}{m}{n}{%
eufm5%
<6-8>eufm7%
<8->eufm10%
}{}
\DeclareFontShape{U}{euf}{b}{n}{%
eufb5%
<6-8>eufb7%
<8->eufb10%
}{}
%
% \end{macrocode}
%
% \subsection{Euler Script}
%
% \begin{macrocode}
%
\DeclareFontFamily{U}{eus}{\skewchar\font'60}
\DeclareFontShape{U}{eus}{m}{n}{%
eusm5%
<6-8>eusm7%
<8->eusm10%
}{}
\DeclareFontShape{U}{eus}{b}{n}{%
eusb5%
<6-8>eusb7%
<8->eusb10%
}{}
%
% \end{macrocode}
%
% \subsection{Euler math extension}
%
% \begin{macrocode}
%
\DeclareFontFamily{U}{euex}{}
\DeclareFontShape{U}{euex}{m}{n}{%
euex7%
<7.5-8.5>euex8%
<8.5-9.5>euex9%
<9.5->euex10%
}{}
%
% \end{macrocode}
%
% \subsection{Euler Math Roman}
%
% These fonts are nearly |OML| encoded but some characters are
% missing so we use |U| encoding again.
% \begin{macrocode}
%
\DeclareFontFamily{U}{eur}{\skewchar\font'177}
\DeclareFontShape{U}{eur}{m}{n}{%
eurm5%
<6-8>eurm7%
<8->eurm10%
}{}
\DeclareFontShape{U}{eur}{b}{n}{%
eurb5%
<6-8>eurb7%
<8->eurb10%
}{}
%
% \end{macrocode}
%
% The next line goes into all files and in addition prevents
% \texttt{docstrip} from adding any further code from the main source
% file (such as a character table).
% \begin{macrocode}
\endinput
% \end{macrocode}
%
% \Finale