\ProvidesPackage{dictsym}[2004/07/26 v2.0beta1 Dictionary Symbols (GV/WaS)]
%% Copyright 2004 Walter Schmidt
%
% This work may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
% of this license or (at your option) any later version.
% The latest version of this license is in
%   http://www.latex-project.org/lppl.txt
% and version 1.3 or later is part of all distributions of LaTeX
% version 2003/12/01 or later.
%
% This work has the LPPL maintenance status "maintained".
%
% This Current Maintainer of this work is Walter Schmidt <w.a.schmidt@gmx.net>
%
% This work consists of the files dictsym.sty and dictsym.tex
% and the compiled file dictsym.pdf.
%
\RequirePackage{pifont,keyval}
\define@key{dsy}{scaled}{%
  \def\dsy@scale{#1}}
\def\ProcessOptionsWithKV#1{%
  \let\@tempc\relax
  \let\dsy@tempa\@empty
  \@for\CurrentOption:=\@classoptionslist\do{%
    \@ifundefined{KV@#1@\CurrentOption}%
    {}%
    {%
      \edef\dsy@tempa{\dsy@tempa,\CurrentOption,}%
      \@expandtwoargs\@removeelement\CurrentOption
        \@unusedoptionlist\@unusedoptionlist
    }%
  }%
  \edef\dsy@tempa{%
    \noexpand\setkeys{#1}{%
      \dsy@tempa\@ptionlist{\@currname.\@currext}%
    }%
  }%
  \dsy@tempa
  \let\CurrentOption\@empty
}
\ProcessOptionsWithKV{dsy}
\AtEndOfPackage{%
  \let\@unprocessedoptions\relax
}
\expandafter\ifx\csname dsy@scale\endcsname\relax
 \let\dsy@@scale\@empty
\else
 \edef\dsy@@scale{s*[\csname dsy@scale\endcsname]}%
\fi
\DeclareFontFamily{U}{dictsym}{}
\DeclareFontShape{U}{dictsym}{m}{n}{<->\dsy@@scale dictsym}{}
%
\newcommand{\dsarchitectural}{{\Pifont{dictsym}A}}
\newcommand{\dsbiological}{{\Pifont{dictsym}B}}
\newcommand{\dschemical}{{\Pifont{dictsym}C}}
\newcommand{\dsagricultural}{{\Pifont{dictsym}G}}
\newcommand{\dsheraldical}{{\Pifont{dictsym}H}}
\newcommand{\dsjuridical}{{\Pifont{dictsym}J}}
\newcommand{\dsliterary}{{\Pifont{dictsym}L}}
\newcommand{\dsmathematical}{{\Pifont{dictsym}M}}
\newcommand{\dsrailways}{{\Pifont{dictsym}R}}
\newcommand{\dstechnical}{{\Pifont{dictsym}T}}
\newcommand{\dsmilitary}{{\Pifont{dictsym}X}}
\newcommand{\dsaeronautical}{{\Pifont{dictsym}a}}
\newcommand{\dscommercial}{{\Pifont{dictsym}c}}
\newcommand{\dsmedical}{{\Pifont{dictsym}m}}
\endinput