% \iffalse meta-comment
%
% Copyright (C) 1993 by LaTeX3 project.  All rights reserved.
% For additional copyright information see further down in this file.
% 
% This file is part of the LaTeX2e system (PRELIMINARY TEST RELEASE)
% ------------------------------------------------------------------
% 
%  This system 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 are allowed to distribute this file under the condition that
% it is distributed together with all files mentioned in 00readme.l2e.
% 
% 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.1a}
\def\filedate{1993/12/12}
\def\docdate {1993/12/12}


%% \CheckSum{24}
%% \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 `euscript.dtx'.
% Copyright (C) 1990-1993 Frank Mittelbach and Rainer Sch\"opf,
% all rights reserved.
%
%\fi
%
%
% \providecommand\dst{{\csname mediumseries\endcsname\scshape docstrip}}
% \setcounter{StandardModuleDepth}{1}
%
% \changes{v2.1a}{93/12/12}{Update for LaTeX2e}
%
%
% \title{The \texttt{euscript} package\thanks
%        {This file has version number \fileversion, dated \filedate.
%         The documentation was last revised on \docdate}\\
%       for use with \LaTeXe}
% \author{Frank Mittelbach \and Rainer Sch\"opf}
%
%
% \maketitle
%
% \section{Introduction}
%
% This package  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 package  can only be used with the new font selection scheme
% release 2, but does not require the  \texttt{amstex} package.
%
% \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 package,
% 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}
%<*package>
\ProvidesPackage{euscript}[\filedate\space\fileversion\space
                          Standard LaTeX2e package]
\typeout{Package: `euscript'
  \fileversion\space <\filedate> (FMi and RmS)}
\typeout{English Documentation \@spaces <\docdate> (FMi)}
%    \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}
%</package>
%    \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>
\documentclass{ltxdoc}
\usepackage{euscript}

\EnableCrossrefs         
\RecordChanges     % Gather update information

 %\OnlyDescription  % comment out for implementation details

\begin{document}
   \DocInput{euscript.dtx}
\end{document}
%</driver>
%    \end{macrocode}
%
% \Finale
%
\endinput
