%% %% This is file `psfont.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% psfont.dtx (with options: `package') %% %% psfont: A LaTeX2e package for using PostScript fonts %% Copyright (C) 1996 Sebastian Marius Kirsch %% %% 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. %% \def\fileversion{1.1} \def\filedate{1996/06/30} %% \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 \~} %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{psfont}% [\filedate\space v\fileversion\space loading PostScript fonts] \newif\ifrm@set\rm@setfalse \newif\ifsf@set\sf@setfalse \newif\iftt@set\tt@setfalse \newcommand{\DefaultRMFont}[1]{\renewcommand{\def@rmfont}{#1}} \newcommand{\DefaultSFFont}[1]{\renewcommand{\def@sffont}{#1}} \newcommand{\DefaultTTFont}[1]{\renewcommand{\def@ttfont}{#1}} \newcommand{\def@rmfont}{} \newcommand{\def@sffont}{} \newcommand{\def@ttfont}{} \newcommand{\AvailableRMFont}[3][]{% \DeclareOption{#2}{% \ifrm@set\PackageError{psfont}{% \protect\rmfamily\space already defined as \rmdefault }{% You tried to load two roman families at the same time,\MessageBreak e.g. times and palatino} \else\renewcommand{\rmdefault}{#3}\rm@settrue #1 \fi} } \newcommand{\AvailableSFFont}[3][]{% \DeclareOption{#2}{% \ifsf@set\PackageError{psfont}{% \protect\sffamily\space already defined as \sfdefault }{% You tried to load two sans serif families at the same time,\MessageBreak e.g. gill and helvetica} \else\renewcommand{\sfdefault}{#3}\sf@settrue #1 \fi} } \newcommand{\AvailableTTFont}[3][]{% \DeclareOption{#2}{% \iftt@set\PackageError{psfont}{% \protect\ttfamily\space already defined as \ttdefault }{% You tried to load two typewriter families at the same time,\MessageBreak e.g. courier and typewriter} \else\renewcommand{\ttdefault}{#3}\tt@settrue #1 \fi} } \newcommand{\AvailableFont}[5][]{% \DeclareOption{#2}{% \ifrm@set\PackageError{psfont}{% \protect\rmfamily\space already defined as \rmdefault }{% You tried to load two roman families at the same time,\MessageBreak e.g. times and palatino} \else\renewcommand{\rmdefault}{#3}\rm@settrue \fi \ifsf@set\PackageError{psfont}{% \protect\sffamily\space already defined as \sfdefault }{% You tried to load two sans serif families at the same time,\MessageBreak e.g. gill and helvetica} \else\renewcommand{\sfdefault}{#4}\sf@settrue \fi \iftt@set\PackageError{psfont}{% \protect\ttfamily\space already defined as \ttdefault }{% You tried to load two typewriter families at the same time,\MessageBreak e.g. courier and typewriter} \else\renewcommand{\ttdefault}{#5}\tt@settrue \fi #1 } } \InputIfFileExists{psfont.cfg}{}{% \PackageError{psfont}{% No local configuration file found }{% The psfont package was loaded without a local\MessageBreak configuration file, so it doesn't know which fonts\MessageBreak are available.} } \DeclareOption{onlyps}{ \ifrm@set\else \ifx\empty\def@rmfont \PackageWarning{psfont}{No default roman font defined!} \else\renewcommand{\rmdefault}{\def@rmfont}\fi \fi \ifsf@set\else \ifx\empty\def@sffont \PackageWarning{psfont}{No default sans serif font defined!} \else\renewcommand{\sfdefault}{\def@sffont}\fi \fi \iftt@set\else \ifx\empty\def@ttfont \PackageWarning{psfont}{No default typewriter font defined!} \else\renewcommand{\ttdefault}{\def@ttfont}\fi \fi } \DeclareOption{pifont}{ \newcommand{\Pifont}[1]{\fontfamily{#1}\fontencoding{U}% \fontseries{m}\fontshape{n}\selectfont} \newcommand{\Pisymbol}[2]{{\Pifont{#1}\char#2}} \newcommand{\Pifill}[2]{\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}}% \def\Pinumber#1#2{\protect\Pisymbol{#1}{\arabic{#2}}} \newenvironment{Piautolist}[2]{% \ifnum \@enumdepth >3 \@toodeep\else \advance\@enumdepth \@ne \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} \newcommand{\ding}{\Pisymbol{pzd}} \def\dingfill#1{\leaders\hbox{\makebox[0.2in]{\Pisymbol{pzd}{#1}}}\hfill} \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}} } \DeclareOption{mathptm}{ \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} \@ifundefined{mathbf}{}{\DeclareMathAlphabet{\mathbf}{OT1}{ptm}{bx}{n}} \@ifundefined{mathit}{}{\DeclareMathAlphabet{\mathit}{OT1}{ptm}{m}{it}} \DeclareMathSymbol{\omicron}{0}{operators}{`\o} \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 } \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} } \ProcessOptions \endinput %% %% End of file `psfont.sty'.