%% BEGIN semhelv.sty
\def\fileversion{1.4}
\def\filedate{2000/05/08}
%%
%% LaTeX style option `semhelv.sty' for the `seminar' document class.
%% For use with LaTeX2e.
%%
%% COPYRIGHT 1994, by Timothy Van Zandt, tvz@Princeton.EDU
%% See seminar.cls or seminar.doc for copying restrictions.
%% Edited by Sebastian Rahtz <sebastian.rahtz@oucs.ox.ac.uk>
%%   and Denis Girou <denis.girou@idris.fr>
%% To use OT1-encoding 7t names
%% ************************************************************************
%% ****                        DESCRIPTION                             ****
%% ************************************************************************
%%
% This file contains the external font information needed to load
% the PostScript Helvetica fonts for use by seminar.cls.
%
% IMPORTANT:
%   As distributed, the following font file names are assumed for the
%   `standard' TeX encoding:
%
%     Helvetica              phvr7t
%     Helvetica-Oblique      phvro7t
%     Helvetica-Bold         phvb7t
%     Helvetica-BoldOblique  phvbo7t
%     Courier                pcrr7t
%     Courier-Bold           pcrb7t
%     Courier-Oblique        pcrro7t
%     Courier-BoldOblique    pcrbo7t
%
%   With the NFSS2 and LaTeX2e, you can also use the CORK encoding. The
%   assumed file names are as above, but with `8t' instead of `7t'
%
%   This means, e.g., that phvr7t.tfm or phvr7t.vf must be the name of the
%   TeX .tfm or .vf (virtual font) file for the PostScript Helvetica font.
%   See the documentation of your dvi-to-ps driver for information on using
%   PostScript fonts.
%
% Fonts are scaled so that the x-heights match those of the cmr fonts;
% this makes in-line math look acceptable.
%
% Note: The Courier font is not that great.
%
% Preliminaries:
\csname semhelv@loaded\endcsname
\let\semhelv@loaded\endinput
\typeout{Style Option: `semhelv' for the `seminar' doc style
  \fileversion\space <\filedate> (tvz)}
