
% Spezial-Style GERALD.STY
%
\message{Makro Sammlung GERALD - Version vom 27. August, 1997.}
%
% Kein Einruecken bei Begin eines neuen Absatzes, dafuer eine Leerzeile
% Bildunterschriften f�r eingebundene Graphik
%
% Alte Makros aus Siegbert.sty zum einbinden von Bildern und Tabellen etc.
%
\newcommand{\grad}{\ifmmode\def\XX{}\else\def\XX{\null$\null}\fi\XX^\circ\XX}
\newcommand{\mue}{\ifmmode\def\XX{}\else\def\XX{\null$\null}\fi\XX{\rm \mu}\XX}

\newbox{\tabellenbox}
\newlength{\restplatz}

\long\def\@caption#1[#2]#3{\addcontentsline {\csname ext@#1\endcsname }{#1}%
{\protect \numberline {\csname the#1\endcsname }{\ignorespaces #2}}\par%
\begingroup\@parboxrestore%
\@makecaption {\csname fnum@#1\endcsname }{\ignorespaces #3}\par\endgroup}%

%\long\def\@makecaption#1#2{
%\renewcommand{\baselinestretch}{1.0}
%\vskip 10pt
%\setbox5\hbox{#1: }%
%\everypar{\hangindent=\wd5\hangafter=1}%
%\setbox\@tempboxa\hbox{#1: #2}%
%\ifdim \wd\@tempboxa >\hsize\unhbox\@tempboxa\par
%\else\hboxto\hsize{\hfil\box\@tempboxa\hfil}\fi}

\newcommand{\bildplatz}[2]{\bgroup%
\dimen1=#1\multiply\dimen1by9\divide\dimen1by10%
\dimen2=#2\multiply\dimen2by9\divide\dimen2by10%
\parbox[b]{#1}{\hfil
 \vbox to#2{\vfil\hrule
  \hbox to\dimen1{\vrule\hfil\vbox to\dimen2{\vfil}\vrule}
  \hrule\vfil
 }\hfil}%
\egroup%
\setlength{\restplatz}{\linewidth}%
\addtolength{\restplatz}{-#1}\addtolength{\restplatz}{-1em}}

\newcommand{\doinsert}[1]{\relax}
\newcommand{\mitzeichnung}
  {\renewcommand{\doinsert}[1]{\special{em:graph ##1}}}
\newcommand{\ohnezeichnung}
  {\renewcommand{\doinsert}[1]{\relax}}
\newcommand{\zeichnung}[3]{%
\hskip 0cm\hbox to#1{\vbox to#2{\doinsert{#3}\vfil}\hfill}%
\setlength{\restplatz}{\linewidth}%
\addtolength{\restplatz}{-#1}%
\addtolength{\restplatz}{-1em}}

\newcommand{\tabelle}[1]{\sbox{\tabellenbox}{#1}%
\global\setbox\tabellenbox\box\tabellenbox%
\setlength{\restplatz}{\linewidth}%
\addtolength{\restplatz}{-\wd\tabellenbox}\addtolength{\restplatz}{-1em}%
\parbox[b]{\wd\tabellenbox}{\usebox{\tabellenbox}}}

\def\Lit#1-#2-#3-#4-#5-#6 {\bibitem{#1} #2, {\it#3\/} {\bf #4}, #5 (#6)}
\def\beschriftung{\refstepcounter\@captype \@dblarg{\@beschriftung\@captype}}

\long\def\@beschriftung#1[#2]#3{\addcontentsline{\csname ext@#1\endcsname}{#1}%
{\protect\numberline{\csname the#1\endcsname}{\ignorespaces #2}}\par%
\begingroup\@parboxrestore%
\@machbeschriftung{\csname fnum@#1\endcsname}{\ignorespaces #3}\par\endgroup}%

\long\def\@machbeschriftung#1#2{%
\renewcommand{\baselinestretch}{1.0}%
\vskip 10pt%
\setbox5\hbox{#1:\ }%
\everypar{\hangindent=\wd5\hangafter=1}%
\setbox\@tempboxa\hbox{\copy5 #2}%
\ifdim\wd\@tempboxa >\hsize\unhbox\@tempboxa\par\else%
\hbox to\hsize{\hfil\box\@tempboxa\hfil}%
\fi}%

%-------------------------------------------------------------------------------
%
\def\tableofcontents{\section*{\contentsname
\markboth{\contentsname}{\contentsname}}
\@starttoc{toc}}

\def\listoffigures{\section*{\listfigurename\markboth
{\listfigurename}{\listfigurename}}\@starttoc{lof}}
\def\listoftables{\section*{\listtablename\markboth
{\listtablename}{\listtablename}}\@starttoc{lot}}
%--------------------------------------------------------------------------------
%
% Kein \parindent bei Begin eines neuen Absatzes
%
\parindent 0pt
\parskip 5pt plus 1pt minus 2pt
%

