%% ogfuda.sty
%%
%% 1.0a 92/11/10  Michael Hoppe
%% 1.0b 92/11/92  Bernd Raichle
%% 1.0c 01-FEB-1993 Michael Hoppe
%% 1.0d 04-FEB-1993 Michael Hoppe (AL, by proxy)

\def\fileversion{1.0c}
\def\filedate{01-FEB-1993}
\def\filename{ogfuda.sty}

\def\meldedich{%
\immediate\write16{^^J%
***************************************^^J%
* LaTeX-OGFUDA, Modul \filename,^^J%
* Version \fileversion\space vom \filedate^^J%
***************************************^^J}}

\meldedich

\chardef\bslash=`\\ % p. 424, TeXbook
% \kern\z@ here inhibits hyphenation except at \-

% control sequence
\def\cs#1{{\tt\bslash\kern\z@#1}\index{#1@{\tt\bslash#1}}}

% LaTeX documentstyle name
\def\sty#1{{\tt\kern\z@#1.sty}\index{#1@{\tt{}#1}-Stil}%
  \index{Stil!#1@{\tt #1}}}

% LaTeX option name
\def\opt#1{{\tt\kern\z@#1}\index{#1@{\tt{}#1}-Option}}

% environment name
\def\env#1{{\sf\kern\z@#1}-Umgebung\index{#1@{\sf{}#1}-Umgebung}%
\index{Umgebung!{\sf #1}}}

% \tt-Index:
\def\ttind#1{{\tt\kern\z@#1}\index{#1@{\tt{}#1}}}

% \it-Index:
\def\itind#1{{\it\kern\z@#1\/}\index{#1@{\it{}#1}}}

% to index a control sequence without printing it
\def\indexcs#1{\indexunder#1!]}
\def\indexunder#1!#2]{%
	\ifx\relax#2\empty\index{#1@{\tt\bslash#1}}
	\else\index{#1@{\tt\bslash#1}!#2}\fi}

% \tt-Index ohne Ausdruck
\def\indextt#1{\index{#1@{\tt{}#1}}}

%Sparer:
\def\ind#1{#1\index{#1}}

\hyphenation{zei-len-um-bruch trenn-al-go-rith-mus} % :-)

%\font\metafont     = logo12
\def\mf{{\small\sf META\-FONT}}


\def\AmS{{\protect\the\textfont2
  A\kern-.1667em\lower.5ex\hbox{M}\kern-.125emS}}

\def\PiC{P\kern-.12em\lower.5ex\hbox{I}\kern-.075emC}
\def\PiCTeX{\PiC\kern-.11em\TeX}

% F"ur die Bibliographie:
\newcommand\Autor[1]{{\sc #1},}
\newcommand\Titel[1]{{\em #1},}
\newcommand\Verlag[1]{#1.}
\newcommand\buch[3]{{\sc #1}, {\em #2}. #3.\par}

\def\r{{\sc Rainer:\ }}
\def\p{{\sc Pete:\ }}
\def\DEK{{\sc dek}}
%\newcommand{\cs}[1]{{\tt \char`\\#1}}
\def\qcs#1{\glq\cs{#1}\grq}
\def\sq#1{\glq #1\grq}

\newenvironment{ogfudatim}{\verbatim}{\endverbatim}
\renewcommand{\abstractname}{Dankesch"on}
\endinput

.
