%%
%% This is file `mdwfonts.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% mdwfonts.dtx  (with options: `sty')
%% 
%% IMPORTANT NOTICE
%%
%% mdwtools common declarations
%% Copyright (c) 1996 Mark Wooding
%%
%% This program is free software; you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published by
%% the Free Software Foundation; either version 2 of the License, or
%% (at your option) any later version.
%%
%% This program is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%% GNU General Public License for more details.
%%
%% You should have received a copy of the GNU General Public License
%% along with this program; if not, write to the Free Software
%% Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{mdwfonts}
                [1997/01/11 1.2 PostScript fonts for my documents]
%% \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         \~}
%%
\RequirePackage{keyval}
\def\mdwf@bodyfont{\mdwf@cmr}
\def\mdwf@mathsfont{\mdwf@bodyfont}
\def\mdwf@sansfont{\mdwf@cmss}
\def\mdwf@headfont{\mdwf@cmr}
\def\mdwf@ttfont{\mdwf@cmtt}
\def\mdwf@set#1#2{\edef#1{\expandafter\noexpand\csname mdwf@#2\endcsname}}
\define@key{mdwf}{body}{\mdwf@set\mdwf@bodyfont{#1}}
\define@key{mdwf}{maths}{\mdwf@set\mdwf@mathsfont{#1}}
\define@key{mdwf}{math}{\mdwf@set\mdwf@mathsfont{#1}}
\define@key{mdwf}{sans}{\mdwf@set\mdwf@sansfont{#1}}
\define@key{mdwf}{head}{\mdwf@set\mdwf@headfont{#1}}
\define@key{mdwf}{tt}{\mdwf@set\mdwf@ttfont{#1}}
\def\mdwfont{\setkeys{mdwf}}
\@input{mdwfonts.cfg}
\DeclareOption{times}{\mdwfont{body=times, maths=times}}
\DeclareOption{palatino}{\mdwfont{body=palatino, maths=palatino}}
\DeclareOption{cmr}{\mdwfont{body=cmr, maths=cmr, head=cmr}}
\DeclareOption{helvetica}{\mdwfont{sans=helvetica, head=helvetica}}
\DeclareOption{cmss}{\mdwfont{sans=cmss}}
\DeclareOption{courier}{\mdwfont{tt=courier}}
\DeclareOption{cmtt}{\mdwfont{tt=cmtt}}
\DeclareOption*{\expandafter\mdwfont\expandafter{\CurrentOption}}
\ProcessOptions*
\ifx\mdwfonts\@@undefined\else
  \def\@tempa#1\@@{\mdwfont{#1}}
  \expandafter\@tempa\mdwfonts\@@
\fi
\count@\z@
\def\@tempa#1{%
  \expandafter\chardef\csname mdwf@#1\endcsname\count@%
  \advance\count@\@ne%
}
\@tempa{cmr}\@tempa{cmss}\@tempa{cmtt}
\@tempa{times}\@tempa{palatino}\@tempa{helvetica}\@tempa{courier}
\def\mdwf@iffont#1{\if1%
  \ifnum\mdwf@bodyfont=#11\else%
  \ifnum\mdwf@headfont=#11\else%
  \ifnum\mdwf@sansfont=#11\else%
  \ifnum\mdwf@ttfont=#11\else0%
  \fi\fi\fi\fi%
}
\mdwf@iffont\mdwf@courier
\DeclareFontFamily{OT1}{pcr}{\hyphenchar\font=-1}
\DeclareFontShape{OT1}{pcr}{b}{n}{<-> pcrb7tn}{}
\DeclareFontShape{OT1}{pcr}{b}{sc}{<-> pcrbc7tn}{}
\DeclareFontShape{OT1}{pcr}{b}{sl}{<-> pcrbo7tn}{}
\DeclareFontShape{OT1}{pcr}{m}{n}{<-> pcrr7tn}{}
\DeclareFontShape{OT1}{pcr}{m}{sc}{<-> pcrrc7tn}{}
\DeclareFontShape{OT1}{pcr}{m}{sl}{<-> pcrro7tn}{}
\DeclareFontShape{OT1}{pcr}{bx}{n}{<->ssub * pcr/b/n}{}
\DeclareFontShape{OT1}{pcr}{bx}{sc}{<->ssub * pcr/b/sc}{}
\DeclareFontShape{OT1}{pcr}{bx}{sl}{<->ssub * pcr/b/sl}{}
\DeclareFontShape{OT1}{pcr}{b}{it}{<->ssub * pcr/b/sl}{}
\DeclareFontShape{OT1}{pcr}{bx}{it}{<->ssub * pcr/b/it}{}
\DeclareFontShape{OT1}{pcr}{m}{it}{<->ssub * pcr/m/sl}{}
\DeclareFontFamily{T1}{pcr}{\hyphenchar\font=-1}
\DeclareFontShape{T1}{pcr}{b}{n}{<-> pcrb8tn}{}
\DeclareFontShape{T1}{pcr}{b}{sc}{<-> pcrbc8tn}{}
\DeclareFontShape{T1}{pcr}{b}{sl}{<-> pcrbo8tn}{}
\DeclareFontShape{T1}{pcr}{m}{n}{<-> pcrr8tn}{}
\DeclareFontShape{T1}{pcr}{m}{sc}{<-> pcrrc8tn}{}
\DeclareFontShape{T1}{pcr}{m}{sl}{<-> pcrro8tn}{}
\DeclareFontShape{T1}{pcr}{bx}{n}{<->ssub * pcr/b/n}{}
\DeclareFontShape{T1}{pcr}{bx}{sc}{<->ssub * pcr/b/sc}{}
\DeclareFontShape{T1}{pcr}{bx}{sl}{<->ssub * pcr/b/sl}{}
\DeclareFontShape{T1}{pcr}{b}{it}{<->ssub * pcr/b/sl}{}
\DeclareFontShape{T1}{pcr}{bx}{it}{<->ssub * pcr/b/it}{}
\DeclareFontShape{T1}{pcr}{m}{it}{<->ssub * pcr/m/sl}{}
\fi
\mdwf@iffont\mdwf@helvetica
\DeclareFontFamily{OT1}{phv}{}
\DeclareFontShape{OT1}{phv}{b}{n}{<-> s * [.9] phvb7t}{}
\DeclareFontShape{OT1}{phv}{b}{sc}{<-> s * [.9] phvbc7t}{}
\DeclareFontShape{OT1}{phv}{b}{sl}{<-> s * [.9] phvbo7t}{}
\DeclareFontShape{OT1}{phv}{bc}{n}{<-> s * [.9] phvbrn7t}{}
\DeclareFontShape{OT1}{phv}{bc}{sc}{<-> s * [.9] phvbcn7t}{}
\DeclareFontShape{OT1}{phv}{bc}{sl}{<-> s * [.9] phvbon7t}{}
\DeclareFontShape{OT1}{phv}{m}{n}{<-> s * [.9] phvr7t}{}
\DeclareFontShape{OT1}{phv}{m}{sc}{<-> s * [.9] phvrc7t}{}
\DeclareFontShape{OT1}{phv}{m}{sl}{<-> s * [.9] phvro7t}{}
\DeclareFontShape{OT1}{phv}{mc}{n}{<-> s * [.9] phvrrn7t}{}
\DeclareFontShape{OT1}{phv}{mc}{sc}{<-> s * [.9] phvrcn7t}{}
\DeclareFontShape{OT1}{phv}{mc}{sl}{<-> s * [.9] phvron7t}{}
\DeclareFontShape{OT1}{phv}{bx}{n}{<->ssub * phv/b/n}{}
\DeclareFontShape{OT1}{phv}{bx}{sc}{<->ssub * phv/b/sc}{}
\DeclareFontShape{OT1}{phv}{bx}{sl}{<->ssub * phv/b/sl}{}
\DeclareFontShape{OT1}{phv}{b}{it}{<->ssub * phv/b/sl}{}
\DeclareFontShape{OT1}{phv}{bx}{it}{<->ssub * phv/b/it}{}
\DeclareFontShape{OT1}{phv}{bc}{it}{<->ssub * phv/bc/sl}{}
\DeclareFontShape{OT1}{phv}{m}{it}{<->ssub * phv/m/sl}{}
\DeclareFontShape{OT1}{phv}{mc}{it}{<->ssub * phv/mc/sl}{}
\DeclareFontFamily{T1}{phv}{}
\DeclareFontShape{T1}{phv}{b}{n}{<-> s * [.9] phvb8t}{}
\DeclareFontShape{T1}{phv}{b}{sc}{<-> s * [.9] phvbc8t}{}
\DeclareFontShape{T1}{phv}{b}{sl}{<-> s * [.9] phvbo8t}{}
\DeclareFontShape{T1}{phv}{bc}{n}{<-> s * [.9] phvbrn8t}{}
\DeclareFontShape{T1}{phv}{bc}{sc}{<-> s * [.9] phvbcn8t}{}
\DeclareFontShape{T1}{phv}{bc}{sl}{<-> s * [.9] phvbon8t}{}
\DeclareFontShape{T1}{phv}{m}{n}{<-> s * [.9] phvr8t}{}
\DeclareFontShape{T1}{phv}{m}{sc}{<-> s * [.9] phvrc8t}{}
\DeclareFontShape{T1}{phv}{m}{sl}{<-> s * [.9] phvro8t}{}
\DeclareFontShape{T1}{phv}{mc}{n}{<-> s * [.9] phvrrn8t}{}
\DeclareFontShape{T1}{phv}{mc}{sc}{<-> s * [.9] phvrcn8t}{}
\DeclareFontShape{T1}{phv}{mc}{sl}{<-> s * [.9] phvron8t}{}
\DeclareFontShape{T1}{phv}{bx}{n}{<->ssub * phv/b/n}{}
\DeclareFontShape{T1}{phv}{bx}{sc}{<->ssub * phv/b/sc}{}
\DeclareFontShape{T1}{phv}{bx}{sl}{<->ssub * phv/b/sl}{}
\DeclareFontShape{T1}{phv}{b}{it}{<->ssub * phv/b/sl}{}
\DeclareFontShape{T1}{phv}{bx}{it}{<->ssub * phv/b/it}{}
\DeclareFontShape{T1}{phv}{bc}{it}{<->ssub * phv/bc/sl}{}
\DeclareFontShape{T1}{phv}{m}{it}{<->ssub * phv/m/sl}{}
\DeclareFontShape{T1}{phv}{mc}{it}{<->ssub * phv/mc/sl}{}
\fi
\mdwf@iffont\mdwf@palatino
\DeclareFontFamily{OT1}{ppl}{}
\DeclareFontShape{OT1}{ppl}{b}{n}{<-> pplb7t}{}
\DeclareFontShape{OT1}{ppl}{b}{sc}{<-> pplbc7t}{}
\DeclareFontShape{OT1}{ppl}{b}{sl}{<-> pplbo7t}{}
\DeclareFontShape{OT1}{ppl}{b}{it}{<-> pplbi7t}{}
\DeclareFontShape{OT1}{ppl}{m}{n}{<-> pplr7t}{}
\DeclareFontShape{OT1}{ppl}{m}{sc}{<-> pplrc7t}{}
\DeclareFontShape{OT1}{ppl}{m}{sl}{<-> pplro7t}{}
\DeclareFontShape{OT1}{ppl}{m}{it}{<-> pplri7t}{}
\DeclareFontShape{OT1}{ppl}{bx}{n}{<->ssub * ppl/b/n}{}
\DeclareFontShape{OT1}{ppl}{bx}{sc}{<->ssub * ppl/b/sc}{}
\DeclareFontShape{OT1}{ppl}{bx}{sl}{<->ssub * ppl/b/sl}{}
\DeclareFontShape{OT1}{ppl}{bx}{it}{<->ssub * ppl/b/it}{}
\DeclareFontShape{OT1}{ppl}{l}{n}{<->ssub * ppl/m/n}{}
\DeclareFontShape{OT1}{ppl}{l}{sc}{<->ssub * ppl/m/sc}{}
\DeclareFontShape{OT1}{ppl}{l}{sl}{<->ssub * ppl/m/sl}{}
\DeclareFontShape{OT1}{ppl}{l}{it}{<->ssub * ppl/m/it}{}
\DeclareFontFamily{T1}{ppl}{}
\DeclareFontShape{T1}{ppl}{b}{n}{<-> pplb8t}{}
\DeclareFontShape{T1}{ppl}{b}{sc}{<-> pplbc8t}{}
\DeclareFontShape{T1}{ppl}{b}{sl}{<-> pplbo8t}{}
\DeclareFontShape{T1}{ppl}{b}{it}{<-> pplbi8t}{}
\DeclareFontShape{T1}{ppl}{m}{n}{<-> pplr8t}{}
\DeclareFontShape{T1}{ppl}{m}{sc}{<-> pplrc8t}{}
\DeclareFontShape{T1}{ppl}{m}{sl}{<-> pplro8t}{}
\DeclareFontShape{T1}{ppl}{m}{it}{<-> pplri8t}{}
\DeclareFontShape{T1}{ppl}{bx}{n}{<->ssub * ppl/b/n}{}
\DeclareFontShape{T1}{ppl}{bx}{sc}{<->ssub * ppl/b/sc}{}
\DeclareFontShape{T1}{ppl}{bx}{sl}{<->ssub * ppl/b/sl}{}
\DeclareFontShape{T1}{ppl}{bx}{it}{<->ssub * ppl/b/it}{}
\DeclareFontShape{T1}{ppl}{l}{n}{<->ssub * ppl/m/n}{}
\DeclareFontShape{T1}{ppl}{l}{sc}{<->ssub * ppl/m/sc}{}
\DeclareFontShape{T1}{ppl}{l}{sl}{<->ssub * ppl/m/sl}{}
\DeclareFontShape{T1}{ppl}{l}{it}{<->ssub * ppl/m/it}{}
\fi
\mdwf@iffont\mdwf@times
\DeclareFontFamily{OT1}{ptm}{}
\DeclareFontShape{OT1}{ptm}{b}{n}{<-> ptmb7t}{}
\DeclareFontShape{OT1}{ptm}{b}{sc}{<-> ptmbc7t}{}
\DeclareFontShape{OT1}{ptm}{b}{sl}{<-> ptmbo7t}{}
\DeclareFontShape{OT1}{ptm}{b}{it}{<-> ptmbi7t}{}
\DeclareFontShape{OT1}{ptm}{m}{n}{<-> ptmr7t}{}
\DeclareFontShape{OT1}{ptm}{m}{sc}{<-> ptmrc7t}{}
\DeclareFontShape{OT1}{ptm}{m}{sl}{<-> ptmro7t}{}
\DeclareFontShape{OT1}{ptm}{m}{it}{<-> ptmri7t}{}
\DeclareFontShape{OT1}{ptm}{bx}{n}{<->ssub * ptm/b/n}{}
\DeclareFontShape{OT1}{ptm}{bx}{sc}{<->ssub * ptm/b/sc}{}
\DeclareFontShape{OT1}{ptm}{bx}{sl}{<->ssub * ptm/b/sl}{}
\DeclareFontShape{OT1}{ptm}{bx}{it}{<->ssub * ptm/b/it}{}
\DeclareFontShape{OT1}{ptm}{l}{n}{<->ssub * ptm/m/n}{}
\DeclareFontShape{OT1}{ptm}{l}{sc}{<->ssub * ptm/m/sc}{}
\DeclareFontShape{OT1}{ptm}{l}{sl}{<->ssub * ptm/m/sl}{}
\DeclareFontShape{OT1}{ptm}{l}{it}{<->ssub * ptm/m/it}{}
\DeclareFontFamily{T1}{ptm}{}
\DeclareFontShape{T1}{ptm}{b}{n}{<-> ptmb8t}{}
\DeclareFontShape{T1}{ptm}{b}{sc}{<-> ptmbc8t}{}
\DeclareFontShape{T1}{ptm}{b}{sl}{<-> ptmbo8t}{}
\DeclareFontShape{T1}{ptm}{b}{it}{<-> ptmbi8t}{}
\DeclareFontShape{T1}{ptm}{m}{n}{<-> ptmr8t}{}
\DeclareFontShape{T1}{ptm}{m}{sc}{<-> ptmrc8t}{}
\DeclareFontShape{T1}{ptm}{m}{sl}{<-> ptmro8t}{}
\DeclareFontShape{T1}{ptm}{m}{it}{<-> ptmri8t}{}
\DeclareFontShape{T1}{ptm}{bx}{n}{<->ssub * ptm/b/n}{}
\DeclareFontShape{T1}{ptm}{bx}{sc}{<->ssub * ptm/b/sc}{}
\DeclareFontShape{T1}{ptm}{bx}{sl}{<->ssub * ptm/b/sl}{}
\DeclareFontShape{T1}{ptm}{bx}{it}{<->ssub * ptm/b/it}{}
\DeclareFontShape{T1}{ptm}{l}{n}{<->ssub * ptm/m/n}{}
\DeclareFontShape{T1}{ptm}{l}{sc}{<->ssub * ptm/m/sc}{}
\DeclareFontShape{T1}{ptm}{l}{sl}{<->ssub * ptm/m/sl}{}
\DeclareFontShape{T1}{ptm}{l}{it}{<->ssub * ppl/m/it}{}
\fi
\ifnum\mdwf@mathsfont=\mdwf@palatino
\DeclareSymbolFont{operators}   {OT1}{pplcm}{m}{n}
\DeclareSymbolFont{letters}     {OML}{pplcm}{m}{it}
\DeclareSymbolFont{bold}        {OT1}{ppl}{bx}{n}
\DeclareSymbolFont{italic}      {OT1}{ppl}{m}{it}
\fi
\ifnum\mdwf@mathsfont=\mdwf@times
\DeclareSymbolFont{operators}   {OT1}{ptmcm}{m}{n}
\DeclareSymbolFont{letters}     {OML}{ptmcm}{m}{it}
\DeclareSymbolFont{bold}        {OT1}{ptm}{bx}{n}
\DeclareSymbolFont{italic}      {OT1}{ptm}{m}{it}
\fi
\if1\ifnum\mdwf@mathsfont=\mdwf@times1\else
    \ifnum\mdwf@mathsfont=\mdwf@palatino1\else0\fi\fi
\DeclareSymbolFont{symbols}     {OMS}{pzccm}{m}{n}
\DeclareSymbolFont{largesymbols}{OMX}{psycm}{m}{n}
\thinmuskip=2mu
\medmuskip=2.5mu plus 1mu minus 1mu
\thickmuskip=4mu plus 1.5mu minus 1mu
\def\boldmath{%
   \@warning{there is no bold Symbol font}%
   \global\let\boldmath=\relax
}
\DeclareMathSymbol{\omicron}{0}{operators}{`\o}
\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}
\DeclareFontSubstitution{OMS}{pzccm}{m}{n}
\fi
\def\mdwf@cmr{cmr}
\def\mdwf@cmss{cmss}
\def\mdwf@cmtt{cmtt}
\def\mdwf@times{ptm}
\def\mdwf@palatino{ppl}
\def\mdwf@helvetica{phv}
\def\mdwf@courier{pcr}
\edef\rmdefault{\mdwf@bodyfont}
\edef\sfdefault{\mdwf@sansfont}
\edef\ttdefault{\mdwf@ttfont}
\edef\headdefault{\mdwf@headfont}
\def\mdwf@mathsfam#1#2#3{%
  \edef\@tempa{\noexpand\DeclareMathAlphabet{\noexpand#1}{#2}{#3}}%
  \@tempa%
}
\mdwf@mathsfam{\mathit}{OT1}{\rmdefault}{m}{it}
\mdwf@mathsfam{\mathbf}{OT1}{\rmdefault}{bx}{n}
\mdwf@mathsfam{\mathsf}{OT1}{\sfdefault}{m}{n}
\mdwf@mathsfam{\mathtt}{OT1}{\ttdefault}{m}{n}
\def\headfam{\fontfamily\headdefault\selectfont}
\begingroup
\catcode`\.11
\if1\ifx\ver@article.cls\@@undefined
    \ifx\ver@report.cls\@@undefined
    \ifx\ver@book.cls\@@undefined
    \ifx\ver@amsart.cls\@@undefined
    \ifx\ver@amsproc.cls\@@undefined
    \ifx\ver@amsbook.cls\@@undefined0%
    \else1\fi
    \else1\fi
    \else1\fi
    \else1\fi
    \else1\fi
    \else1\fi
  \def\@startsection#1#2#3#4#5#6#7{%
    \gdef#7{\@startsection{#1}{#2}{#3}{#4}{#5}{#6\headfam}}%
  }
  \section\section
  \subsection\subsection
  \subsubsection\subsubsection
  \paragraph\paragraph
  \subparagraph\subparagraph
  \if1\ifx\ver@amsart.cls\@@undefined\ifx\ver@amsproc.cls\@@undefined0%
      \else1\fi\else1\fi
    \part\part
  \fi
  \long\def\mdwf@grab#1{\expandafter\mdwf@grab@i#1\@@delim}
  \long\def\mdwf@grab@i#1\@@delim#2{#2{#1}}
  \def\mdwf@patch@opt#1{\mdwf@grab{#1[##1]{##2}}\mdwf@patch@opt@i#1}
  \long\def\mdwf@patch@opt@i#1#2{\gdef#2[##1]##2{%
    \let\mdwf@@bfseries\bfseries\def\bfseries{\headfam\mdwf@@bfseries}%
    #1%
    \let\bfseries\mdwf@@bfseries%
  }}%
  \def\mdwf@patch#1{\mdwf@grab{#1{##1}}\mdwf@patch@i#1}
  \long\def\mdwf@patch@i#1#2{\gdef#2##1{%
    \let\mdwf@@bfseries\bfseries\def\bfseries{\headfam\mdwf@@bfseries}%
    #1%
    \let\bfseries\mdwf@@bfseries%
  }}%
  \if0\ifx\ver@amsart.cls\@@undefined\ifx\ver@amsproc.cls\@@undefined0%
      \else1\fi\else1\fi
    \mdwf@patch@opt\@part
    \mdwf@patch\@spart
  \fi
  \ifx\@makechapterhead\@@undefined\else
    \mdwf@patch\@makechapterhead
    \mdwf@patch\@makeschapterhead
  \fi
\fi
\endgroup
\endinput
%%
%% End of file `mdwfonts.sty'.
