%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% afonts.sty
% 18.07.91 1.0
% 20.09.91 1.1 added NFSS macros (br)
% 19.11.91 1.2 magstephalf
% 24.12.91 1.3 format
% 12.02.92 1.4 message delayed
% 27.02.92 1.5 nash14 font
% 31.08.93 1.6 added support for NFSS2, missing `pt' in NFSS1 def. (br)
% 14.03.94 1.7 identify lfonts.tex or NFSS version used
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% (c) Klaus Lagally and Bernd Raichle
%     Institut fuer Informatik
%     Universitaet Stuttgart
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% load this file only, if \pnash not defined
%
\expandafter \ifx \csname pnash\endcsname \relax \else
  \expandafter \endinput
\fi

\version = {1.7}  		\datum = {14.03.94}  
\message {\the\version }	\message {\the\datum }

\edef \arabtexconfig {\arabtexconfig 
afonts.sty \the\version \space (\the\datum) }

\chardef \fntatcode = \catcode`\@            \catcode`\@ = 11
\chardef \fntlscode = \catcode`\<            \catcode`\< = 12

% select the nash font with \nash
%
\def\nash {\protect\pnash}


% If we are using the NFSS, Version 2,  \DeclareFontShape
% is defined.
%
% (The \expandafter\ifx\csname...\endcsname\relax is necessary,
% because the NFSS2 styleoptions use LaTeX's internal \@ifundefined
% command.)
%
\expandafter\ifx\csname DeclareFontShape\endcsname\relax


% Now it's possible that NFSS, Version 1, is used.
% If \selectfont is defined, NFSS is active, otherwise
% we assume LaTeX's `lfonts.tex'.
%
\expandafter\ifx\csname selectfont\endcsname\relax

% OLD FONT SELECTION
\message {using lfonts.tex}

% load all necessary fonts
%
\newfont {\tennash }{nash14}
\newfont {\elvnnash}{nash14 scaled 1095}
\newfont {\twlvnash}{nash14 \@magscale1}
\newfont {\frtnnash}{nash14 \@magscale2}
\newfont {\svtnnash}{nash14 \@magscale3}
\newfont {\twtynash}{nash14 \@magscale4}
\newfont {\twfvnash}{nash14 \@magscale5}

% add the \pnash command to the size changing hooks
% 
\@addfontinfo \@vpt    {\def\pnash {\tennash}}
\@addfontinfo \@viipt  {\def\pnash {\tennash}}
\@addfontinfo \@viiipt {\def\pnash {\tennash}}
\@addfontinfo \@ixpt   {\def\pnash {\tennash}}
\@addfontinfo \@xpt    {\def\pnash {\tennash}}
\@addfontinfo \@xipt   {\def\pnash {\elvnnash}}
\@addfontinfo \@xiipt  {\def\pnash {\twlvnash}}
\@addfontinfo \@xivpt  {\def\pnash {\frtnnash}}
\@addfontinfo \@xviipt {\def\pnash {\svtnnash}}
\@addfontinfo \@xxpt   {\def\pnash {\twtynash}}
\@addfontinfo \@xxvpt  {\def\pnash {\twfvnash}}

\else

% NEW FONT SELECTION -- Version 1
\message {using NFSS1}

% define \pnash to use the `nash' family, `m'edium series und
% `n'ormal shape.
%
\def\pnash{\family{nash}\series{m}\shape{n}\selectfont}

% setup the font definition table
% (`1' at the beginning of a fontname: size not available, print
% warning to inform the user)
%
\new@fontshape{nash}{m}{n}{%
      <5>1nash14%
      <6>1nash14%
      <7>1nash14%
      <8>1nash14%
      <9>1nash14%
      <10>nash14 at14.4pt%
      <11>nash14 at15.77441pt%
      <12>nash14 at17.28pt%
      <14>nash14 at20.736pt%
      <17>nash14 at24.8832pt%
      <20>1nash14 at29.85984pt%
      <25>1nash14 at35.831808pt}{}
\extra@def{nash}{}{}

\fi

\else

% NEW FONT SELECTION -- Version 2
\message {using NFSS2}

% define \pnash to use the `unknown' fontencoding, `nash' fontfamily,
% `m'edium fontseries und `n'ormal fontshape.
%
\def\pnash{\fontencoding{U}\fontfamily{nash}%
           \fontseries{m}\fontshape{n}\selectfont}

% All other definitions are done in file `Unash.fd', which is
% loaded on demand.

\fi


\catcode`\@ = \fntatcode        \catcode`\< = \fntlscode                   

\endinput
%%%%%%%%%%%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%