% \iffalse meta-comment
%
% Copyright (C) 1989--1993 by Frank Mittelbach, Rainer Schoepf.
% All rights reserved.
% 
% This file is part of the NFSS2 (New Font Selection Scheme) package.
% 
%  This package 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.
% 
% 
% IMPORTANT NOTICE:
% 
% For error reports in case of UNCHANGED versions see readme files.
% 
% Please do not request updates from us directly.  Distribution is
% done through Mail-Servers and TeX organizations.
% 
% You are not allowed to change this file.  You may however copy
% this file to a file with a different name and then change the copy
% if you obey the restrictions on file changes described in
% readme.mz.
% 
% You are allowed to distribute this file under the condition that
% it is distributed together with all files mentioned in readme.mz8.
% If you receive only some of these files from someone, complain!
% 
% You are NOT ALLOWED to distribute this file alone.  You are NOT
% ALLOWED to take money for the distribution or use of either this
% file or a changed version, except for a nominal charge for copying
% etc.
% \fi
\def\fileversion{v2.0d}
\def\filedate{93/05/15}
\def\docdate {93/05/15}

% \CheckSum{78}
%
% \iffalse
% Copyright (C) 1993 Frank Mittelbach,
% all rights reserved.
% \fi
% 
% \changes{v2.0d}{93/05/15}{Changed file names}
% \changes{v2.0c}{93/04/23}{Changed external font names}
%
% \title{The {\tt pandora} fonts for use with NFSS2}
% \author{Frank Mittelbach}
% \date{\filedate}
%
% \MakeShortVerb\|
%
% \def\dst{\expandafter{\csname mediumseries\endcsname\sc docstrip}}
% \setcounter{StandardModuleDepth}{1}
%
%
% \maketitle
%
% \section{Introduction}
%
% This file defines the font shape groups for the pandora fonts
% designed by Nazeen N. Billawala \cite{StanCS:NBi89,Stanford:NBi89}
% as well as a style file for loading Pandora Roman with the |\rm|
% command and Pandora Sans with the |\sf| command.
%
% To make Pandora the main document font specify the {\tt nfpandor}
% minor option in the |\documentstyle| command.
%
% \StopEventually{
% \begin{thebibliography}{1}
%
% \bibitem{StanCS:NBi89}
%   Nazeen~N. Billawala.
% \newblock Metamarks: Preliminary studies for a pandora's box of
%    shapes.
% \newblock Technical Report STAN-CS-89-1256, Stanford University,
%    Department of Computer Science, Stanford, California 94305, 1989.
%
% \bibitem{Stanford:NBi89}
% Neenie Billawala.
% \newblock {{Opening Pandora's Box}}.
% \newblock In Christina Thiele, editor, {\em 1989 Conference
%     Proceedings}, volume 10\#4 of {TUG}boat, pages 481--489. {\TeX}
%     Users Group, December 1989.
% 
% \end{thebibliography}
%
%^^A   \bibliographystyle{plain}
%^^A   \bibliography{string,techrep,proceed}
% }
%
%
% \section{The \dst{} modules}
%
% The following modules are used in the implementation to direct
% \dst{} in generating the external files:
% \begin{center}
% \begin{tabular}{ll}
%   driver & produce a documentation driver file \\
%   style  & produce a style file \\
%   fd     & produce a font definition file \\[2pt]
% \end{tabular}
% \end{center}
%
%
% \section{The Implementation}
%
% We start by writing to the VDU and the transcript file.
%    \begin{macrocode}
%<*style>
\typeout{Style Option: `nfpandor'
  \fileversion\space\space <\filedate> (FMi)}
\typeout{English Documentation
  \@spaces\@spaces\space <\docdate> (FMi)}
%    \end{macrocode}
%  For the style file we have to make sure that it runs under NFSS
% release 2, so we check for appropriate command names.
%    \begin{macrocode}
\@ifundefined{DeclareFontShape}
     {\@ifundefined{selectfont}
        {\@latexerr{The `nfpandor' style option can only be used
                    with the new^^Jfont selection scheme}\@eha}
        {\@latexerr{The `nfpandor' style option can only be used
                    with the new^^Jfont selection scheme *release 2*}
                   {Your format contains NFSS release 1, but this style
                    option was^^Jdeveloped for release 2.}
        }
      \endinput}
     {}
%    \end{macrocode}
%    We change the ensure that |OT1| is the default encoding and also
%    change the substitution defaults for the this encoding. If
%    |\familydefault| is not changed directly, then the change to
%    |\rmdefault| will automatically change the main font too.
% \changes{v2.0b}{93/03/09}{Added missing backslash}
%    \begin{macrocode}
\renewcommand{\encodingdefault}{OT1}
\DeclareFontSubstitution{OT1}{panr}{m}{n}
%    \end{macrocode}
%    Default for |\rm| will be Pandora Roman and for |\sf| Pandora
%    Sans.
%    \begin{macrocode}
\renewcommand{\rmdefault}{panr}
\renewcommand{\sfdefault}{pss}
\renewcommand{\bfdefault}{b}
\renewcommand{\itdefault}{sl}
%</style>
%    \end{macrocode}
%
%    We assume that for \LaTeX{} use at least the standard
%    magifications are available. If you don't like that setup copy
%    the corresponding code into your own font shape definition file
%    and make adjustments.
%
%
%    We introduce the |.fd| files
%    in the {\sf log} file. The explicit spaces are necessary in an
%    |.fd| file and the |\string| guards against situations where |`|
%    is active.
%    \begin{macrocode}
%<*fd>
\wlog{Fontdef\space file\space produced\space from:\space
 \string`nfpandor.dtx'\space \fileversion\space <\filedate>\space 
 (FMi\space and\space RmS)}
%</fd>
%    \end{macrocode}
%    The Pandora Roman family exists with in medium and bold series
%    and contains in the medium series a slanted shape beside the
%    normal one. We define a substitution shape for italic to point to
%    the slanted one so that a request for |\it| will be partly
%    honored.
%    \begin{macrocode}
%<*panr>
\DeclareFontFamily{OT1}{panr}{}
\DeclareFontShape{OT1}{panr}{m}{n}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnr10
    }{}
\DeclareFontShape{OT1}{panr}{b}{n}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnb10
    }{}
\DeclareFontShape{OT1}{panr}{m}{sl}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnsl10
    }{}
\DeclareFontShape{OT1}{panr}{m}{it}{ sub * panr/m/sl }{}
%</panr>
%    \end{macrocode}
%
%    The Pandora Sans family has the same members.
%    \begin{macrocode}
%<*pss>
\DeclareFontFamily{OT1}{pss}{}
\DeclareFontShape{OT1}{pss}{m}{n}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnss10
    }{}
\DeclareFontShape{OT1}{pss}{b}{n}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnssb10
    }{}
\DeclareFontShape{OT1}{pss}{m}{sl}{
   <5> <6> <7> <8> <9> <10> <10.95> <12>
   <14.4> <17.28> <20.74> <24.88> pnssi10
    }{}
\DeclareFontShape{OT1}{pss}{m}{it}{ sub * pss/m/sl }{}
%</pss>
%    \end{macrocode}
%
% \section{A driver for this document}
%
% The next bit of code contains the documentation driver file for
% \TeX{}, i.e., the file that will produce the documentation you are
% currently reading. It will be extracted from this file by the 
% \dst{} program.
%    \begin{macrocode}
%<*driver>
\documentstyle[doc]{article}

% dimensions from ltugboat.sty:

\setlength\textwidth{31pc} 
\setlength\textheight{54pc}
\setlength{\parindent}{0pt}
\setlength{\parskip}{2pt plus 1pt minus 1pt}
\setlength{\oddsidemargin}{8pc} 
\setlength{\marginparwidth}{8pc}
\setlength{\topmargin}{-2.5pc} 
\setlength{\headsep}{20pt}
\setlength{\columnsep}{1.5pc} 
\setlength{\columnwidth}{18.75pc}

\DisableCrossrefs

\CodelineIndex     % Index code by line number

%\OnlyDescription  % comment out for implementation details

\begin{document}
   \DocInput{nfpandor.dtx}
\end{document}
%</driver>
%    \end{macrocode}
%
%
%    The next line goes into all files and in addition prevents \dst{}
%    from adding any further code from the main source file (such as a
%    character table.
%    \begin{macrocode}
\endinput
%    \end{macrocode}
%
% \DeleteShortVerb{\|}
% \Finale
%
%
%% \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         \~}