\def\fileversion{2.2}
\def\filedate{94/06/20}
\def\docdate {94/04/7}
%
% \iffalse
%% File: lucida.dtx Copyright (C) 1994 Sebastian Rahtz
%
%<*driver>
\documentclass{ltxdoc}
\begin{document}
 \title{The \textsf{lucida} package\thanks{This file
        has version number \fileversion, last
        revised \filedate.}}
 \author{Sebastian Rahtz\\Sebastian.Rahtz@tex.ac.uk}
 \date{\filedate}
 \maketitle
 \DocInput{lucida.dtx}
\end{document}
%</driver>
% \fi
% \CheckSum{1472}
% \maketitle
%
% \section{Introduction}
%
% This file contains \LaTeXe\ package files needed to use
% Lucida and Lucida Bright fonts, and {\tt .fd} files for the fonts as
% named by Y\&Y. {\tt .fd} and metric files for the Berry-naming
% scheme are available in \texttt{fonts/metrics/bigholm} on CTAN.
%
% The Lucida and Lucida Bright fonts:
% \begin{center}
% \begin{tabular}{ll}
% T1hlcb& B\&H\space Lucida Bright\\
% T1hlcs& B\&H\space Lucida Sans\\
% T1hlcst& B\&H\space Lucida Bright Typewriter\\
% T1hlc4& B\&H\space Lucida Fax\\
% OT1lb& (Y\&Y names)\space Lucida Bright\\
% OT1lbs& (Y\&Y names)\space Lucida Sans\\
% OT1lbt& (Y\&Y names)\space Lucida Bright Typewriter\\
% OT1lbf& (Y\&Y names)\space Lucida Fax\\
% OMLplcm & Lucida  maths --- math italics\\
% OMSplcy & Lucida  maths --- math symbols\\
% OMXplcv & Lucida  maths --- math extension\\
% OMLhlcm & Lucida Bright maths --- math italics \\
% OMShlcy & Lucida Bright maths --- math symbols\\
% OMXhlcv & Lucida Bright maths --- math extension\\
% LMRhlcm & Lucida Bright maths ---  math arrows\\
% OMLlbm & Lucida Bright maths ---  math italics  (Y\&Y names)\\
% OMSlby & Lucida Bright maths --- math symbols (Y\&Y names)\\
% OMXlbv & Lucida Bright maths --- math extension (Y\&Y names)\\
% LMRlbm & Lucida Bright maths --- math arrows (Y\&Y names)\\
% \end{tabular}
% \end{center}
% \begin{center}
% \begin{tabular}{lll}
% \hline
% Berry name & Y\&Y name & Full font name\\
% \hline
% hlcbost0 lstbo&LucidaSans-TypewriterBoldOblique\\
% hlcbst0&lstb&LucidaSans-TypewriterBold\\
% hlcd40&lfd&LucidaFax-Demi\\
% hlcdb0&lbd&LucidaBright-Demi\\
% hlcdi40&lfdi&LucidaFax-DemiItalic\\
% hlcdib0&lbdi&LucidaBright-DemiItalic\\
% hlcdis0&lsdi&LucidaSans-DemiItalic\\
% hlcds0&lsd&LucidaSans-Demi\\
% hlcr40&lfr&LucidaFax\\
% hlcrb0&lbr&LucidaBright\\
% hlcrba&lbma&LucidaNewMath-Arrows\\
% hlcrbm&lbmi&LucidaNewMath-Italic\\
% hlcrbma&lbmo&LucidaNewMath-AltItalic\\
% hlcrbv&lbme&LucidaNewMath-Extension\\
% hlcrby&lbms&LucidaNewMath-Symbol\\
% hlcrf0&lbl&LucidaBlackletter\\
% hlcri40&lfi&LucidaFax-Italic\\
% hlcrib0&lbi&LucidaBright-Italic\\
% hlcrin0&lbh&LucidaHandwriting-Italic\\
% hlcris0&lsi&LucidaSans-Italic\\
% hlcriw0&lbc&LucidaCalligraphy-Italic\\
% hlcrob0&lbsl&LucidaBrightSlanted\\
% hlcrost0 lsto&LucidaSans-TypewriterOblique\\
% hlcrs0&lsr&LucidaSans\\
% hlcrst0&lstr&LucidaSans-Typewriter\\
% \hline
% \end{tabular}
% \end{center}
% \StopEventually{}
% \section{Maths fonts}
%    \begin{macrocode}
%<*lucidascale>
\@ifundefined{LucidaScale}{\def\LucidaScale{1}}{}
%</lucidascale>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMLhlcm>
% Math Italics
\DeclareFontFamily{OML}{hlcm}{\skewchar\font=127}
\DeclareFontShape{OML}{hlcm}{m}{it}{<->s * [\LucidaScale]hlcrbma}{}
%</OMLhlcm>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMShlcy>
% LucidaNewMath-Symbols
\DeclareFontFamily{OMS}{hlcy}{\skewchar\font=48}
\DeclareFontShape{OMS}{hlcy}{m}{n}{<->s * [\LucidaScale]hlcrby}{}
%</OMShlcy>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMXhlcv>
% LucidaNewMath-Extension
\DeclareFontFamily{OMX}{hlcv}{}
\DeclareFontShape{OMX}{hlcv}{m}{n}{<->s * [\LucidaScale]hlcrbv}{}
%</OMXhlcv>
%    \end{macrocode}
%    \begin{macrocode}
%<*LMRhlcm>
% LucidaNewMath-Arrows
\DeclareFontFamily{LMR}{hlcm}{}
\DeclareFontShape{LMR}{hlcm}{m}{n}{<->s * [\LucidaScale]hlcrba}{}
%</LMRhlcm>
%    \end{macrocode}
%
%    \begin{macrocode}
%<*OMLplcm>
% Math Italics
\DeclareFontFamily{OML}{plcm}{\skewchar\font=127}
\DeclareFontShape{OML}{plcm}{m}{it}{<->plcm}{}
%</OMLplcm>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMSplcy>
% Math-Symbols
\DeclareFontFamily{OMS}{plcy}{\skewchar\font=48}
\DeclareFontShape{OMS}{plcy}{m}{n}{<->plcy}{}
%</OMSplcy>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMXplcv>
% Math-Extension
\DeclareFontFamily{OMX}{plcv}{}
\DeclareFontShape{OMX}{plcv}{m}{n}{<->plcv}{}
%</OMXplcv>
%    \end{macrocode}
%
% \section{(Y\&Y names) Lucida Bright}
%    \begin{macrocode}
%<*OT1lb>
\typeout{File\space OT1lb.fd\space loading \space (Y\&Y names)\space Lucida Bright}%
\DeclareFontFamily{OT1}{lb}{}%
\DeclareFontShape{OT1}{lb}{m}{n}{<->s * [\LucidaScale]lbr}{}%
\DeclareFontShape{OT1}{lb}{m}{it}{<->s * [\LucidaScale]lbi}{}%
\DeclareFontShape{OT1}{lb}{m}{sl}{<->s * [\LucidaScale]lbsl}{}%
\DeclareFontShape{OT1}{lb}{b}{n}{<->s * [\LucidaScale]lbd}{}%
\DeclareFontShape{OT1}{lb}{b}{it}{<->s * [\LucidaScale]lbdi}{}%
\DeclareFontShape{OT1}{lb}{b}{sl}{<->ssub * lb/b/it}{}%
\DeclareFontShape{OT1}{lb}{bx}{n}{<->ssub * lb/b/n}{}%
\DeclareFontShape{OT1}{lb}{bx}{it}{<->ssub * lb/b/it}{}%
\DeclareFontShape{OT1}{lb}{bx}{sl}{<->ssub * lb/m/sl}{}%
\DeclareFontShape{OT1}{lb}{m}{sc}{<->ssub * lb/m/n}{}%
\DeclareFontShape{OT1}{lb}{b}{sc}{<->ssub * lb/m/sc}{}%
\DeclareFontShape{OT1}{lb}{bx}{sc}{<->ssub * lb/b/sc}{}%
%</OT1lb>
%    \end{macrocode}
%
% \section{(Y\&Y names) Lucida Sans}
%    \begin{macrocode}
%<*OT1lbs>
\typeout{File\space OT1lbs.fd\space loading \space (Y\&Y names)\space Lucida Sans}%
\DeclareFontFamily{OT1}{lbs}{}%
\DeclareFontShape{OT1}{lbs}{m}{n}{<->s * [\LucidaScale]lsr}{}%
\DeclareFontShape{OT1}{lbs}{m}{it}{<->s * [\LucidaScale]lsi}{}%
\DeclareFontShape{OT1}{lbs}{b}{n}{<->s * [\LucidaScale]lsd}{}%
\DeclareFontShape{OT1}{lbs}{b}{it}{<->s * [\LucidaScale]lsdi}{}%
\DeclareFontShape{OT1}{lbs}{m}{sl}{<->ssub * lbs/m/it}{}%
\DeclareFontShape{OT1}{lbs}{m}{sc}{<->ssub * lbs/m/n}{}%
\DeclareFontShape{OT1}{lbs}{b}{sc}{<->ssub * lbs/m/sc}{}%
\DeclareFontShape{OT1}{lbs}{bx}{sc}{<->ssub * lbs/b/sc}{}%
\DeclareFontShape{OT1}{lbs}{b}{sl}{<->ssub * lbs/b/it}{}%
\DeclareFontShape{OT1}{lbs}{bx}{n}{<->ssub * lbs/b/n}{}%
\DeclareFontShape{OT1}{lbs}{bx}{it}{<->ssub * lbs/b/it}{}%
\DeclareFontShape{OT1}{lbs}{bx}{sl}{<->ssub * lbs/m/sl}{}%
%</OT1lbs>
%    \end{macrocode}
%
% \section{(Y\&Y names) Lucida Bright Typewriter}
%    \begin{macrocode}
%<*OT1lbt>
\typeout{File\space OT1lbt.fd\space loading \space (Y\&Y names)\space Lucida Bright Typewriter}%
\DeclareFontFamily{OT1}{lbt}{}%
\DeclareFontShape{OT1}{lbt}{m}{n}{<->s * [\LucidaScale]lstr}{}%
\DeclareFontShape{OT1}{lbt}{m}{sc}{<->ssub * lbt/m/n}{}%
\DeclareFontShape{OT1}{lbt}{m}{it}{<->s * [\LucidaScale]lsto}{}%
\DeclareFontShape{OT1}{lbt}{m}{sl}{<->ssub * lbt/m/it}{}%
\DeclareFontShape{OT1}{lbt}{b}{n}{<->s * [\LucidaScale]lstb}{}%
\DeclareFontShape{OT1}{lbt}{b}{it}{<->s * [\LucidaScale]lstbo}{}%
\DeclareFontShape{OT1}{lbt}{b}{sc}{<->ssub * lbt/m/sc}{}%
\DeclareFontShape{OT1}{lbt}{b}{sl}{<->ssub * lbt/b/it}{}%
\DeclareFontShape{OT1}{lbt}{m}{sl}{<->ssub * lbt/m/it}{}%
\DeclareFontShape{OT1}{lbt}{bx}{n}{<->ssub * lbt/b/n}{}%
\DeclareFontShape{OT1}{lbt}{bx}{it}{<->ssub * lbt/b/it}{}%
\DeclareFontShape{OT1}{lbt}{bx}{sc}{<->ssub * lbt/b/sc}{}%
\DeclareFontShape{OT1}{lbt}{bx}{sl}{<->ssub * lbt/m/sl}{}%
%</OT1lbt>
%    \end{macrocode}
% \section{(Y\&Y names) Lucida Fax}
%    \begin{macrocode}
%<*OT1lbf>
\typeout{File\space OT1lbf.fd\space loading \space (Y\&Y names)\space Lucida Fax}%
\DeclareFontFamily{OT1}{lbf}{}%
\DeclareFontShape{OT1}{lbf}{m}{n}{<->s * [\LucidaScale]lfr}{}%
\DeclareFontShape{OT1}{lbf}{b}{n}{<->s * [\LucidaScale]lfd}{}%
\DeclareFontShape{OT1}{lbf}{m}{it}{<->s * [\LucidaScale]lfi}{}%
\DeclareFontShape{OT1}{lbf}{b}{it}{<->s * [\LucidaScale]lfdi}{}%
%</OT1lbf>
%    \end{macrocode}
%
%    \begin{macrocode}
%<*OMLlbm>
% \section{Lucida Math Italics}
\DeclareFontFamily{OML}{lbm}{\skewchar\font=127}
\DeclareFontShape{OML}{lbm}{m}{it}{<->s * [\LucidaScale]lbmo}{}
%</OMLlbm>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMSlby>
% \section{LucidaNewMath-Symbols}
\DeclareFontFamily{OMS}{lby}{\skewchar\font=48}
\DeclareFontShape{OMS}{lby}{m}{n}{<->s * [\LucidaScale]lbms}{}
%</OMSlby>
%    \end{macrocode}
%    \begin{macrocode}
%<*OMXlbv>
% \section{LucidaNewMath-Extension}
\DeclareFontFamily{OMX}{lbv}{}
\DeclareFontShape{OMX}{lbv}{m}{n}{<->s * [\LucidaScale]lbme}{}
%</OMXlbv>
%    \end{macrocode}
%    \begin{macrocode}
%<*LMRlbm>
% \section{LucidaNewMath-Arrows}
\DeclareFontFamily{LMR}{lbm}{}
\DeclareFontShape{LMR}{lbm}{m}{n}{<->s * [\LucidaScale]lbma}{}
%</LMRlbm>
%    \end{macrocode}
%    \begin{macrocode}
%<*lucid>
\ProvidesPackage{lucid}[\filedate\space\fileversion\space
 PSNFSS2e LaTeX2e package]
