%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% afrutiger.sty                                %
%                                              %
% zur Verwendung der Adobe Frutiger in LaTeX   %
% tfm, vf, maps und fd by Walter Schmidt       %  
% sty by Christian H. Kuhn                     %
% corrected by Walter Schmidt                  %
% 2001/03/30                                   %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{afrutiger}
     [2002/02/04 v0.9beta Adobe Frutiger font package]

\newif\if@pfrdefault
\DeclareOption{default}{%
%SansSerif wird zur Standardschrift
\@pfrdefaulttrue}

\newif\if@pfrlight       
\DeclareOption{light}{%
% This is a hack to use Frutiger light in the place of medium
\@pfrlighttrue}

\newif\if@pfreuler       
\DeclareOption{euler}{%
% This is a hack to use Frutiger light together with eulervm als the
% mathrm font
\@pfreulertrue}

\newif\if@pfrlimed
\DeclareOption{mediumbold}{%
% If light is default, perhaps bold is to bold, so that option uses
% medium in the place of bold
\@pfrlimedtrue}

\newif\if@pfrnot
\DeclareOption{nodefault}{\@pfrnottrue}
% If Option nodefault is NOT used, the choosen Frutiger will be used
% as \sfdefault, otherwise only the implemented commands will be
% available

\ProcessOptions\relax

\if@pfrnot
% If Option nodefault is used, nothing has to be done here
\else
  \if@pfrlight
    \if@pfrlimed
% Adobe Frutiger 45 wird zur Standard-SansSerif-Schrift, Adobe Frutiger 55 wird
% als bold verwendet (56 liegt nicht vor!)
      \renewcommand{\sfdefault}{pfrm}
      \providecommand{\texthf}[1]{{\fontseries{h}\selectfont #1}}
    \else
% Adobe Frutiger 45 wird zur Standard-SansSerif-Schrift, Adobe Frutiger 65 wird
% als bold verwendet
      \renewcommand{\sfdefault}{pfrl}
      \providecommand{\textmf}[1]{{\fontseries{s}\selectfont #1}}
    \fi
  \else
% Adobe Frutiger wird zur Standard-SansSerif-Schrift
    \renewcommand{\sfdefault}{pfr}
    \providecommand{\textli}[1]{{\fontseries{l}\selectfont #1}}
  \fi
  \if@pfrdefault
% SansSerif wird zur Standardschrift
    \renewcommand{\familydefault}{\sfdefault}
    \if@pfreuler
% If using 
      \let\rmdefault\sfdefault %% Hack wg. eulervm
      \PackageWarning{afrutiger}{For the correct use of Frutiger
      together with the euler math fonts from eulervm, Frutiger is not
      only set as sfdefault but also as rmdefault. Don't use packages
      redefining rmdefault, otherwise Frutiger will not be used in the
      math fonts.}
      \RequirePackage{eulervm}
    \fi
  \fi
\fi

\PackageWarning{afrutiger}{This package provides Adobe Frutiger as a
  sans-serif font, as it is available at the
  Fraunhofer-Gesellschaft. There is no regular italic available, but
  can be bought from Adobe. That font does not well mix with the
  Computer Modern Math, Sans Serif, or Typewriter fonts. It is
  recommended to use the package eulervm for the math fonts. Choose
  the roman and typewriter fonts according to the fonts you have
  installed and your taste.}

\endinput