\typeout{Modified by Stefan (see source for details)}
\@ifundefined{selectfont}
  {\@seminarerr{`semhelv' style option can only be used
    with the New Font Selection Scheme}\@eha\endinput}{}
%
% Font definitions.

\expandafter\ifx\csname DeclareSizeFunction\endcsname\relax

% FOR NFSS:

\@ifundefined{newpsfamily}{\input{npsfont.sty}}{}%

% See npsfont.sty for the definition of \newpsfamily.

\newpsfamily[.82]{helvetica}{
  {m}{n}{phvr7t},          %Helvetica
  {m}{it}{phvro7t},        %Helvetica-Oblique
  {m}{sl}{phvro7t},        %Helvetica-Oblique
  {bx}{n}{phvb7t},         %Helvetica-Bold
  {bx}{it}{phvbo7t},       %Helvetica-BoldOblique
  {bx}{sl}{phvbo7t}}       %Helvetica-BoldOblique
\newpsfamily[.985]{courier}{
  {m}{n}{pcrr7t},          %Courier
  {bx}{n}{pcrb7t},         %Courier-Bold
  {m}{it}{pcrro7t},        %Courier-Oblique
  {bx}{it}{pcrbo7t}}       %Courier-BoldOblique

% Use fonts or use \slidefonts:
\ifarticle
  \renewcommand{\slidefonts}{%
    \renewcommand{\default@family}{helvetica}%
    \renewcommand{\rmdefault}{helvetica}%
    \renewcommand{\ttdefault}{courier}%
    \renewcommand{\sfdefault}{helvetica}%
    \family\default@family\selectfont}
\else
  \renewcommand{\default@family}{helvetica}%
  \renewcommand{\rmdefault}{helvetica}%
  \renewcommand{\ttdefault}{courier}%
  \renewcommand{\sfdefault}{helvetica}%
  \family\default@family\selectfont
\fi

\else

% FOR NFSS2 OR LATEX2E:

\def\helv@scale{.82}

\DeclareFontFamily{T1}{helvetica}{}%
\DeclareFontShape{T1}{helvetica}{m}{n}{<->s*[\helv@scale]phvr8t}{}%
\DeclareFontShape{T1}{helvetica}{m}{it}{<->s*[\helv@scale]phvro8t}{}%
\DeclareFontShape{T1}{helvetica}{m}{sc}{<->s*[\helv@scale]phvrc8t}{}%
\DeclareFontShape{T1}{helvetica}{b}{n}{<->s*[\helv@scale]phvb8t}{}%
\DeclareFontShape{T1}{helvetica}{b}{it}{<->s*[\helv@scale]phvbo8t}{}%
\DeclareFontShape{T1}{helvetica}{m}{sl}{<->ssub * helvetica/m/it}{}%
\DeclareFontShape{T1}{helvetica}{b}{sc}{<->sub * helvetica/m/sc}{}%
\DeclareFontShape{T1}{helvetica}{b}{sl}{<->ssub * helvetica/b/it}{}%
\DeclareFontShape{T1}{helvetica}{bx}{n}{<->ssub * helvetica/b/n}{}%
\DeclareFontShape{T1}{helvetica}{bx}{it}{<->ssub * helvetica/b/it}{}%
\DeclareFontShape{T1}{helvetica}{bx}{sc}{<->sub * helvetica/m/sc}{}%
\DeclareFontShape{T1}{helvetica}{bx}{sl}{<->ssub * helvetica/b/it}{}%

\DeclareFontFamily{OT1}{helvetica}{}%
\DeclareFontShape{OT1}{helvetica}{m}{n}{<->s*[\helv@scale]phvr7t}{}%
\DeclareFontShape{OT1}{helvetica}{m}{it}{<->s*[\helv@scale]phvro7t}{}%
\DeclareFontShape{OT1}{helvetica}{m}{sc}{<->s*[\helv@scale]phvrc7t}{}%
\DeclareFontShape{OT1}{helvetica}{b}{n}{<->s*[\helv@scale]phvb7t}{}%
\DeclareFontShape{OT1}{helvetica}{b}{it}{<->s*[\helv@scale]phvbo7t}{}%
\DeclareFontShape{OT1}{helvetica}{m}{sl}{<->ssub * helvetica/m/it}{}%
\DeclareFontShape{OT1}{helvetica}{b}{sc}{<->sub * helvetica/m/sc}{}%
\DeclareFontShape{OT1}{helvetica}{b}{sl}{<->ssub * helvetica/b/it}{}%
\DeclareFontShape{OT1}{helvetica}{bx}{n}{<->ssub * helvetica/b/n}{}%
\DeclareFontShape{OT1}{helvetica}{bx}{it}{<->ssub * helvetica/b/it}{}%
\DeclareFontShape{OT1}{helvetica}{bx}{sc}{<->sub * helvetica/m/sc}{}%
\DeclareFontShape{OT1}{helvetica}{bx}{sl}{<->ssub * helvetica/b/it}{}%

\def\courier@scale{.985}

% DG/SR modification begin - May. 13, 1998
% Update some names (phvrq -> phvr7t etc.)
% DG/SR modification end

\DeclareFontFamily{T1}{courier}{\hyphenchar \font\m@ne}%
\DeclareFontShape{T1}{courier}{m}{n}{<->s*[\courier@scale]pcrr8t}{}%
\DeclareFontShape{T1}{courier}{m}{it}{<->s*[\courier@scale]pcrro8t}{}%
\DeclareFontShape{T1}{courier}{m}{sc}{<->s*[\courier@scale]pcrrc8t}{}%
\DeclareFontShape{T1}{courier}{b}{n}{<->s*[\courier@scale]pcrb8t}{}%
\DeclareFontShape{T1}{courier}{b}{it}{<->s*[\courier@scale]pcrbo8t}{}%
\DeclareFontShape{T1}{courier}{m}{sl}{<->ssub * courier/m/it}{}%
\DeclareFontShape{T1}{courier}{b}{sc}{<->sub * courier/m/sc}{}%
\DeclareFontShape{T1}{courier}{b}{sl}{<->ssub * courier/b/it}{}%
\DeclareFontShape{T1}{courier}{bx}{n}{<->ssub * courier/b/n}{}%
\DeclareFontShape{T1}{courier}{bx}{it}{<->ssub * courier/b/it}{}%
\DeclareFontShape{T1}{courier}{bx}{sc}{<->sub * courier/m/sc}{}%
\DeclareFontShape{T1}{courier}{bx}{sl}{<->ssub * courier/b/it}{}%

\DeclareFontFamily{OT1}{courier}{\hyphenchar \font\m@ne}%
\DeclareFontShape{OT1}{courier}{m}{n}{<->s*[\courier@scale]pcrr7t}{}%
\DeclareFontShape{OT1}{courier}{m}{it}{<->s*[\courier@scale]pcrro7t}{}%
\DeclareFontShape{OT1}{courier}{m}{sc}{<->s*[\courier@scale]pcrrc7t}{}%
\DeclareFontShape{OT1}{courier}{b}{n}{<->s*[\courier@scale]pcrb7t}{}%
\DeclareFontShape{OT1}{courier}{b}{it}{<->s*[\courier@scale]pcrbo7t}{}%
\DeclareFontShape{OT1}{courier}{m}{sl}{<->ssub * courier/m/it}{}%
\DeclareFontShape{OT1}{courier}{b}{sc}{<->sub * courier/m/sc}{}%
\DeclareFontShape{OT1}{courier}{b}{sl}{<->ssub * courier/b/it}{}%
\DeclareFontShape{OT1}{courier}{bx}{n}{<->ssub * courier/b/n}{}%
\DeclareFontShape{OT1}{courier}{bx}{it}{<->ssub * courier/b/it}{}%
\DeclareFontShape{OT1}{courier}{bx}{sc}{<->sub * courier/m/sc}{}%
\DeclareFontShape{OT1}{courier}{bx}{sl}{<->ssub * courier/b/it}{}%

% Use fonts or use \slidefonts:
\ifarticle
  \renewcommand{\slidefonts}{%
    \renewcommand{\default@family}{helvetica}%
    \renewcommand{\rmdefault}{helvetica}%
    \renewcommand{\ttdefault}{courier}%
    \renewcommand{\sfdefault}{helvetica}%
    \fontfamily\default@family\selectfont}
\else
  \renewcommand{\default@family}{helvetica}%
  \renewcommand{\rmdefault}{helvetica}%
  \renewcommand{\ttdefault}{courier}%
  \renewcommand{\sfdefault}{helvetica}%
  \fontfamily\default@family\selectfont
\fi

\fi

\endinput
%% END semhelv.sty

