trunk/Master/texmf-dist/source/latex/psnfss

git-svn-id: svn://tug.org/texlive/trunk@471 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 1179 insertions, 0 deletions

diff --git a/Master/texmf-dist/source/latex/psnfss/8r.enc b/Master/texmf-dist/source/latex/psnfss/8r.enc
new file mode 100644
index 00000000000..40dbe904190
--- /dev/null
+++ b/Master/texmf-dist/source/latex/psnfss/8r.enc
@@ -0,0 +1,143 @@
+% File 8r.enc  TeX Base 1 Encoding  Revision 2.0  2002-10-30
+%
+% @@psencodingfile@{
+%   author    = "S. Rahtz, P. MacKay, Alan Jeffrey, B. Horn, K. Berry,
+%                W. Schmidt, P. Lehman",
+%   version   = "2.0",
+%   date      = "30 October 2002",
+%   filename  = "8r.enc",
+%   email     = "tex-fonts@@tug.org",
+%   docstring = "This is the encoding vector for Type1 and TrueType
+%                fonts to be used with TeX.  This file is part of the
+%                PSNFSS bundle, version 9"
+% @}
+% 
+% The idea is to have all the characters normally included in Type 1 fonts
+% available for typesetting. This is effectively the characters in Adobe
+% Standard encoding, ISO Latin 1, Windows ANSI including the euro symbol,
+% MacRoman, and some extra characters from Lucida.
+% 
+% Character code assignments were made as follows:
+% 
+% (1) the Windows ANSI characters are almost all in their Windows ANSI
+% positions, because some Windows users cannot easily reencode the
+% fonts, and it makes no difference on other systems. The only Windows
+% ANSI characters not available are those that make no sense for
+% typesetting -- rubout (127 decimal), nobreakspace (160), softhyphen
+% (173). quotesingle and grave are moved just because it's such an
+% irritation not having them in TeX positions.
+% 
+% (2) Remaining characters are assigned arbitrarily to the lower part
+% of the range, avoiding 0, 10 and 13 in case we meet dumb software.
+% 
+% (3) Y&Y Lucida Bright includes some extra text characters; in the
+% hopes that other PostScript fonts, perhaps created for public
+% consumption, will include them, they are included starting at 0x12.
+% These are /dotlessj /ff /ffi /ffl.
+% 
+% (4) hyphen appears twice for compatibility with both ASCII and Windows.
+%
+% (5) /Euro was assigned to 128, as in Windows ANSI
+%
+% (6) Missing characters from MacRoman encoding incorporated as follows:
+%
+%     PostScript      MacRoman        TeXBase1
+%     --------------  --------------  --------------
+%     /notequal       173             0x16
+%     /infinity       176             0x17
+%     /lessequal      178             0x18
+%     /greaterequal   179             0x19
+%     /partialdiff    182             0x1A
+%     /summation      183             0x1B
+%     /product        184             0x1C
+%     /pi             185             0x1D
+%     /integral       186             0x81
+%     /Omega          189             0x8D
+%     /radical        195             0x8E
+%     /approxequal    197             0x8F
+%     /Delta          198             0x9D
+%     /lozenge        215             0x9E
+%
+/TeXBase1Encoding [
+% 0x00
+ /.notdef /dotaccent /fi /fl
+ /fraction /hungarumlaut /Lslash /lslash
+ /ogonek /ring /.notdef /breve
+ /minus /.notdef /Zcaron /zcaron
+% 0x10
+ /caron /dotlessi /dotlessj /ff
+ /ffi /ffl /notequal /infinity
+ /lessequal /greaterequal /partialdiff /summation
+ /product /pi /grave /quotesingle
+% 0x20
+ /space /exclam /quotedbl /numbersign
+ /dollar /percent /ampersand /quoteright
+ /parenleft /parenright /asterisk /plus
+ /comma /hyphen /period /slash
+% 0x30
+ /zero /one /two /three
+ /four /five /six /seven
+ /eight /nine /colon /semicolon
+ /less /equal /greater /question
+% 0x40
+ /at /A /B /C
+ /D /E /F /G
+ /H /I /J /K
+ /L /M /N /O
+% 0x50
+ /P /Q /R /S
+ /T /U /V /W
+ /X /Y /Z /bracketleft
+ /backslash /bracketright /asciicircum /underscore
+% 0x60
+ /quoteleft /a /b /c
+ /d /e /f /g
+ /h /i /j /k
+ /l /m /n /o
+% 0x70
+ /p /q /r /s
+ /t /u /v /w
+ /x /y /z /braceleft
+ /bar /braceright /asciitilde /.notdef
+% 0x80
+ /Euro /integral /quotesinglbase /florin
+ /quotedblbase /ellipsis /dagger /daggerdbl
+ /circumflex /perthousand /Scaron /guilsinglleft
+ /OE /Omega /radical /approxequal
+% 0x90
+ /.notdef /.notdef /.notdef /quotedblleft
+ /quotedblright /bullet /endash /emdash
+ /tilde /trademark /scaron /guilsinglright
+ /oe /Delta /lozenge /Ydieresis
+% 0xA0
+ /.notdef /exclamdown /cent /sterling
+ /currency /yen /brokenbar /section
+ /dieresis /copyright /ordfeminine /guillemotleft
+ /logicalnot /hyphen /registered /macron
+% 0xD0
+ /degree /plusminus /twosuperior /threesuperior
+ /acute /mu /paragraph /periodcentered
+ /cedilla /onesuperior /ordmasculine /guillemotright
+ /onequarter /onehalf /threequarters /questiondown
+% 0xC0
+ /Agrave /Aacute /Acircumflex /Atilde
+ /Adieresis /Aring /AE /Ccedilla
+ /Egrave /Eacute /Ecircumflex /Edieresis
+ /Igrave /Iacute /Icircumflex /Idieresis
+% 0xD0
+ /Eth /Ntilde /Ograve /Oacute
+ /Ocircumflex /Otilde /Odieresis /multiply
+ /Oslash /Ugrave /Uacute /Ucircumflex
+ /Udieresis /Yacute /Thorn /germandbls
+% 0xE0
+ /agrave /aacute /acircumflex /atilde
+ /adieresis /aring /ae /ccedilla
+ /egrave /eacute /ecircumflex /edieresis
+ /igrave /iacute /icircumflex /idieresis
+% 0xF0
+ /eth /ntilde /ograve /oacute
+ /ocircumflex /otilde /odieresis /divide
+ /oslash /ugrave /uacute /ucircumflex
+ /udieresis /yacute /thorn /ydieresis
+] def
+
diff --git a/Master/texmf-dist/source/latex/psnfss/psfonts.dtx b/Master/texmf-dist/source/latex/psnfss/psfonts.dtx
new file mode 100644
index 00000000000..6929da3c7bc
--- /dev/null
+++ b/Master/texmf-dist/source/latex/psnfss/psfonts.dtx
@@ -0,0 +1,1012 @@
+%\CheckSum{1101}
+%
+% \iffalse
+%
+% file: psfonts.dtx
+%
+% Copyright 1995--1998 Sebastian Rahtz
+% Copyright 1999--2004 Sebastian Rahtz, Walter Schmidt
+%
+% 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 all files listed in manifest.txt.
+%
+% \fi
+%
+% \iffalse
+%<*driver>
+\ProvidesFile{psfonts.drv}
+%</driver>
+%<times>\ProvidesPackage{times}%
+%<mathptm>\ProvidesPackage{mathptm}%
+%<mathptmx>\ProvidesPackage{mathptmx}%
+%<mathpple>\ProvidesPackage{mathpple}%
+%<palatino>\ProvidesPackage{palatino}%
+%<chancery>\ProvidesPackage{chancery}%
+%<pifont>\ProvidesPackage{pifont}%
+%<bookman>\ProvidesPackage{bookman}%
+%<newcent>\ProvidesPackage{newcent}%
+%<avant>\ProvidesPackage{avant}%
+%<helvet>\ProvidesPackage{helvet}%
+%<courier>\ProvidesPackage{courier}%
+%<charter>\ProvidesPackage{charter}%
+%<utopia>\ProvidesPackage{utopia}%
+%<mathpazo>\ProvidesPackage{mathpazo}%
+[2004/09/15 PSNFSS-v9.2
+%<times>(SPQR)
+%<mathptm>Times w/ Math (SPQR, WaS)
+%<mathptmx>Times w/ Math, improved (SPQR, WaS)
+%<mathpple>Palatino w/ Math (WaS)
+%<palatino>(SPQR)
+%<chancery>(SPQR)
+%<pifont>Pi font support (SPQR)
+%<bookman>(SPQR)
+%<newcent>(SPQR)
+%<avant>(SPQR)
+%<helvet>(WaS)
+%<courier>(WaS)
+%<charter>(P.Dyballa)
+%<utopia>(P.Dyballa)
+%<mathpazo> Palatino w/ Pazo Math (D.Puga, WaS)
+]
+%
+%<*driver>
+\documentclass{ltxdoc}
+\begin{document}
+ \DocInput{psfonts.dtx}
+\end{document}
+%</driver>
+% \fi
+%
+% \DeleteShortVerb{\|}
+% \MakeShortVerb{\+}
+% \GetFileInfo{psfonts.drv}
+% \title{The packages of the PSNFSS bundle}
+% \author{Walter Schmidt\thanks{\texttt{<w-a-schmidt@arcor.de>}}}
+% \date{\fileversion{} -- \filedate}
+% \maketitle
+%
+% \noindent
+%   The source file \texttt{psfonts.dtx} contains suitable package files 
+%   to use common PostScript fonts with \LaTeX.
+%   See the file \texttt{00readme.txt} for the installation instructions;
+%   it also explains how to obtain the 
+%   related Type1 fonts, font definition files, font metrics and virtual fonts.
+%
+%   See the document `Using common PostScript fonts with \LaTeX',
+%   filename \texttt{psnfss2e.pdf}, for a description of the user interface.
+%
+% \StopEventually{}
+%
+% \section{The \textsf{times} package}
+%    \begin{macrocode}
+%<*times>
+\renewcommand{\sfdefault}{phv}
+\renewcommand{\rmdefault}{ptm}
+\renewcommand{\ttdefault}{pcr}
+%</times>
+%    \end{macrocode}
+%
+% \section{The \textsf{palatino} package}
+%    \begin{macrocode}
+%<*palatino>
+\renewcommand{\rmdefault}{ppl}
+\renewcommand{\sfdefault}{phv}
+\renewcommand{\ttdefault}{pcr}
+%</palatino>
+%    \end{macrocode}
+%
+% \section{The \textsf{helvet} package}
+% Options processing uses the \textsf{keyval} package
+% and a hack borrowed from \textsf{hyperref}:
+%    \begin{macrocode}
+%<*helvet>
+\RequirePackage{keyval}
+\define@key{Hel}{scaled}[.95]{%
+  \def\Hv@scale{#1}}
+\def\ProcessOptionsWithKV#1{%
+  \let\@tempc\relax
+  \let\Hv@tempa\@empty
+  \@for\CurrentOption:=\@classoptionslist\do{%
+    \@ifundefined{KV@#1@\CurrentOption}%
+    {}%
+    {%
+      \edef\Hv@tempa{\Hv@tempa,\CurrentOption,}%
+      \@expandtwoargs\@removeelement\CurrentOption
+        \@unusedoptionlist\@unusedoptionlist
+    }%
+  }%
+  \edef\Hv@tempa{%
+    \noexpand\setkeys{#1}{%
+      \Hv@tempa\@ptionlist{\@currname.\@currext}%
+    }%
+  }%
+  \Hv@tempa
+  \let\CurrentOption\@empty
+}
+\ProcessOptionsWithKV{Hel}
+\AtEndOfPackage{%
+  \let\@unprocessedoptions\relax
+}
+%    \end{macrocode}
+% The +.fd+ files will evaluate the macro +\Hv@scale+ and scale
+% Helvetica appropriately.
+%
+% Now it's time to redefine the default sans font:
+%    \begin{macrocode}
+\renewcommand{\sfdefault}{phv}
+%</helvet>
+%    \end{macrocode}
+%
+% \section{The \textsf{avant} package}
+%    \begin{macrocode}
+%<*avant>
+\renewcommand{\sfdefault}{pag}
+%</avant>
+%    \end{macrocode}
+%
+% \section{The \textsf{newcent} package}
+%    \begin{macrocode}
+%<*newcent>
+\renewcommand{\rmdefault}{pnc}
+\renewcommand{\sfdefault}{pag}
+\renewcommand{\ttdefault}{pcr}
+%</newcent>
+%    \end{macrocode}
+%
+% \section{The \textsf{bookman} package}
+%    \begin{macrocode}
+%<*bookman>
+\renewcommand{\rmdefault}{pbk}
+\renewcommand{\sfdefault}{pag}
+\renewcommand{\ttdefault}{pcr}
+%</bookman>
+%    \end{macrocode}
+%
+% \section{The \textsf{courier} package}
+%    \begin{macrocode}
+%<*courier>
+\renewcommand{\ttdefault}{pcr}
+%</courier>
+%    \end{macrocode}
+%
+% \section{The \textsf{pifont} package}
+% Some useful commands for Pi fonts (Dingbats, Symbol etc); they
+% all assume you know the character number of the (unmapped) font
+%    \begin{macrocode}
+%<*pifont>
+\newcommand{\Pifont}[1]{\fontfamily{#1}\fontencoding{U}%
+\fontseries{m}\fontshape{n}\selectfont}
+\newcommand{\Pisymbol}[2]{{\Pifont{#1}\char#2}}
+\newcommand{\Pifill}[2]{\leavevmode
+  \leaders\hbox{\makebox[0.2in]{\Pisymbol{#1}{#2}}}\hfill
+  \kern\z@}
+\newcommand{\Piline}[2]{\par\noindent\hspace{0.5in}\Pifill{#1}{#2}%
+   \hspace{0.5in}\kern\z@\par}
+\newenvironment{Pilist}[2]%
+{\begin{list}{\Pisymbol{#1}{#2}}{}}%
+{\end{list}}%
+%    \end{macrocode}
+% A Pi number generator (from ideas by David Carlisle), for use in
+% lists where items are suffixed by symbols taken in sequence from a
+% Pi font. Usage is in lists just like enumerate.
+%
+% +\Pinumber+ outputs the appropriate symbol, where +#2+ is the name of a
+% \LaTeX\ counter  and +#1+ is the font family.
+%    \begin{macrocode}
+\def\Pinumber#1#2{\protect\Pisymbol{#1}{\arabic{#2}}}
+\newenvironment{Piautolist}[2]{%
+\ifnum \@enumdepth >3 \@toodeep\else
+  \advance\@enumdepth \@ne
+%    \end{macrocode}
+% We force the labels and cross-references into a very plain style (e.g.,
+% no brackets around `numbers', or dots after them).
+%    \begin{macrocode}
+      \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
+  \expandafter\def\csname p@enum\romannumeral\the\@enumdepth\endcsname{}%
+  \expandafter\def\csname labelenum\romannumeral\the\@enumdepth\endcsname{%
+     \csname theenum\romannumeral\the\@enumdepth\endcsname}%
+  \expandafter\def\csname theenum\romannumeral\the\@enumdepth\endcsname{%
+     \Pinumber{#1}{enum\romannumeral\the\@enumdepth}}%
+  \list{\csname label\@enumctr\endcsname}{%
+        \@nmbrlisttrue
+        \def\@listctr{\@enumctr}%
+        \setcounter{\@enumctr}{#2}%
+        \addtocounter{\@enumctr}{-1}%
+        \def\makelabel##1{\hss\llap{##1}}}
+\fi
+}{\endlist}
+%    \end{macrocode}
+% All the old Dingbat commands still work; 
+% they are now implemented using the +\Pi...+ commands.
+%    \begin{macrocode}
+\newcommand{\ding}{\Pisymbol{pzd}}
+\def\dingfill#1{\Pifill{pzd}{#1}}
+\def\dingline#1{\Piline{pzd}{#1}}
+\newenvironment{dinglist}[1]{\begin{Pilist}{pzd}{#1}}%
+  {\end{Pilist}}
+\newenvironment{dingautolist}[1]{\begin{Piautolist}{pzd}{#1}}%
+  {\end{Piautolist}}
+{\Pifont{pzd}}
+{\Pifont{psy}}
+%</pifont>
+%    \end{macrocode}
+%
+% \section{The \textsf{chancery} package}
+%    \begin{macrocode}
+%<*chancery>
+\renewcommand{\rmdefault}{pzc}
+%</chancery>
+%    \end{macrocode}
+%
+% \section{The \textsf{mathptm} and \textsf{mathptmx} packages}
+% Setting up the fonts for \textsf{mathptm}:
+%    \begin{macrocode}
+%<*mathptm>
+\PackageWarningNoLine{mathptm}{%
+  This package is to be regarded as obsolete.\MessageBreak
+  See the PSNFSS documentation}
+\def\rmdefault{ptm}
+\DeclareSymbolFont{operators}   {OT1}{ptmcm}{m}{n}
+\DeclareSymbolFont{letters}     {OML}{ptmcm}{m}{it}
+\DeclareSymbolFont{symbols}     {OMS}{pzccm}{m}{n}
+\DeclareSymbolFont{largesymbols}{OMX}{psycm}{m}{n}
+\DeclareSymbolFont{bold}        {OT1}{ptm}{bx}{n}
+\DeclareSymbolFont{italic}      {OT1}{ptm}{m}{it}
+%</mathptm>
+%    \end{macrocode}
+%
+% Setting up the fonts for \textsf{mathptmx}:
+%    \begin{macrocode}
+%<*mathptmx>
+\def\rmdefault{ptm}
+\DeclareSymbolFont{operators}   {OT1}{ztmcm}{m}{n}
+\DeclareSymbolFont{letters}     {OML}{ztmcm}{m}{it}
+\DeclareSymbolFont{symbols}     {OMS}{ztmcm}{m}{n}
+\DeclareSymbolFont{largesymbols}{OMX}{ztmcm}{m}{n}
+\DeclareSymbolFont{bold}        {OT1}{ptm}{bx}{n}
+\DeclareSymbolFont{italic}      {OT1}{ptm}{m}{it}
+%</mathptmx>
+%    \end{macrocode}
+%
+% Define +\mathbf+ and +\mathit+:
+%    \begin{macrocode}
+%<*mathptm|mathptmx>
+\@ifundefined{mathbf}{}{\DeclareMathAlphabet{\mathbf}{OT1}{ptm}{bx}{n}}
+\@ifundefined{mathit}{}{\DeclareMathAlphabet{\mathit}{OT1}{ptm}{m}{it}}
+%    \end{macrocode}
+%
+% An +\omicron+ command, to fill the gap:
+%    \begin{macrocode}
+\DeclareMathSymbol{\omicron}{0}{operators}{`\o}
+%    \end{macrocode}
+%
+% Lock unavailabe symbols:
+%    \begin{macrocode}
+\renewcommand{\jmath}{%
+  \PackageError
+%<mathptm>  {mathptm}
+%<mathptmx> {mathptmx}
+  {The symbols \protect\jmath, \protect\amalg\space and 
+  \protect\coprod\MessageBreak
+  are not available with this package}
+  {Type \space <return> \space to proceed; 
+  your command will be ignored.}}
+\let\amalg=\jmath  
+\let\coprod=\jmath
+%    \end{macrocode}
+%
+% Reduce the space around math operators:
+%    \begin{macrocode}
+\thinmuskip=2mu
+\medmuskip=2.5mu plus 1mu minus 1mu
+\thickmuskip=4mu plus 1.5mu minus 1mu
+%</mathptm|mathptmx>
+%    \end{macrocode}
+%
+% Make +\hbar+ work with Times.
+%    \begin{macrocode}
+%<*mathptm>
+\def\hbar{{\mskip1.6mu\mathchar'26\mkern-7.6muh}}
+%</mathptm>
+%    \end{macrocode}
+% With \textsf{mathptmx}, PSNFSS 9.0 and later is using an improved definition, 
+% which was adopted from Frank Mittelbach's \textsf{mathtime} package:
+%    \begin{macrocode}
+%<*mathptmx>
+\DeclareRobustCommand\hbar{{%
+ \dimen@.03em%
+ \dimen@ii.06em%
+ \def\@tempa##1##2{{%
+   \lower##1\dimen@\rlap{\kern##1\dimen@ii\the##2 0\char22}}}%
+ \mathchoice\@tempa\@ne\textfont
+            \@tempa\@ne\textfont
+            \@tempa\defaultscriptratio\scriptfont
+            \@tempa\defaultscriptscriptratio\scriptscriptfont
+  h}}
+%</mathptmx>
+%    \end{macrocode}
+%
+% No bold math:
+%    \begin{macrocode}
+%<*mathptm|mathptmx>
+\def\boldmath{%
+   \PackageWarning%
+%<mathptm>   {mathptm}%
+%<mathptmx>   {mathptmx}%
+   {There are no bold math fonts}%
+   \global\let\boldmath=\relax
+}
+%</mathptm|mathptmx>
+%    \end{macrocode}
+%
+% Use larger font sizes for super- and subscripts:
+%    \begin{macrocode}
+%<*mathptmx>
+\def\defaultscriptratio{.74}
+\def\defaultscriptscriptratio{.6}
+%</mathptmx>
+%<*mathptm|mathptmx>
+\DeclareMathSizes{5}{5}{5}{5}
+\DeclareMathSizes{6}{6}{5}{5}
+\DeclareMathSizes{7}{7}{5}{5}
+\DeclareMathSizes{8}{8}{6}{5}
+\DeclareMathSizes{9}{9}{7}{5}
+\DeclareMathSizes{10}{10}{7.4}{6}
+\DeclareMathSizes{10.95}{10.95}{8}{6}
+\DeclareMathSizes{12}{12}{9}{7}
+\DeclareMathSizes{14.4}{14.4}{10.95}{8}
+\DeclareMathSizes{17.28}{17.28}{12}{10}
+\DeclareMathSizes{20.74}{20.74}{14.4}{12}
+\DeclareMathSizes{24.88}{24.88}{17.28}{14.4}
+%</mathptm|mathptmx>
+%    \end{macrocode}
+%
+% Option: Use slanted greek capitals (with \textsf{mathptmx} only):
+%    \begin{macrocode}
+%<*mathptmx>
+\DeclareOption{slantedGreek}{%
+  \DeclareMathSymbol{\Gamma}{\mathalpha}{letters}{0}
+  \DeclareMathSymbol{\Delta}{\mathalpha}{letters}{1}
+  \DeclareMathSymbol{\Theta}{\mathalpha}{letters}{2}
+  \DeclareMathSymbol{\Lambda}{\mathalpha}{letters}{3}
+  \DeclareMathSymbol{\Xi}{\mathalpha}{letters}{4}
+  \DeclareMathSymbol{\Pi}{\mathalpha}{letters}{5}
+  \DeclareMathSymbol{\Sigma}{\mathalpha}{letters}{6}
+  \DeclareMathSymbol{\Upsilon}{\mathalpha}{letters}{7}
+  \DeclareMathSymbol{\Phi}{\mathalpha}{letters}{8}
+  \DeclareMathSymbol{\Psi}{\mathalpha}{letters}{9}
+  \DeclareMathSymbol{\Omega}{\mathalpha}{letters}{10}
+}
+\DeclareMathSymbol{\upGamma}{\mathord}{operators}{0}
+\DeclareMathSymbol{\upDelta}{\mathord}{operators}{1}
+\DeclareMathSymbol{\upTheta}{\mathord}{operators}{2}
+\DeclareMathSymbol{\upLambda}{\mathord}{operators}{3}
+\DeclareMathSymbol{\upXi}{\mathord}{operators}{4}
+\DeclareMathSymbol{\upPi}{\mathord}{operators}{5}
+\DeclareMathSymbol{\upSigma}{\mathord}{operators}{6}
+\DeclareMathSymbol{\upUpsilon}{\mathord}{operators}{7}
+\DeclareMathSymbol{\upPhi}{\mathord}{operators}{8}
+\DeclareMathSymbol{\upPsi}{\mathord}{operators}{9}
+\DeclareMathSymbol{\upOmega}{\mathord}{operators}{10}
+%    \end{macrocode}
+%
+% Options processing:
+%    \begin{macrocode}
+\ProcessOptions\relax
+%</mathptmx>
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+%<*mathptm|mathptmx>
+\let\s@vedhbar\hbar
+\AtBeginDocument{%
+%</mathptm|mathptmx>
+%    \end{macrocode}
+% Ensure proper scaling of the AMS fonts, even when not used
+% through the amssymb or amsfonts packages (\textsf{mathptmx} only):
+%    \begin{macrocode}
+%<*mathptmx>
+  \DeclareFontFamily{U}{msa}{}%
+  \DeclareFontShape{U}{msa}{m}{n}{<->msam10}{}%
+  \DeclareFontFamily{U}{msb}{}%
+  \DeclareFontShape{U}{msb}{m}{n}{<->msbm10}{}%
+  \DeclareFontFamily{U}{euf}{}%
+  \DeclareFontShape{U}{euf}{m}{n}{<-6>eufm5<6-8>eufm7<8->eufm10}{}%
+  \DeclareFontShape{U}{euf}{b}{n}{<-6>eufb5<6-8>eufb7<8->eufb10}{}%
+%</mathptmx>
+%    \end{macrocode}
+% In case the \textsf{amsfonts} package is loaded additionally,
+% we must restore our +\hbar+:
+%    \begin{macrocode}
+%<*mathptm|mathptmx>
+  \@ifpackageloaded{amsfonts}{\let\hbar\s@vedhbar}{}
+%    \end{macrocode}
+% Take care of +\big+ \&\ friends working with scaled math extension font,
+% unless amsmath.sty is also loaded:
+%    \begin{macrocode}
+  \@ifpackageloaded{amsmath}{}{%
+    \newdimen\big@size
+    \addto@hook\every@math@size{\setbox\z@\vbox{\hbox{$($}\kern\z@}%
+       \global\big@size 1.2\ht\z@}
+    \def\bBigg@#1#2{%
+       {\hbox{$\left#2\vcenter to#1\big@size{}\right.\n@space$}}}
+    \def\big{\bBigg@\@ne}
+    \def\Big{\bBigg@{1.5}}
+    \def\bigg{\bBigg@\tw@}
+    \def\Bigg{\bBigg@{2.5}}
+  }
+}
+%</mathptm|mathptmx>
+%    \end{macrocode}
+%
+% \subsection*{Credits}
+% The virtual mathptm and mathptmx fonts and the related packages
+% were created by Alan Jeffrey, Sebastian Rahtz and Ulrik Vieth.
+%
+% \section{The \textsf{mathpple} package}
+% Suppress info about math fonts being redefined:
+%    \begin{macrocode}
+%<*mathpple>
+\PackageWarningNoLine{mathpple}{%
+  This package is to be regarded as obsolete.\MessageBreak
+  See the PSNFSS documentation}
+\let\s@ved@info\@font@info
+\let\@font@info\@gobble
+%    \end{macrocode}
+%
+% Make Palatino the default roman font:
+%    \begin{macrocode}
+\renewcommand{\rmdefault}{ppl}
+%    \end{macrocode}
+%
+% Typeset mathematics using the mathpple fonts:
+%    \begin{macrocode}
+\DeclareSymbolFont{operators}   {OT1}{zpple}{m}{n}
+\DeclareSymbolFont{letters}     {OML}{zpple}{m}{it}
+\DeclareSymbolFont{symbols}     {OMS}{zpple}{m}{n}
+\DeclareSymbolFont{largesymbols}{OMX}{zpple}{m}{n}
+\DeclareMathAlphabet{\mathbf}   {OT1}{zpple}{b}{n}
+\DeclareMathAlphabet{\mathit}   {OT1}{ppl}{m}{it}
+%    \end{macrocode}
+%
+% Support for bold mathversion:
+%    \begin{macrocode}
+\SetSymbolFont{operators}{bold}{OT1}{zpple}{b}{n}
+\SetSymbolFont{letters}{bold}{OML}{zpple}{b}{it}
+\SetSymbolFont{symbols}{bold}{OMS}{zpple}{b}{n}
+\SetSymbolFont{largesymbols}{bold}{OMX}{zpple}{m}{n}
+\SetMathAlphabet\mathit{bold}{OT1}{ppl}{b}{it}
+%    \end{macrocode}
+%
+% Reduce the space around math operators:
+%    \begin{macrocode}
+%\thinmuskip=2.5mu
+\medmuskip=3.5mu plus 1mu minus 1mu
+%\thickmuskip=4.5mu plus 1.5mu minus 1mu
+%    \end{macrocode}
+%
+% Compensate for increased letter spacing
+%    \begin{macrocode}
+\def\joinrel{\mathrel{\mkern-3.45mu}}
+%    \end{macrocode}
+%
+% Make +\hbar+ work with Palatino:
+%    \begin{macrocode}
+\def\hbar{{\mathchar'26\mkern-7muh}}
+%    \end{macrocode}
+%
+% Define a new math alphabet for bold italic variables:
+%    \begin{macrocode}
+\DeclareMathAlphabet{\mathbold}{OML}{zpple}{b}{it}
+%    \end{macrocode}
+%
+% Make +\mathbold+ act on lowercase greek, too:
+%    \begin{macrocode}
+\DeclareMathSymbol{\alpha}{\mathalpha}{letters}{11}
+\DeclareMathSymbol{\beta}{\mathalpha}{letters}{12}
+\DeclareMathSymbol{\gamma}{\mathalpha}{letters}{13}
+\DeclareMathSymbol{\delta}{\mathalpha}{letters}{14}
+\DeclareMathSymbol{\epsilon}{\mathalpha}{letters}{15}
+\DeclareMathSymbol{\zeta}{\mathalpha}{letters}{16}
+\DeclareMathSymbol{\eta}{\mathalpha}{letters}{17}
+\DeclareMathSymbol{\theta}{\mathalpha}{letters}{18}
+\DeclareMathSymbol{\iota}{\mathalpha}{letters}{19}
+\DeclareMathSymbol{\kappa}{\mathalpha}{letters}{20}
+\DeclareMathSymbol{\lambda}{\mathalpha}{letters}{21}
+\DeclareMathSymbol{\mu}{\mathalpha}{letters}{22}
+\DeclareMathSymbol{\nu}{\mathalpha}{letters}{23}
+\DeclareMathSymbol{\xi}{\mathalpha}{letters}{24}
+\DeclareMathSymbol{\pi}{\mathalpha}{letters}{25}
+\DeclareMathSymbol{\rho}{\mathalpha}{letters}{26}
+\DeclareMathSymbol{\sigma}{\mathalpha}{letters}{27}
+\DeclareMathSymbol{\tau}{\mathalpha}{letters}{28}
+\DeclareMathSymbol{\upsilon}{\mathalpha}{letters}{29}
+\DeclareMathSymbol{\phi}{\mathalpha}{letters}{30}
+\DeclareMathSymbol{\chi}{\mathalpha}{letters}{31}
+\DeclareMathSymbol{\psi}{\mathalpha}{letters}{32}
+\DeclareMathSymbol{\omega}{\mathalpha}{letters}{33}
+\DeclareMathSymbol{\varepsilon}{\mathalpha}{letters}{34}
+\DeclareMathSymbol{\vartheta}{\mathalpha}{letters}{35}
+\DeclareMathSymbol{\varpi}{\mathalpha}{letters}{36}
+\DeclareMathSymbol{\varphi}{\mathalpha}{letters}{39}
+\let\varrho\rho
+\let\varsigma\sigma
+%    \end{macrocode}
+%
+% We redefine the default sizes for super- and subscripts.
+% Palatino, like most other type 1 fonts, is scaled linearly, so the
+% default ratios (.7 and .5) may produce unreadably small characters:
+%    \begin{macrocode}
+\def\defaultscriptratio{.76}
+\def\defaultscriptscriptratio{.6}
+%    \end{macrocode}
+%
+% These default ratios are not used for any sizes that have been
+% explicitly declared, so we redeclare the sizes used by the standard
+% classes. At least for the lower sizes this is important as we don't
+% want to end up with a 5pt font being reduced even further:
+%    \begin{macrocode}
+\DeclareMathSizes{5}    {5}    {5}    {5}
+\DeclareMathSizes{6}    {6}    {5}    {5}
+\DeclareMathSizes{7}    {7}    {5}    {5}
+\DeclareMathSizes{8}    {8}    {6}    {5}
+\DeclareMathSizes{9}    {9}    {7}    {5}
+\DeclareMathSizes{10}   {10}   {7.6}  {6}
+\DeclareMathSizes{10.95}{10.95}{8}    {6}
+\DeclareMathSizes{12}   {12}   {9}    {7}
+\DeclareMathSizes{14.4} {14.4} {10}   {8}
+\DeclareMathSizes{17.28}{17.28}{12}   {10}
+\DeclareMathSizes{20.74}{20.74}{14.4} {12}
+\DeclareMathSizes{24.88}{24.88}{20.74}{14.4}
+%    \end{macrocode}
+%
+% Option: Use slanted greek capitals:
+%    \begin{macrocode}
+\DeclareOption{slantedGreek}{%
+  \DeclareMathSymbol{\Gamma}{\mathalpha}{letters}{0}
+  \DeclareMathSymbol{\Delta}{\mathalpha}{letters}{1}
+  \DeclareMathSymbol{\Theta}{\mathalpha}{letters}{2}
+  \DeclareMathSymbol{\Lambda}{\mathalpha}{letters}{3}
+  \DeclareMathSymbol{\Xi}{\mathalpha}{letters}{4}
+  \DeclareMathSymbol{\Pi}{\mathalpha}{letters}{5}
+  \DeclareMathSymbol{\Sigma}{\mathalpha}{letters}{6}
+  \DeclareMathSymbol{\Upsilon}{\mathalpha}{letters}{7}
+  \DeclareMathSymbol{\Phi}{\mathalpha}{letters}{8}
+  \DeclareMathSymbol{\Psi}{\mathalpha}{letters}{9}
+  \DeclareMathSymbol{\Omega}{\mathalpha}{letters}{10}
+}
+\let\upOmega\Omega
+\let\upDelta\Delta
+%    \end{macrocode}
+%
+% Options processing:
+%    \begin{macrocode}
+\ProcessOptions\relax
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\let\s@vedhbar\hbar
+\AtBeginDocument{%
+%    \end{macrocode}
+% Ensure proper scaling of the AMS fonts, even when not used
+% through the amssymb or amsfonts packages:
+%    \begin{macrocode}
+  \DeclareFontFamily{U}{msa}{}%
+  \DeclareFontShape{U}{msa}{m}{n}{<->s*[1.042]msam10}{}%
+  \DeclareFontFamily{U}{msb}{}%
+  \DeclareFontShape{U}{msb}{m}{n}{<->s*[1.042]msbm10}{}%
+  \DeclareFontFamily{U}{euf}{}%
+  \DeclareFontShape{U}{euf}{m}{n}{<-6>eufm5<6-8>eufm7<8->eufm10}{}%
+  \DeclareFontShape{U}{euf}{b}{n}{<-6>eufb5<6-8>eufb7<8->eufb10}{}%
+%    \end{macrocode}
+% In case the \textsf{amsfonts} package is loaded additionally,
+% we must restore our +\hbar+:
+%    \begin{macrocode}
+  \@ifpackageloaded{amsfonts}{\let\hbar\s@vedhbar}{}
+%    \end{macrocode}
+% Take care of +\big+ \&\ friends working with scaled math extension font,
+% unless amsmath.sty is also loaded:
+%    \begin{macrocode}
+  \@ifpackageloaded{amsmath}{}{%
+    \newdimen\big@size
+    \addto@hook\every@math@size{\setbox\z@\vbox{\hbox{$($}\kern\z@}%
+       \global\big@size 1.2\ht\z@}
+    \def\bBigg@#1#2{%
+       {\hbox{$\left#2\vcenter to#1\big@size{}\right.\n@space$}}}
+    \def\big{\bBigg@\@ne}
+    \def\Big{\bBigg@{1.5}}
+    \def\bigg{\bBigg@\tw@}
+    \def\Bigg{\bBigg@{2.5}}
+  }
+}
+%    \end{macrocode}
+%
+% Restore font info:
+%    \begin{macrocode}
+\let\@font@info\s@ved@info
+%</mathpple>
+%    \end{macrocode}
+%
+% \subsection*{Credits}
+% \textsf{mathpple} is based on the package \textsf{mathppl}
+% and the related virtual fonts, created by Aloysius Helminck.
+% These were distributed in conjunction with \textsc{fontinst}~v1.335,
+% but are no longer available from CTAN.
+% The main changes with regard to Helminck's model are:
+% \begin{itemize}
+%  \item
+%  italic Greek letters from the Euler fonts;
+%  \item
+%  +\mathcal+ from CM instead of Zapf~Chancery;
+%  \item
+%  positioning of math accents substantially improved;
+%  \item
+%  improved spacing;
+%  \item
+%  use those Type~1 fonts only, which are part of the free
+%  `BlueSky' distribution.
+% \end{itemize}
+% Special thanks to Daniel Schlieper, who suggested the
+% development of the \textsf{mathpple} package, 
+% contributed many good ideas and helped with testing.
+%
+%
+% \section{The \textsf{charter} package}
+%    \begin{macrocode}
+%<*charter>
+\renewcommand{\rmdefault}{bch}
+\renewcommand{\bfdefault}{b}
+%</charter>
+%    \end{macrocode}
+%
+% \section{The \textsf{utopia} package}
+%    \begin{macrocode}
+%<*utopia>
+\PackageWarningNoLine{utopia}{%
+  This package is to be regarded as obsolete.\MessageBreak
+  See the PSNFSS documentation}
+\renewcommand{\rmdefault}{put}
+\renewcommand\bfdefault{b}
+%</utopia>
+%    \end{macrocode}
+%
+%
+% \section{The \textsf{mathpazo} package}
+% Suppress info about math fonts being redefined:
+%    \begin{macrocode}
+%<*mathpazo>
+\let\s@ved@info\@font@info
+\let\@font@info\@gobble
+%    \end{macrocode}
+%
+% Options processing:
+%    \begin{macrocode}
+\newif\ifpazo@osf
+\newif\ifpazo@sc
+\newif\ifpazo@slGreek
+\newif\ifpazo@BB \pazo@BBtrue
+\DeclareOption{osf}{\pazo@osftrue}
+\DeclareOption{sc}{\pazo@sctrue}
+\DeclareOption{slantedGreek}{\pazo@slGreektrue}
+\DeclareOption{noBBpl}{\pazo@BBfalse}
+\DeclareOption{osfeqnnum}{\OptionNotUsed}
+\ProcessOptions\relax
+%    \end{macrocode}
+%
+% Make Palatino (+ppl+) the default roman font.
+% If the options +osf+ or +sc+  were specified, 
+% use +pplj+ or +pplx+ instead,
+% and make sure that +\oldstylenums+ switches to +pplj+, too.
+%    \begin{macrocode}
+\ifpazo@osf
+  \renewcommand{\rmdefault}{pplj}
+  \renewcommand{\oldstylenums}[1]{%
+    {\fontfamily{pplj}\selectfont #1}}
+\else\ifpazo@sc
+  \renewcommand{\rmdefault}{pplx}
+  \renewcommand{\oldstylenums}[1]{%
+    {\fontfamily{pplj}\selectfont #1}}
+\else
+  \renewcommand{\rmdefault}{ppl}
+\fi\fi
+%    \end{macrocode}
+%
+% The Pazo fonts provide an Euro symbol, which is now available in the
+% Palatino text companion fonts.  For the sake of compatibility, we still define 
+% the macro +\ppleuro+, which was introduced with version 8.2, and
+% we make it work with the
+% \textsf{eurofont} and \textsf{europs} packages:
+%    \begin{macrocode}
+\newcommand{\ppleuro}{{\fontencoding{U}\fontfamily{fplm}\selectfont \char160}}
+\AtBeginDocument{\@ifpackageloaded{europs}{\renewcommand{\EURtm}{\ppleuro}}{}}
+%    \end{macrocode}
+%
+% Now we declare the math fonts. The \textsf{mathpazo} package uses
+% a Palatino text font family with OT1 encoding 
+% as the +operators+ and +\mathit+ alphabets.
+% If the +sc+ option was specified, we use the family +pplx+.
+% Otherwise we just take +ppl+, thus making sure that no oldstyle digits are
+% used in math mode.  Note that specifying both +sc+ and +osf+ gives
+% oldstyle numbers in text and uses the family +pplx+ in math mode,
+% so that the +ppl+ family is not required at all.  Thus, the number
+% of TFM's loaded by \TeX{} is minimized.  
+%    \begin{macrocode}
+\ifpazo@sc
+ \DeclareSymbolFont{operators}     {OT1}{pplx}{m}{n}
+ \SetSymbolFont{operators}{bold}   {OT1}{pplx}{b}{n}
+ \DeclareMathAlphabet{\mathit}     {OT1}{pplx}{m}{it}
+ \SetMathAlphabet{\mathit}{bold}   {OT1}{pplx}{b}{it}
+\else
+ \DeclareSymbolFont{operators}     {OT1}{ppl}{m}{n}
+ \SetSymbolFont{operators}{bold}   {OT1}{ppl}{b}{n}
+ \DeclareMathAlphabet{\mathit}     {OT1}{ppl}{m}{it}
+ \SetMathAlphabet{\mathit}{bold}   {OT1}{ppl}{b}{it}
+\fi
+%    \end{macrocode}
+% Uppercase upright Greek 
+% and math symbols such as `plus', `equal' and others
+% are taken from a new symbol font named +upright+.
+% Its spacing is less tight than in the text font.
+%    \begin{macrocode}
+\DeclareSymbolFont{upright}       {OT1}{zplm}{m}{n}
+\DeclareSymbolFont{letters}       {OML}{zplm}{m}{it}
+\DeclareSymbolFont{symbols}       {OMS}{zplm}{m}{n}
+\DeclareSymbolFont{largesymbols}  {OMX}{zplm}{m}{n}
+%    \end{macrocode}
+%    \begin{macrocode}
+\SetSymbolFont{upright}{bold}     {OT1}{zplm}{b}{n}
+\SetSymbolFont{letters}{bold}     {OML}{zplm}{b}{it}
+\SetSymbolFont{symbols}{bold}     {OMS}{zplm}{b}{n}
+\SetSymbolFont{largesymbols}{bold}{OMX}{zplm}{m}{n}
+%    \end{macrocode}
+%    \begin{macrocode}
+\DeclareMathAlphabet{\mathbf}     {OT1}{zplm}{b}{n}
+\DeclareMathAlphabet{\mathbold}   {OML}{zplm}{b}{it}
+%    \end{macrocode}
+%    \begin{macrocode}
+\DeclareSymbolFontAlphabet{\mathrm}    {operators}
+\DeclareSymbolFontAlphabet{\mathnormal}{letters}
+\DeclareSymbolFontAlphabet{\mathcal}   {symbols}
+%    \end{macrocode}
+%
+% The following symbols used to come from `operators';
+% we take them from the `upright' symbol font now:
+%    \begin{macrocode}
+\DeclareMathSymbol{!}{\mathclose}{upright}{"21}
+\DeclareMathSymbol{+}{\mathbin}{upright}{"2B}
+\DeclareMathSymbol{:}{\mathrel}{upright}{"3A}
+% \DeclareMathSymbol{;}{\mathpunct}{operators}{"3B} % punctuation!
+\DeclareMathSymbol{=}{\mathrel}{upright}{"3D}
+\DeclareMathSymbol{?}{\mathclose}{upright}{"3F}
+\DeclareMathDelimiter{(}{\mathopen} {upright}{"28}{largesymbols}{"00}
+\DeclareMathDelimiter{)}{\mathclose}{upright}{"29}{largesymbols}{"01}
+\DeclareMathDelimiter{[}{\mathopen} {upright}{"5B}{largesymbols}{"02}
+\DeclareMathDelimiter{]}{\mathclose}{upright}{"5D}{largesymbols}{"03}
+\DeclareMathDelimiter{/}{\mathord}{upright}{"2F}{largesymbols}{"0E}
+% \DeclareMathSymbol{\colon}{\mathpunct}{operators}{"3A} % punctuation!
+\DeclareMathAccent{\acute}{\mathalpha}{upright}{"13}
+\DeclareMathAccent{\grave}{\mathalpha}{upright}{"12}
+\DeclareMathAccent{\ddot}{\mathalpha}{upright}{"7F}
+\DeclareMathAccent{\tilde}{\mathalpha}{upright}{"7E}
+\DeclareMathAccent{\bar}{\mathalpha}{upright}{"16}
+\DeclareMathAccent{\breve}{\mathalpha}{upright}{"15}
+\DeclareMathAccent{\check}{\mathalpha}{upright}{"14}
+\DeclareMathAccent{\hat}{\mathalpha}{upright}{"5E}
+\DeclareMathAccent{\dot}{\mathalpha}{upright}{"5F}
+\DeclareMathAccent{\mathring}{\mathalpha}{upright}{"17}
+\DeclareMathSymbol{\mathdollar}{\mathord}{upright}{"24}
+%    \end{macrocode}
+% As to uppercase Greek, see below!
+%
+% The follwowing symbols used to come from `letters'.
+% Now they are taken from `operators', with respect to 
+% correct spacing of decimal numbers:
+%    \begin{macrocode}
+\DeclareMathSymbol{,}{\mathpunct}{operators}{44}
+\DeclareMathSymbol{.}{\mathord}{operators}{46}
+%    \end{macrocode}
+%
+% Use Pazo as (partial) +\mathbb+ font:
+%    \begin{macrocode}
+\ifpazo@BB
+  \AtBeginDocument{%
+  \let\mathbb\relax
+  \DeclareMathAlphabet\PazoBB{U}{fplmbb}{m}{n}
+  \newcommand{\mathbb}{\PazoBB}
+  }
+\fi
+%    \end{macrocode}
+%
+% Reduce the space around math operators:
+%    \begin{macrocode}
+%\thinmuskip=2.5mu
+\medmuskip=3.5mu plus 1mu minus 1mu
+%\thickmuskip=4.5mu plus 1.5mu minus 1mu
+%    \end{macrocode}
+%
+% Compensate for increased letter spacing:
+%    \begin{macrocode}
+\def\joinrel{\mathrel{\mkern-3.45mu}}
+%    \end{macrocode}
+%
+% Make +\hbar+ work with Palatino:
+%    \begin{macrocode}
+\renewcommand{\hbar}{{\mkern0.8mu\mathchar'26\mkern-6.8muh}}
+%    \end{macrocode}
+%
+% Optionally use slanted greek capitals:
+%    \begin{macrocode}
+\ifpazo@slGreek
+  \DeclareMathSymbol{\Gamma}  {\mathalpha}{letters}{"00}
+  \DeclareMathSymbol{\Delta}  {\mathalpha}{letters}{"01}
+  \DeclareMathSymbol{\Theta}  {\mathalpha}{letters}{"02}
+  \DeclareMathSymbol{\Lambda} {\mathalpha}{letters}{"03}
+  \DeclareMathSymbol{\Xi}     {\mathalpha}{letters}{"04}
+  \DeclareMathSymbol{\Pi}     {\mathalpha}{letters}{"05}
+  \DeclareMathSymbol{\Sigma}  {\mathalpha}{letters}{"06}
+  \DeclareMathSymbol{\Upsilon}{\mathalpha}{letters}{"07}
+  \DeclareMathSymbol{\Phi}    {\mathalpha}{letters}{"08}
+  \DeclareMathSymbol{\Psi}    {\mathalpha}{letters}{"09}
+  \DeclareMathSymbol{\Omega}  {\mathalpha}{letters}{"0A}
+\else
+  \DeclareMathSymbol{\Gamma}{\mathalpha}{upright}{"00}
+  \DeclareMathSymbol{\Delta}{\mathalpha}{upright}{"01}
+  \DeclareMathSymbol{\Theta}{\mathalpha}{upright}{"02}
+  \DeclareMathSymbol{\Lambda}{\mathalpha}{upright}{"03}
+  \DeclareMathSymbol{\Xi}{\mathalpha}{upright}{"04}
+  \DeclareMathSymbol{\Pi}{\mathalpha}{upright}{"05}
+  \DeclareMathSymbol{\Sigma}{\mathalpha}{upright}{"06}
+  \DeclareMathSymbol{\Upsilon}{\mathalpha}{upright}{"07}
+  \DeclareMathSymbol{\Phi}{\mathalpha}{upright}{"08}
+  \DeclareMathSymbol{\Psi}{\mathalpha}{upright}{"09}
+  \DeclareMathSymbol{\Omega}{\mathalpha}{upright}{"0A}
+\fi
+%    \end{macrocode}
+% These symbols should always be upright:
+%    \begin{macrocode}
+\DeclareMathSymbol{\upGamma}{\mathord}{upright}{0}
+\DeclareMathSymbol{\upDelta}{\mathord}{upright}{1}
+\DeclareMathSymbol{\upTheta}{\mathord}{upright}{2}
+\DeclareMathSymbol{\upLambda}{\mathord}{upright}{3}
+\DeclareMathSymbol{\upXi}{\mathord}{upright}{4}
+\DeclareMathSymbol{\upPi}{\mathord}{upright}{5}
+\DeclareMathSymbol{\upSigma}{\mathord}{upright}{6}
+\DeclareMathSymbol{\upUpsilon}{\mathord}{upright}{7}
+\DeclareMathSymbol{\upPhi}{\mathord}{upright}{8}
+\DeclareMathSymbol{\upPsi}{\mathord}{upright}{9}
+\DeclareMathSymbol{\upOmega}{\mathord}{upright}{10}
+%    \end{macrocode}
+% Make +\mathbold+ act on lowercase greek too
+%    \begin{macrocode}
+\DeclareMathSymbol{\alpha}{\mathalpha}{letters}{"0B}
+\DeclareMathSymbol{\beta}{\mathalpha}{letters}{"0C}
+\DeclareMathSymbol{\gamma}{\mathalpha}{letters}{"0D}
+\DeclareMathSymbol{\delta}{\mathalpha}{letters}{"0E}
+\DeclareMathSymbol{\epsilon}{\mathalpha}{letters}{"0F}
+\DeclareMathSymbol{\zeta}{\mathalpha}{letters}{"10}
+\DeclareMathSymbol{\eta}{\mathalpha}{letters}{"11}
+\DeclareMathSymbol{\theta}{\mathalpha}{letters}{"12}
+\DeclareMathSymbol{\iota}{\mathalpha}{letters}{"13}
+\DeclareMathSymbol{\kappa}{\mathalpha}{letters}{"14}
+\DeclareMathSymbol{\lambda}{\mathalpha}{letters}{"15}
+\DeclareMathSymbol{\mu}{\mathalpha}{letters}{"16}
+\DeclareMathSymbol{\nu}{\mathalpha}{letters}{"17}
+\DeclareMathSymbol{\xi}{\mathalpha}{letters}{"18}
+\DeclareMathSymbol{\pi}{\mathalpha}{letters}{"19}
+\DeclareMathSymbol{\rho}{\mathalpha}{letters}{"1A}
+\DeclareMathSymbol{\sigma}{\mathalpha}{letters}{"1B}
+\DeclareMathSymbol{\tau}{\mathalpha}{letters}{"1C}
+\DeclareMathSymbol{\upsilon}{\mathalpha}{letters}{"1D}
+\DeclareMathSymbol{\phi}{\mathalpha}{letters}{"1E}
+\DeclareMathSymbol{\chi}{\mathalpha}{letters}{"1F}
+\DeclareMathSymbol{\psi}{\mathalpha}{letters}{"20}
+\DeclareMathSymbol{\omega}{\mathalpha}{letters}{"21}
+\DeclareMathSymbol{\varepsilon}{\mathalpha}{letters}{"22}
+\DeclareMathSymbol{\vartheta}{\mathalpha}{letters}{"23}
+\DeclareMathSymbol{\varpi}{\mathalpha}{letters}{"24}
+\DeclareMathSymbol{\varrho}{\mathalpha}{letters}{"25}
+\DeclareMathSymbol{\varsigma}{\mathalpha}{letters}{"26}
+\DeclareMathSymbol{\varphi}{\mathalpha}{letters}{"27}
+%    \end{macrocode}
+%
+% Finally, we save our new definition of +\hbar+ and defer some code
+% until +\begin{document}+:
+%    \begin{macrocode}
+\let\s@vedhbar\hbar
+\AtBeginDocument{%
+%    \end{macrocode}
+% Ensure proper scaling of the AMS fonts, even when not used
+% through the amssymb or amsfonts packages:
+%    \begin{macrocode}
+  \DeclareFontFamily{U}{msa}{}%
+  \DeclareFontShape{U}{msa}{m}{n}{<->s*[1.042]msam10}{}%
+  \DeclareFontFamily{U}{msb}{}%
+  \DeclareFontShape{U}{msb}{m}{n}{<->s*[1.042]msbm10}{}%
+  \DeclareFontFamily{U}{euf}{}%
+  \DeclareFontShape{U}{euf}{m}{n}{<-6>eufm5<6-8>eufm7<8->eufm10}{}%
+  \DeclareFontShape{U}{euf}{b}{n}{<-6>eufb5<6-8>eufb7<8->eufb10}{}%
+%    \end{macrocode}
+% In case the \textsf{amsfonts} package is loaded additionally,
+% we must restore our +\hbar+:
+%    \begin{macrocode}
+  \@ifpackageloaded{amsfonts}{\let\hbar\s@vedhbar}{}
+%    \end{macrocode}
+% Take care of +\big+ \&\ friends working with scaled math extension font,
+% unless amsmath.sty is also loaded:
+%    \begin{macrocode}
+  \@ifpackageloaded{amsmath}{}{%
+  \newdimen\big@size
+  \addto@hook\every@math@size{\setbox\z@\vbox{\hbox{$($}\kern\z@}%
+  	\global\big@size 1.2\ht\z@}
+  \def\bBigg@#1#2{%
+  	{\hbox{$\left#2\vcenter to#1\big@size{}\right.\n@space$}}}
+  \def\big{\bBigg@\@ne}
+  \def\Big{\bBigg@{1.5}}
+  \def\bigg{\bBigg@\tw@}
+  \def\Bigg{\bBigg@{2.5}}
+  }
+}
+%    \end{macrocode}
+%
+% We redefine the default sizes for super and subscripts.
+% Palatino, like most other type 1 fonts, is scaled linearly, so the
+% default ratios (0.7 and 0.5) may produce unreadably small characters.
+%    \begin{macrocode}
+\def\defaultscriptratio{.76}
+\def\defaultscriptscriptratio{.6}
+%    \end{macrocode}
+% These default ratios are not used for any sizes that have been
+% explicitly declared, so we redeclare the sizes used by the standard
+% classes. At least for the lower sizes this is important as we don't
+% want to end up with a 5pt font being reduced even further.
+%    \begin{macrocode}
+\DeclareMathSizes{5}    {5}    {5}    {5}
+\DeclareMathSizes{6}    {6}    {5}    {5}
+\DeclareMathSizes{7}    {7}    {5}    {5}
+\DeclareMathSizes{8}    {8}    {6}    {5}
+\DeclareMathSizes{9}    {9}    {7}    {5}
+\DeclareMathSizes{10}   {10}   {7.6}  {6}
+\DeclareMathSizes{10.95}{10.95}{8}    {6}
+\DeclareMathSizes{12}   {12}   {9}    {7}
+\DeclareMathSizes{14.4} {14.4} {10}   {8}
+\DeclareMathSizes{17.28}{17.28}{12}   {10}
+\DeclareMathSizes{20.74}{20.74}{14.4} {12}
+\DeclareMathSizes{24.88}{24.88}{20.74}{14.4}
+%    \end{macrocode}
+%
+% Restore font info:
+%    \begin{macrocode}
+\let\@font@info\s@ved@info
+%</mathpazo>
+%    \end{macrocode}
+%
+% \subsection*{Credits}
+% The Pazo fonts and the related virtual fonts 
+% were created by Diego Puga.
+% The \textsf{mathpazo} package was written by D.~Puga and W.~Schmidt.
+% \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         \~}
diff --git a/Master/texmf-dist/source/latex/psnfss/psfonts.ins b/Master/texmf-dist/source/latex/psnfss/psfonts.ins
new file mode 100644
index 00000000000..82db7cefa23
--- /dev/null
+++ b/Master/texmf-dist/source/latex/psnfss/psfonts.ins
@@ -0,0 +1,24 @@
+%\NeedsTeXFormat{LaTeX2e}[1996/12/01]
+\input docstrip
+\usedir{tex/latex/psnfss}
+\askonceonly
+\keepsilent
+
+\generate{\file{times.sty} {\from{psfonts.dtx}{times}}
+          \file{palatino.sty}  {\from{psfonts.dtx}{palatino}}
+          \file{courier.sty} {\from{psfonts.dtx}{courier}}
+          \file{helvet.sty}{\from{psfonts.dtx}{helvet}}
+          \file{avant.sty}{\from{psfonts.dtx}{avant}}
+          \file{newcent.sty} {\from{psfonts.dtx}{newcent}}
+          \file{bookman.sty} {\from{psfonts.dtx}{bookman}}
+          \file{chancery.sty} {\from{psfonts.dtx}{chancery}}
+          \file{pifont.sty}  {\from{psfonts.dtx}{pifont}}
+          \file{mathpple.sty} {\from{psfonts.dtx}{mathpple}}
+          \file{mathptm.sty} {\from{psfonts.dtx}{mathptm}}
+          \file{mathptmx.sty} {\from{psfonts.dtx}{mathptmx}}
+          \file{charter.sty} {\from{psfonts.dtx}{charter}}
+          \file{utopia.sty} {\from{psfonts.dtx}{utopia}}
+          \file{mathpazo.sty} {\from{psfonts.dtx}{mathpazo}}
+}
+
+\endbatchfile