\renewcommand{\sfdefault}{plcs}
\renewcommand{\rmdefault}{plc}
\renewcommand{\ttdefault}{pcr}
%</lucid>
%    \end{macrocode}
%    \begin{macrocode}
%<*lucmath>
\ProvidesPackage{lucmath}[\filedate\space\fileversion\space
 PSNFSS2e LaTeX2e package]
%
\DeclareSymbolFont{operators}{\encodingdefault}{\rmdefault}{m}{n}
\DeclareSymbolFont{letters}{OML}{plcm}{m}{it}
\DeclareSymbolFont{symbols}{OMS}{plcy}{m}{n}
\DeclareSymbolFont{largesymbols}{OMX}{plcv}{m}{n}
\DeclareSymbolFont{italics}{\encodingdefault}{\rmdefault}{m}{it}
%
\SetSymbolFont{letters}{bold}{OML}{plcm}{m}{it}%
\SetSymbolFont{operators}{bold}{\encodingdefault}{\rmdefault}{b}{n}%
\SetSymbolFont{operators}{normal}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathbf}{normal}{\encodingdefault}{\rmdefault}{b}{n}%
\SetMathAlphabet{\mathsf}{normal}{\encodingdefault}{\sfdefault}{m}{n}%
\SetMathAlphabet{\mathrm}{normal}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
\SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{b}{n}%
%
%</lucmath>
%    \end{macrocode}
%    \begin{macrocode}
%<*lucidabright>
\ProvidesPackage{lucbr}[\filedate\space\fileversion\space
 PSNFSS2e LaTeX2e package]
