% \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.0b}
\def\filedate{93/05/13}
\def\docdate {93/05/13}


%% \CheckSum{50}
%% \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         \~}
%%
%
%\iffalse   % This is a META comment
%
% File `nfeuscr.dtx'.
% Copyright (C) 1990-1993 Frank Mittelbach and Rainer Sch\"opf,
% all rights reserved.
%
%\fi
%
% \MakeShortVerb{\|}
%
% \def\dst{{\csname mediumseries\endcsname\sc docstrip}}
% \setcounter{StandardModuleDepth}{1}
%
%
% \title{The {\tt nfeuscr} style option\thanks
%        {This file has version number \fileversion, dated \filedate.
%         The documentation was last revised on \docdate}\\
%       for use with NFSS2}
% \author{Frank Mittelbach \and Rainer Sch\"opf}
%
%
% \maketitle
%
% \section{Introduction}
%
% This style option sets up some font shape definition to use the
% Euler script symbols in math mode.  These fonts are part of the AMS
% font package which can be found on many \TeX{} servers. It is also
% directly available from the AMS and from \TeX{} user groups.
%
% The style option can only be used with the new font selection scheme
% release 2, but does not require the option {\tt amstex}.
%
% \DescribeMacro\EuScript
% To access the Euler Script alphabet a \meta{math alphabet identifier}
% called |\EuScript| is provided. For example, the input
% \begin{verbatim}
% \[
%    \EuScript{A} \neq \mathcal{A}
% \]
%\end{verbatim}
% will produce
% \[
%    \EuScript{A} \neq \mathcal{A}
% \]
%
% Here is a complete table of the  beautiful letters drawn by Hermann
% Zapf:
% \begin{displaymath}
%   \newcommand{\E}[1]{\EuScript{#1} &}
%   \begin{array}{*{10}c}
%     \E{A} \E{B} \E{C} \E{D} \E{E} \E{F} \E{G} \E{H} \E{I} \\
%     \E{J} \E{K} \E{L} \E{M} \E{N} \E{O} \E{P} \E{Q} \E{R} \\
%     \E{S} \E{T} \E{U} \E{V} \E{W} \E{X} \E{Y} \E{Z}
%   \end{array}
% \end{displaymath}
%
% \StopEventually{}
%
% \section{The Implementation}
%
% We have three things to do: 1) identifying the current style option,
% 2) enlarging the font shape tables and 3) defining the \meta{math
% alphabet identifier}.
% We start by writing to the VDU and the transcript file.
%    \begin{macrocode}
%<*style>
\typeout{Style Option: `nfeuscr'
  \fileversion\space <\filedate> (FMi and RmS)}
\typeout{English Documentation
  \@spaces\@spaces\space <\docdate> (FMi)}
%    \end{macrocode}
% But we should also check if the new font selection is actually in
% force otherwise the user will get a lot of uninstructive error
% messages later on. 
%    \begin{macrocode}
\@ifundefined{DeclareFontShape}
     {\@ifundefined{selectfont}
        {\@latexerr{The `nfeuscr' style option can only be used
                    with the new^^Jfont selection scheme}\@eha}
        {\@latexerr{The `nfeuscr' 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}
%
%    The font shapes for the Euler Script medium and bold are defined
%    in the amsfonts.fdd file which comes with the AMS font package.
%    We repeat their default definition here for reference only.
%    \begin{verbatim}
% \DeclareFontFamily{U}{eus}{\skewchar\font'60}
% \DeclareFontShape{U}{eus}{m}{n}{
%     <5> <6> <7> <8> <9> gen * eusm
%    <10> <10.95> <12> <14.4> <17.28> <20.74> <24.88>eusm10}{}
% \DeclareFontShape{U}{eus}{b}{n}{
%     <5> <6> <7> <8> <9> gen * eusb
%    <10> <10.95> <12> <14.4> <17.28> <20.74> <24.88>eusb10}{}
%\end{verbatim}
%
% \begin{macro}{\EuScript}
%    Now we define the \meta{math alphabet identifier} |\EuScript|
%    both for the normal and the bold math version
%    \begin{macrocode}
\DeclareMathAlphabet\EuScript{U}{eus}{m}{n}
\SetMathAlphabet\EuScript{bold}{U}{eus}{b}{n}
%</style>
%    \end{macrocode}
% \end{macro}
%
%
%
% \section{The documentation driver file}
%
% 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[nfeuscr,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}

\EnableCrossrefs         
%\DisableCrossrefs % Say \DisableCrossrefs if index is ready

\RecordChanges     % Gather update information

\CodelineIndex     % Index code by line number

%\OnlyDescription  % comment out for implementation details
%\OldMakeindex     % use if your MakeIndex is pre-v2.9
\begin{document}
   \DocInput{nfeuscr.dtx}
\end{document}
%</driver>
%    \end{macrocode}
%
% \DeleteShortVerb{\|}
% \Finale
%
\endinput