\DeclareOption{kb}{%
 % this is for Berry-type font names
 \def\Lucida@names{0}%
}
\DeclareOption{yy}{%
 % this is for Y&Y font names
 \def\Lucida@names{1}%
}
% default to Berry-style names
\ExecuteOptions{kb} 
\ProcessOptions
\ifnum\Lucida@names=0
 \renewcommand{\sfdefault}{hlcs}
 \renewcommand{\rmdefault}{hlcb}
 \renewcommand{\ttdefault}{hlcst}
% new encoding scheme for Math Arrows font
 \DeclareFontEncoding{LMR}{}{}
 \DeclareFontSubstitution{LMR}{hlcm}{m}{n}
 \DeclareSymbolFont{letters}{OML}{hlcm}{m}{it}
 \DeclareSymbolFont{symbols}{OMS}{hlcy}{m}{n}
 \DeclareSymbolFont{largesymbols}{OMX}{hlcv}{m}{n}
 \SetSymbolFont{letters}{bold}{OML}{hlcm}{m}{it}%
%
% better get the order of this right, or maths come out as all arrows...
%
 \DeclareSymbolFont{italics}{\encodingdefault}{\rmdefault}{m}{it}
 \DeclareSymbolFont{arrows}{LMR}{hlcm}{m}{n}
\else
% this is for Y&Y font names; the supplied tfms are in OT1 encoding
 \renewcommand{\sfdefault}{lbs}
 \renewcommand{\rmdefault}{lb}
 \renewcommand{\ttdefault}{lbt}
 \def\encodingdefault{OT1}\fontencoding{OT1}\selectfont
%
% new encoding scheme for Math Arrows font
%
 \DeclareFontEncoding{LMR}{}{}
 \DeclareFontSubstitution{LMR}{lbm}{m}{n}
 \DeclareSymbolFont{letters}{OML}{lbm}{m}{it}
 \DeclareSymbolFont{symbols}{OMS}{lby}{m}{n}
 \DeclareSymbolFont{largesymbols}{OMX}{lbv}{m}{n}
 \SetSymbolFont{letters}{bold}{OML}{lbm}{m}{it}
%
% better get the order of this right, or maths come out as all arrows..
%
 \DeclareSymbolFont{italics}{\encodingdefault}{\rmdefault}{m}{it}
 \DeclareSymbolFont{arrows}{LMR}{lbm}{m}{n}
\fi
%
% allow for scaling of Lucida Bright. Tug93 used .94 to match space
% taken by CMR.
\def\LucidaScale{1}
% Adjusted for LucidaNewMath-Extension at 9.5pt and math axis at 313
% Note: delimiter increments are 5.5pt (as opposed to 6pt in CM)
\def\Lucidasizes{%
  \def\@vpt{5.2}%
  \def\@vipt{6.1}%
  \def\@viipt{6.9}%
  \def\@viiipt{7.8}%
  \def\@ixpt{8.6}%
  \def\@xpt{9.5}%
  \def\@xipt{10.4}%
  \def\@xiipt{11.2}%
  \def\@xivpt{12.9}%
  \def\@xviipt{15.5}%
  \def\@xxpt{18.1}%
  \def\@xxvpt{22.4}%
 \DeclareMathSizes{5.2}{5.2}{5.2}{5.2}
 \DeclareMathSizes{6.1}{6.1}{5.2}{5.2}
 \DeclareMathSizes{6.9}{6.9}{5.2}{5.2}
 \DeclareMathSizes{7.8}{7.8}{6.1}{5.2}
 \DeclareMathSizes{8.6}{8.6}{6.1}{5.2}
 \DeclareMathSizes{9.5}{9.5}{6.9}{5.2}
 \DeclareMathSizes{10.95}{10.95}{6.9}{5.2}
 \DeclareMathSizes{11.2}{11.2}{7.8}{6.1}
 \DeclareMathSizes{12.9}{12.9}{9.5}{6.9}
 \DeclareMathSizes{15.5}{15.5}{11.2}{9.5}
 \DeclareMathSizes{18.1}{18.1}{12.9}{11.2}
 \DeclareMathSizes{22.4}{22.4}{18.1}{15.5}
}%
\def\CMRsizes{%
 \def\@vpt{5}%
 \def\@vipt{6}%
 \def\@viipt{7}%
 \def\@viiipt{8}%
 \def\@ixpt{9}%
 \def\@xpt{10}%
 \def\@xipt{11}%
 \def\@xiipt{12}%
 \def\@xivpt{14}%
 \def\@xviipt{17}%
 \def\@xxpt{20}%
 \def\@xxvpt{25}%
}%
\AtEndOfPackage{\Lucidasizes}
%
\DeclareSymbolFont{operators}{OT1}{\rmdefault}{m}{n}
%
\SetSymbolFont{operators}{bold}{OT1}{\rmdefault}{b}{n}%
\SetSymbolFont{operators}{normal}{OT1}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathbf}{normal}{\encodingdefault}{\rmdefault}{b}{n}%
\SetMathAlphabet{\mathsf}{normal}{\encodingdefault}{\sfdefault}{m}{n}%
\SetMathAlphabet{\mathrm}{normal}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
\SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{b}{n}%
\DeclareSymbolFontAlphabet{\lbit}{italics}
%
% thanks to Howard Marvel for prompting me to set up the
% math accents properly for Y\&Y names.
\DeclareSymbolFontAlphabet{\bbold}{arrows}
\ifnum\Lucida@names=0
 \DeclareMathAccent\vec  {\mathord}{letters}{"7E}
\else
 \DeclareMathAccent\vec  {\mathord}{letters}{"7E}
 \DeclareMathAccent\dot  {\mathalpha}{operators}{"C7}
\fi
%
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 
%       This section derives mostly from lcdmacro.tex and amssymblb.tex
%       Copyright (C) 1991, 1992 Y&Y. All Rights Reserved
%               Version 1.2             1992 June 14
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 
% Some modifications due to Bram de Jager
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** %
\expandafter\ifx\csname amsfonts.sty\endcsname\relax %MJD%
% %MJD% Then amsfonts.sty is not in use.
  \def\big#1{{\hbox{$\left#1\vbox to8.20\p@{}\right.\n@space$}}}
  \def\Big#1{{\hbox{$\left#1\vbox to10.80\p@{}\right.\n@space$}}}
  \def\bigg#1{{\hbox{$\left#1\vbox to13.42\p@{}\right.\n@space$}}}
  \def\Bigg#1{{\hbox{$\left#1\vbox to16.03\p@{}\right.\n@space$}}}
  \def\biggg#1{{\hbox{$\left#1\vbox to17.72\p@{}\right.\n@space$}}}
  \def\Biggg#1{{\hbox{$\left#1\vbox to21.25\p@{}\right.\n@space$}}}
  \def\n@space{\nulldelimiterspace\z@ \m@th}
\else %MJD%
% %MJD% It's possible the factors 1.5, 2, 2.5, 3, 3.5 should be adjusted
% %MJD% for Lucida fonts. But that has to be determined by looking at
% %MJD% printed tests which I cannot do at the moment. [mjd,24-Jun-1993]
  \def\biggg{\bBigg@\thr@@} %MJD%
  \def\Biggg{\bBigg@{3.5}} %MJD%
\fi %MJD%
% define some extra large sizes - always done using extensible parts
\def\bigggl{\mathopen\biggg}
\def\bigggr{\mathclose\biggg}
\def\Bigggl{\mathopen\Biggg}
\def\Bigggr{\mathclose\Biggg}
%
%  Following is only really needed if the roman text font is NOT LucidaBright
%  Draw the small sizes of `[' and `]' from math italic instead of roman font
\mathcode`\[="4186 \delcode`\[="186302 
\mathcode`\]="5187 \delcode`\]="187303
%  Draw the small sizes of `(' and `)' from math italic instead of roman font
\mathcode`\(="4184 \delcode`\(="184300
\mathcode`\)="5185 \delcode`\)="185301
%  Draw  `=' and `+' from symbol font instead of roman
\mathcode`\=="3283 
\mathcode`\+="2282
% Draw small `/' from math italic instead of roman font
\mathcode`\/="013D \delcode`\/="13D30E
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** %
% Make open face brackets accessible, i.e. [[ and ]]
\def\ldbrack{\delimiter"4182382 }
\def\rdbrack{\delimiter"5183383 }
% Provide access to surface integral signs (linked from text to display size)
\DeclareMathSymbol{\surfintop}{1}{largesymbols}{"90}
\def\surfint{\surfintop\nolimits}
% Make medium size integrals available (NOT linked to display size)
\DeclareMathSymbol{\midintop}{1}{largesymbols}{"92} 
\def\midint{\midintop\nolimits}
\DeclareMathSymbol{\midointop}{1}{largesymbols}{"93}
\def\midoint{\midointop\nolimits}
\DeclareMathSymbol{\midsurfintop}{1}{largesymbols}{"94}
\def\midsurfint{\midsurfintop\nolimits}
% Extensible integral (use with \bigg, \Bigg, \biggg, \Biggg etc)
\def\largeint{\delimiter"135A395 }
% Various types of small integrals
% \DeclareMathSymbol{\dblint}{0}{letters}{"88}
% \DeclareMathSymbol{\trplint}{0}{letters}{"89}
% \DeclareMathSymbol{\contint}{0}{letters}{"8A}
% \DeclareMathSymbol{\surfint}{0}{letters}{"8B}
% \DeclareMathSymbol{\volint}{0}{letters}{"8C}
% \DeclareMathSymbol{\clwint}{0}{letters}{"8D}
% \DeclareMathSymbol{\cclwcint}{0}{letters}{"8E}
% \DeclareMathSymbol{\clwcint}{0}{letters}{"8F}
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** %
% To close up gaps in special math characters constructed from pieces
\def\joinrel{\mathrel{\mkern-4mu}} % \def\joinrel{\mathrel{\mkern-3mu}}
% Some characters that need construction in CM exist complete in math
% italic or math symbol font
\let\bowtie\undefined
\let\models\undefined
\let\doteq\undefined
\let\cong\undefined
\let\angle\undefined
\DeclareMathSymbol{\bowtie}{3}{letters}{"F6}
\DeclareMathSymbol{\models}{3}{symbols}{"EE}
\DeclareMathSymbol{\doteq}{3}{symbols}{"C9}
\DeclareMathSymbol{\cong}{3}{symbols}{"9B}
\DeclareMathSymbol{\angle}{0}{symbols}{"8B}
% these need undefining so that we can redeclare them
\let\Box\undefined
\let\Diamond\undefined
\let\leadsto\undefined
\let\neq\undefined
\let\hookleftarrow\undefined
\let\hookrightarrow\undefined
\let\mapsto\undefined
\let\notin\undefined
\let\circle\undefined
\let\iff\undefined
\let\rightleftharpoons\undefined
% Other characters may be found in LucidaNewMath-Arrows (more negated later)
\DeclareMathSymbol{\neq}{3}{arrows}{"94}
\DeclareMathSymbol{\rightleftharpoons}{3}{arrows}{"7A}
\DeclareMathSymbol{\leftrightharpoons}{3}{arrows}{"79}
\DeclareMathSymbol{\hookleftarrow}{3}{arrows}{"3C}
\DeclareMathSymbol{\hookrightarrow}{3}{arrows}{"3E}
\DeclareMathSymbol{\mapsto}{3}{arrows}{"2C}
\def\longmapsto{\mapstochar\longrightarrow}
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** %
% SPECIAL LaTeX character definitions (originally from LaTeX symbol font)
\let\Join\undefined
\let\rhd\undefined
\let\lhd\undefined
\let\unrhd\undefined
\let\unlhd\undefined
\DeclareMathSymbol{\Join}{3}{letters}{"F6}
\DeclareMathSymbol{\rhd}{3}{letters}{"2E}
\DeclareMathSymbol{\lhd}{3}{letters}{"2F}
\DeclareMathSymbol{\unlhd}{3}{symbols}{"F4}
\DeclareMathSymbol{\unrhd}{3}{symbols}{"F5}
\DeclareMathSymbol{\Box}{0}{arrows}{"02} 
\DeclareMathSymbol{\Diamond}{0}{arrows}{"08}
\DeclareMathSymbol{\leadsto}{3}{arrows}{"8E} 
\DeclareMathSymbol{\leadsfrom}{3}{arrows}{"8D}
\def\mathstrut{\vphantom{f}}
\expandafter\ifx\csname ds@amstex\endcsname\relax %MJD% 
% %MJD% Then amstex.sty not in use: modify \matrix it to adjust the
% %MJD% first and last line vertical spacing slightly; otherwise leave
% %MJD% it alone.
%
% following changed because fonts (i.e. math italic) not `at full scale'
  \def\matrix#1{\null\,\vcenter{\normalbaselines\m@th
    \ialign{\hfil$##$\hfil&&\quad\hfil$##$\hfil\crcr
      \mathstrut\crcr\noalign{\kern-0.9\baselineskip}
     #1\crcr\mathstrut\crcr\noalign{\kern-0.9\baselineskip}}}\,}
\fi %MJD%
% In n-th root, don't want the `n' to come too close to the radical
\def\r@@t#1#2{\setbox\z@\hbox{$\m@th#1\sqrt{#2}$}
  \dimen@\ht\z@ \advance\dimen@-\dp\z@
  \mkern5mu\raise.6\dimen@\copy\rootbox \mkern-7.5mu \box\z@}
% The following are the standard plain TeX defaults for CM
% \delimiterfactor=901
% \delimitershortfall=5pt
% \nulldelimiterspace=1.2pt
% \scriptspace=0.5pt
% \thinmuskip=3mu
% \medmuskip=4mu plus 2mu minus 4mu
% \thickmuskip=5mu plus 5mu
% Here are some extra definitions of mathematical symbols and operators
% {\buildrel \rm def \over =}
\DeclareMathSymbol{\defineequal}{3}{symbols}{"D6}
% Here are some negated operators from LucidaNewMath-Arrows:
\DeclareMathSymbol{\notleq}{3}{arrows}{"9C}
\DeclareMathSymbol{\notgeq}{3}{arrows}{"9D}
\DeclareMathSymbol{\notequiv}{3}{arrows}{"95}
\DeclareMathSymbol{\notprec}{3}{arrows}{"E5}
\DeclareMathSymbol{\notsucc}{3}{arrows}{"E6}
\DeclareMathSymbol{\notapprox}{3}{arrows}{"98}
\DeclareMathSymbol{\notpreceq}{3}{arrows}{"E7}
\DeclareMathSymbol{\notsucceq}{3}{arrows}{"E8}
\DeclareMathSymbol{\notasymp}{3}{arrows}{"F3}
\DeclareMathSymbol{\notsubset}{3}{arrows}{"C6}
\DeclareMathSymbol{\notsupset}{3}{arrows}{"C7}
\DeclareMathSymbol{\notsim}{3}{arrows}{"96}
\DeclareMathSymbol{\notsubseteq}{3}{arrows}{"C8}
\DeclareMathSymbol{\notsupseteq}{3}{arrows}{"C9}
\DeclareMathSymbol{\notsimeq}{3}{arrows}{"97}
\DeclareMathSymbol{\notsqsubseteq}{3}{arrows}{"D4}
\DeclareMathSymbol{\notsqsupseteq}{3}{arrows}{"D5}
\DeclareMathSymbol{\notcong}{3}{arrows}{"99}
\DeclareMathSymbol{\notin}{3}{arrows}{"1D}
\DeclareMathSymbol{\notni}{3}{arrows}{"1F}
\DeclareMathSymbol{\notvdash}{3}{arrows}{"F8}
\DeclareMathSymbol{\notmodels}{3}{arrows}{"F9}
\DeclareMathSymbol{\notparallel}{3}{arrows}{"F7}
\DeclareMathSymbol{\noteq}{3}{arrows}{"94}
\DeclareMathSymbol{\notless}{3}{arrows}{"9A}
\DeclareMathSymbol{\notgreater}{3}{arrows}{"9B}
\DeclareMathSymbol{\notmid}{3}{arrows}{"F6}
% *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** %
% Now for some AMS TeX items
% Start with black-board bold (open face) characters
\expandafter\ifx\csname amsfonts.sty\endcsname\relax %MJD%
% %MJD% Then amsfonts.sty not in use.
  \def\nonmatherr@#1{\errmessage{\string#1\space allowed only in math mode}}
  \def\Bbb{\relax\ifmmode\expandafter\Bbb@\else
   \expandafter\nonmatherr@\expandafter\Bbb\fi}
\fi %MJD%
\let\Bbb@\bbold
% lplain.tex draws upper case (upright) greek from cmr10 ---
% when using the Cork encoding, that isn't there, so its been put
% in the extension font (largesymbols)
\DeclareMathSymbol{\Gamma}{0}{largesymbols}{'320}
\DeclareMathSymbol{\Delta}{0}{largesymbols}{'321}
\DeclareMathSymbol{\Theta}{0}{largesymbols}{'322}
\DeclareMathSymbol{\Lambda}{0}{largesymbols}{'323}
\DeclareMathSymbol{\Xi}{0}{largesymbols}{'324}
\DeclareMathSymbol{\Pi}{0}{largesymbols}{'325}
\DeclareMathSymbol{\Sigma}{0}{largesymbols}{'326}
\DeclareMathSymbol{\Upsilon}{0}{largesymbols}{'327}
\DeclareMathSymbol{\Phi}{0}{largesymbols}{'330}
\DeclareMathSymbol{\Psi}{0}{largesymbols}{'331}
\DeclareMathSymbol{\Omega}{0}{largesymbols}{'332}
\DeclareMathSymbol{\varGamma}{0}{letters}{"00}
\DeclareMathSymbol{\varDelta}{0}{letters}{"01}
\DeclareMathSymbol{\varTheta}{0}{letters}{"02}
\DeclareMathSymbol{\varLambda}{0}{letters}{"03}
\DeclareMathSymbol{\varXi}{0}{letters}{"04}
\DeclareMathSymbol{\varPi}{0}{letters}{"05}
\DeclareMathSymbol{\varSigma}{0}{letters}{"06}
\DeclareMathSymbol{\varUpsilon}{0}{letters}{"07}
\DeclareMathSymbol{\varPhi}{0}{letters}{"08}
\DeclareMathSymbol{\varPsi}{0}{letters}{"09}
\DeclareMathSymbol{\varOmega}{0}{letters}{"0A}
%
% Definitions for math symbols and operators 
%  --- normally found in the fonts MSAM* and MSBM* ---
%  using LucidaNewMath fonts 
%  Definitions followed by question marks represent less than ideal matches.
% MSAM* equivalents
\DeclareMathSymbol{\boxdot}{2}{symbols}{"ED}
\DeclareMathSymbol{\boxplus}{2}{symbols}{"EA}
\DeclareMathSymbol{\boxtimes}{2}{symbols}{"EC}
\DeclareMathSymbol{\square}{0}{arrows}{"02}
\DeclareMathSymbol{\blacksquare}{0}{arrows}{"03}
%\DeclareMathSymbol{\circle}{0}{arrows}{"00}
%\DeclareMathSymbol{\blackcircle}{0}{arrows}{"01}
\DeclareMathSymbol{\centerdot}{2}{arrows}{"E1}
\DeclareMathSymbol{\lozenge}{0}{arrows}{"08}
\DeclareMathSymbol{\blacklozenge}{0}{arrows}{"09}
\DeclareMathSymbol{\circlearrowright}{3}{arrows}{"8C}
\DeclareMathSymbol{\circlearrowleft}{3}{arrows}{"8B}
\DeclareMathSymbol{\rightleftharpoons}{3}{arrows}{"7A}
\DeclareMathSymbol{\leftrightharpoons}{3}{arrows}{"79}
\DeclareMathSymbol{\boxminus}{2}{symbols}{"EB}
\DeclareMathSymbol{\Vdash}{3}{symbols}{"F0}
\DeclareMathSymbol{\Vvdash}{3}{letters}{"D3}
\DeclareMathSymbol{\vDash}{3}{symbols}{"EE}
\DeclareMathSymbol{\twoheadrightarrow}{3}{arrows}{"25}
\DeclareMathSymbol{\twoheadleftarrow}{3}{arrows}{"23}
\DeclareMathSymbol{\leftleftarrows}{3}{arrows}{"71}
\DeclareMathSymbol{\rightrightarrows}{3}{arrows}{"73}
\DeclareMathSymbol{\upuparrows}{3}{arrows}{"72}
\DeclareMathSymbol{\downdownarrows}{3}{arrows}{"74}
\DeclareMathSymbol{\upharpoonright}{3}{arrows}{"75}
\DeclareMathSymbol{\downharpoonright}{3}{arrows}{"77}
\DeclareMathSymbol{\upharpoonleft}{3}{arrows}{"76}
\DeclareMathSymbol{\downharpoonleft}{3}{arrows}{"78}
\DeclareMathSymbol{\rightarrowtail}{3}{arrows}{"29}
\DeclareMathSymbol{\leftarrowtail}{3}{arrows}{"28}
\DeclareMathSymbol{\leftrightarrows}{3}{arrows}{"6E}
\DeclareMathSymbol{\rightleftarrows}{3}{arrows}{"6D}
\DeclareMathSymbol{\Lsh}{3}{arrows}{"7B}
\DeclareMathSymbol{\Rsh}{3}{arrows}{"7D}
\DeclareMathSymbol{\rightsquigarrow}{3}{arrows}{"8E}
\DeclareMathSymbol{\leftsquigarrow}{3}{arrows}{"8D}
\DeclareMathSymbol{\leftrightsquigarrow}{3}{arrows}{"91}
\DeclareMathSymbol{\looparrowleft}{3}{arrows}{"3F}
\DeclareMathSymbol{\looparrowright}{3}{arrows}{"40}
\DeclareMathSymbol{\circeq}{3}{symbols}{"D0}
\DeclareMathSymbol{\succsim}{3}{symbols}{"E1}
\DeclareMathSymbol{\gtrsim}{3}{symbols}{"DD}
\DeclareMathSymbol{\gtrapprox}{3}{letters}{"DB}
\DeclareMathSymbol{\multimap}{3}{letters}{"C7}
\DeclareMathSymbol{\image}{3}{letters}{"C6}
\DeclareMathSymbol{\original}{3}{letters}{"C5}
\DeclareMathSymbol{\therefore}{3}{symbols}{"90}
\DeclareMathSymbol{\because}{3}{symbols}{"91}
\DeclareMathSymbol{\doteqdot}{3}{symbols}{"CA}
\DeclareMathSymbol{\triangleq}{3}{symbols}{"D5}
\DeclareMathSymbol{\precsim}{3}{symbols}{"E0}
\DeclareMathSymbol{\lesssim}{3}{symbols}{"DC}
\DeclareMathSymbol{\lessapprox}{3}{letters}{"DA}
\DeclareMathSymbol{\eqslantless}{3}{letters}{"E2}
\DeclareMathSymbol{\eqslantgtr}{3}{letters}{"E3}
\DeclareMathSymbol{\curlyeqprec}{3}{letters}{"E6}
\DeclareMathSymbol{\curlyeqsucc}{3}{letters}{"E7}
\DeclareMathSymbol{\preccurlyeq}{3}{letters}{"E4}
\DeclareMathSymbol{\leqq}{3}{symbols}{"DA}
\DeclareMathSymbol{\leqslant}{3}{letters}{"E0}
\DeclareMathSymbol{\lessgtr}{3}{symbols}{"DE}
\DeclareMathSymbol{\backprime}{0}{letters}{"C8}
\DeclareMathSymbol{\axisshort}{0}{arrows}{"39}
\DeclareMathSymbol{\risingdotseq}{3}{symbols}{"CC}
\DeclareMathSymbol{\fallingdotseq}{3}{symbols}{"CB}
\DeclareMathSymbol{\succcurlyeq}{3}{letters}{"E5}
\DeclareMathSymbol{\geqq}{3}{symbols}{"DB}
\DeclareMathSymbol{\geqslant}{3}{letters}{"E1}
\DeclareMathSymbol{\gtrless}{3}{symbols}{"DF}
\let\sqsubset\undefined
\let\sqsupset\undefined
\DeclareMathSymbol{\sqsubset}{3}{symbols}{"E4}
\DeclareMathSymbol{\sqsupset}{3}{symbols}{"E5}
\DeclareMathSymbol{\vartriangleright}{3}{letters}{"2E}
\DeclareMathSymbol{\vartriangleleft}{3}{letters}{"2F}
\DeclareMathSymbol{\trianglerighteq}{3}{symbols}{"F5}
\DeclareMathSymbol{\trianglelefteq}{3}{symbols}{"F4}
\DeclareMathSymbol{\bigstar}{0}{arrows}{"AB}
\DeclareMathSymbol{\between}{3}{letters}{"F2}
\DeclareMathSymbol{\blacktriangledown}{0}{arrows}{"07}
\DeclareMathSymbol{\blacktriangleright}{3}{letters}{"F1}
\DeclareMathSymbol{\blacktriangleleft}{3}{letters}{"F0}
\DeclareMathSymbol{\arrowaxisright}{0}{arrows}{"37}
\DeclareMathSymbol{\arrowaxisleft}{0}{arrows}{"36}
\DeclareMathSymbol{\vartriangle}{3}{arrows}{"04}
\DeclareMathSymbol{\blacktriangle}{0}{arrows}{"05}
\DeclareMathSymbol{\triangledown}{0}{arrows}{"06}
\DeclareMathSymbol{\eqcirc}{3}{symbols}{"CF}
\DeclareMathSymbol{\lesseqgtr}{3}{letters}{"E8}
\DeclareMathSymbol{\gtreqless}{3}{letters}{"E9}
\DeclareMathSymbol{\lesseqqgtr}{3}{letters}{"EA}
\DeclareMathSymbol{\gtreqqless}{3}{letters}{"EB}
\DeclareMathSymbol{\Rrightarrow}{3}{arrows}{"6C}
\DeclareMathSymbol{\Lleftarrow}{3}{arrows}{"6A}
\DeclareMathSymbol{\veebar}{2}{letters}{"D2}
\DeclareMathSymbol{\barwedge}{2}{symbols}{"F6}
\DeclareMathSymbol{\angle}{0}{symbols}{"8B}
\DeclareMathSymbol{\measuredangle}{0}{symbols}{"8C}
\DeclareMathSymbol{\sphericalangle}{0}{symbols}{"8D}
\DeclareMathSymbol{\varpropto}{3}{symbols}{"2F} % ?
\DeclareMathSymbol{\smallsmile}{3}{letters}{"5E} % ? 
\DeclareMathSymbol{\smallfrown}{3}{letters}{"5F} % ?       
\DeclareMathSymbol{\Subset}{3}{symbols}{"F8}
\DeclareMathSymbol{\Supset}{3}{symbols}{"F9}
\DeclareMathSymbol{\Cup}{2}{symbols}{"FA}
\DeclareMathSymbol{\Cap}{2}{symbols}{"FB}
\DeclareMathSymbol{\curlywedge}{2}{symbols}{"84}
\DeclareMathSymbol{\curlyvee}{2}{symbols}{"85}
\DeclareMathSymbol{\leftthreetimes}{2}{letters}{"D0}
\DeclareMathSymbol{\rightthreetimes}{2}{letters}{"D1}
\DeclareMathSymbol{\subseteqq}{3}{letters}{"EE}
\DeclareMathSymbol{\supseteqq}{3}{letters}{"EF}
\DeclareMathSymbol{\bumpeq}{3}{symbols}{"C8}
\DeclareMathSymbol{\Bumpeq}{3}{symbols}{"C7}
\DeclareMathSymbol{\lll}{3}{letters}{"DE}
\DeclareMathSymbol{\ggg}{3}{letters}{"DF}
\DeclareMathSymbol{\circledS}{0}{letters}{"CA}
\DeclareMathSymbol{\pitchfork}{3}{letters}{"F3}
\DeclareMathSymbol{\dotplus}{2}{symbols}{"89}
\DeclareMathSymbol{\backsim}{3}{letters}{"F8}
\DeclareMathSymbol{\backsimeq}{3}{letters}{"F9}
\DeclareMathSymbol{\complement}{0}{letters}{"94}
\DeclareMathSymbol{\intercal}{2}{letters}{"D9}
\DeclareMathSymbol{\circledcirc}{2}{symbols}{"E6}
\DeclareMathSymbol{\circledast}{2}{symbols}{"E7}
\DeclareMathSymbol{\circleddash}{2}{letters}{"CC}
% MSBM* equivalents
\DeclareMathSymbol{\lvertneqq}{3}{arrows}{"DE}
\DeclareMathSymbol{\gvertneqq}{3}{arrows}{"DF}
\DeclareMathSymbol{\nleq}{3}{arrows}{"9C}
\DeclareMathSymbol{\ngeq}{3}{arrows}{"9D}
\DeclareMathSymbol{\nless}{3}{arrows}{"9A}
\DeclareMathSymbol{\ngtr}{3}{arrows}{"9B}
\DeclareMathSymbol{\nprec}{3}{arrows}{"E5}
\DeclareMathSymbol{\nsucc}{3}{arrows}{"E6}
\DeclareMathSymbol{\lneqq}{3}{arrows}{"DC}
\DeclareMathSymbol{\gneqq}{3}{arrows}{"DD}
\DeclareMathSymbol{\nleqslant}{3}{arrows}{"D6}
\DeclareMathSymbol{\ngeqslant}{3}{arrows}{"D7}
\DeclareMathSymbol{\lneq}{3}{arrows}{"DA}
\DeclareMathSymbol{\gneq}{3}{arrows}{"DB}
\DeclareMathSymbol{\npreceq}{3}{arrows}{"E7}
\DeclareMathSymbol{\nsucceq}{3}{arrows}{"E8}
\DeclareMathSymbol{\precnsim}{3}{arrows}{"EB}
\DeclareMathSymbol{\succnsim}{3}{arrows}{"EC}
\DeclareMathSymbol{\lnsim}{3}{arrows}{"E0}
\DeclareMathSymbol{\gnsim}{3}{arrows}{"E2}
\DeclareMathSymbol{\nleqq}{3}{arrows}{"D8}
\DeclareMathSymbol{\ngeqq}{3}{arrows}{"D9}
\DeclareMathSymbol{\precneqq}{3}{arrows}{"E9}
\DeclareMathSymbol{\succneqq}{3}{arrows}{"EA}
\DeclareMathSymbol{\precnapprox}{3}{arrows}{"ED}
\DeclareMathSymbol{\succnapprox}{3}{arrows}{"EE}
\DeclareMathSymbol{\lnapprox}{3}{arrows}{"E3}
\DeclareMathSymbol{\gnapprox}{3}{arrows}{"E4}
\DeclareMathSymbol{\nsim}{3}{arrows}{"96}
\DeclareMathSymbol{\ncong}{3}{arrows}{"99}
\DeclareMathSymbol{\diagup}{3}{arrows}{"0B}
\DeclareMathSymbol{\diagdown}{3}{arrows}{"0C}
\DeclareMathSymbol{\varsubsetneq}{3}{arrows}{"D0}
\DeclareMathSymbol{\varsupsetneq}{3}{arrows}{"D1}
\DeclareMathSymbol{\nsubseteqq}{3}{arrows}{"CA}
\DeclareMathSymbol{\nsupseteqq}{3}{arrows}{"CB}
\DeclareMathSymbol{\subsetneqq}{3}{arrows}{"CE}
\DeclareMathSymbol{\supsetneqq}{3}{arrows}{"CF}
\DeclareMathSymbol{\varsubsetneqq}{3}{arrows}{"D2}
\DeclareMathSymbol{\varsupsetneqq}{3}{arrows}{"D3}
\DeclareMathSymbol{\subsetneq}{3}{arrows}{"CC}
\DeclareMathSymbol{\supsetneq}{3}{arrows}{"CD}
\DeclareMathSymbol{\nsubseteq}{3}{arrows}{"C8}
\DeclareMathSymbol{\nsupseteq}{3}{arrows}{"C9}
\DeclareMathSymbol{\nparallel}{3}{arrows}{"F7}
\DeclareMathSymbol{\nmid}{3}{arrows}{"F6}
\DeclareMathSymbol{\nshortmid}{3}{arrows}{"F4}
\DeclareMathSymbol{\nshortparallel}{3}{arrows}{"F5}
\DeclareMathSymbol{\nvdash}{3}{arrows}{"F8}
\DeclareMathSymbol{\nVdash}{3}{arrows}{"FA}
\DeclareMathSymbol{\nvDash}{3}{arrows}{"F9}
\DeclareMathSymbol{\nVDash}{3}{arrows}{"FB}
\DeclareMathSymbol{\ntrianglerighteq}{3}{arrows}{"F2}
\DeclareMathSymbol{\ntrianglelefteq}{3}{arrows}{"F1}
\DeclareMathSymbol{\ntriangleleft}{3}{arrows}{"EF}
\DeclareMathSymbol{\ntriangleright}{3}{arrows}{"F0}
\DeclareMathSymbol{\nleftarrow}{3}{arrows}{"32}
\DeclareMathSymbol{\nrightarrow}{3}{arrows}{"33}
\DeclareMathSymbol{\nLeftarrow}{3}{arrows}{"66}
\DeclareMathSymbol{\nRightarrow}{3}{arrows}{"68}
\DeclareMathSymbol{\nLeftrightarrow}{3}{arrows}{"67}
\DeclareMathSymbol{\nleftrightarrow}{3}{arrows}{"34}
\DeclareMathSymbol{\divideontimes}{2}{letters}{"F7}
% \DeclareMathSymbol{\varnothing}{0}{symbols}{"3B}
\DeclareMathSymbol{\varnothing}{0}{letters}{"9C}
\DeclareMathSymbol{\nexists}{0}{arrows}{"20}
\DeclareMathSymbol{\Finv}{0}{letters}{"90}
\DeclareMathSymbol{\Game}{0}{letters}{"91}
\let\mho\undefined
\DeclareMathSymbol{\mho}{0}{letters}{"92}
\DeclareMathSymbol{\simeq}{3}{symbols}{"27}
\DeclareMathSymbol{\eqsim}{3}{symbols}{"99}
\DeclareMathSymbol{\beth}{0}{letters}{"95}
\DeclareMathSymbol{\gimel}{0}{letters}{"96}
\DeclareMathSymbol{\daleth}{0}{letters}{"97}
\DeclareMathSymbol{\lessdot}{3}{letters}{"DC}
\DeclareMathSymbol{\gtrdot}{3}{letters}{"DD}
\DeclareMathSymbol{\ltimes}{2}{letters}{"CE}
\DeclareMathSymbol{\rtimes}{2}{letters}{"CF}
\DeclareMathSymbol{\shortmid}{3}{letters}{"F4}
\DeclareMathSymbol{\shortparallel}{3}{letters}{"F5}
\DeclareMathSymbol{\smallsetminus}{2}{letters}{"D8} %?
\DeclareMathSymbol{\thicksim}{3}{symbols}{"18} %?
\DeclareMathSymbol{\thickapprox}{3}{symbols}{"19} %?      
\DeclareMathSymbol{\approxeq}{3}{symbols}{"9D}
\DeclareMathSymbol{\succapprox}{3}{letters}{"ED}
\DeclareMathSymbol{\precapprox}{3}{letters}{"EC}
\DeclareMathSymbol{\curvearrowleft}{3}{arrows}{"87}
\DeclareMathSymbol{\curvearrowright}{3}{arrows}{"88}
\DeclareMathSymbol{\digamma}{0}{letters}{"46} %?
\DeclareMathSymbol{\varkappa}{0}{letters}{"9B}
\DeclareMathSymbol{\Bbbk}{0}{arrows}{"6B}
\DeclareMathSymbol{\hslash}{0}{letters}{"9D}
\DeclareMathSymbol{\hbar}{0}{arrows}{"1B}
\DeclareMathSymbol{\backepsilon}{3}{letters}{"FB} %?
\DeclareMathSymbol{\dashrightarrow}{0}{arrows}{"3A}
\DeclareMathSymbol{\dashleftarrow}{0}{arrows}{"38}
\DeclareMathSymbol{\dashuparrow}{0}{arrows}{"39}
\DeclareMathSymbol{\dashdownarrow}{0}{arrows}{"3B}
\DeclareMathDelimiter\ulcorner{4}{arrows}{"70}{arrows}{"70}
\DeclareMathDelimiter\urcorner{5}{arrows}{"71}{arrows}{"71}
\DeclareMathDelimiter\llcorner{4}{arrows}{"78}{arrows}{"78}
\DeclareMathDelimiter\lrcorner{5}{arrows}{"79}{arrows}{"79}
% Following only to define \mathhexbox for \checkmark, \circledR, \maltese
\expandafter\ifx\csname amstext.sty\endcsname\relax %MJD%
% %MJD% then amstext.sty not in use. OK to redefine \text.
  \def\RIfM@{\relax\ifmmode}
  \def\DN@{\def\next@}
  \def\eat@#1{}
  \newif\iffirstchoice@
  \firstchoice@true
  \def\text@#1{\mathchoice
   {\hbox{\everymath{\displaystyle}\def\textfonti{\the\textfont\@ne}%
    \def\textfontii{\the\textfont\tw@}\textdef@@ T#1}}
   {\hbox{\firstchoice@false
    \everymath{\textstyle}\def\textfonti{\the\textfont\@ne}%
    \def\textfontii{\the\textfont\tw@}\textdef@@ T#1}}
   {\hbox{\firstchoice@false
    \everymath{\scriptstyle}\def\textfonti{\the\scriptfont\@ne}%
    \def\textfontii{\the\scriptfont\tw@}\textdef@@ S\rm#1}}
   {\hbox{\firstchoice@false
    \everymath{\scriptscriptstyle}\def\textfonti
    {\the\scriptscriptfont\@ne}%
    \def\textfontii{\the\scriptscriptfont\tw@}\textdef@@ s\rm#1}}}
  \def\textdef@@#1{\textdef@#1\rm\textdef@#1\bf\textdef@#1\sl\textdef@#1\it}
  \def\text@@#1{\leavevmode\hbox{#1}}
  \def\rmfam{0}
  \def\textdef@#1#2{%
   \DN@{\csname\expandafter\eat@\string#2fam\endcsname}%
   \if S#1\edef#2{\the\scriptfont\next@\relax}%
   \else\if s#1\edef#2{\the\scriptscriptfont\next@\relax}%
   \else\edef#2{\the\textfont\next@\relax}\fi\fi}
  \def\text{\RIfM@\expandafter\text@\else\expandafter\text@@\fi}
  \def\mathhexbox@#1#2#3{\text{$\m@th\mathchar"#1#2#3$}}
\fi %MJD%
\xdef\checkmark{\noexpand\mathhexbox\hexnumber@\symarrows 58 }
\def\lmathhexbox#1#2#3{\leavevmode
  \hbox{$\m@th \mathchar"#1#2#3$}}
\def \circledR  {\lmathhexbox1C9 }
\def \maltese   {\lmathhexbox1CB }
% changes to lplain. i dont like 22C, so:
\let\Leftrightarrow\undefined
\DeclareMathSymbol{\Leftrightarrow}{3}{arrows}{"61}
%</lucidabright>
%    \end{macrocode}
%    \begin{macrocode}
%<*lucbrb>
\ProvidesPackage{lucidbrb}[\filedate\space\fileversion\space
 PSNFSS2e LaTeX2e package]
\RequirePackage{lucbr}
%</lucbrb>
%    \end{macrocode}
%    \begin{macrocode}
%<*lucbry>
\ProvidesPackage{lucidbry}[\filedate\space\fileversion\space
 PSNFSS2e LaTeX2e package]
\RequirePackage[yy]{lucbr}
%</lucbry>
%    \end{macrocode}
% \Finale
\endinput
%
%% \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         \~}