%% 
%% This is file `graph.sty', generated 
%% on <1993/9/19> with the docstrip utility (2.0r).
%% 
%% The original source files were:
%% 
%% graph.doc  (with options: `style')
%% 
%% Copyright (C) 1993 by Christoph Ostendorf. 
%% Alle Rechte vorbehalten 
%% 
%% Diese Datei ist Teil des GRAPH-Programmpaketes. 
%% 
%% 
%% WICHTIGER HINWEIS: 
%% Diese Datei darf NICHT weitergegeben werden ! 
%% Zur Weitergabe der urspr"unglichen Quelldatei siehe 
%% die Copyright-Hinweise in der Datei graph.doc 
%% 
\def\fileversion{1.1a}
\def\filedate{93/09/19}
\def\docdate{93/09/19}
%% \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         \~}
%%
\@ifundefined{COdot}{}{\endinput}
\typeout{style-Option: `graph' \fileversion\space\space <\filedate>
   by Christoph Ostendorf}
\newcount\@sc
\newcount\@scm
\newcount\@t
\newcount\@lx
\newcount\@ly
\newdimen\@x
\newdimen\@dx
\newdimen\@y
\newdimen\@dy
\newbox\@pt
\newif\iffin@l \fin@ltrue
\newcount\COmagnification  \COmagnification=1000
\def\@signum#1#2{%
  \ifnum#2>0\relax #1=1\relax%
  \else \ifnum#2<0\relax #1=-1\relax \else #1=0\relax\fi \fi }
\def\@BoxToPoint(#1,#2)(#3,#4)#5#6{%
  #5=#1\relax \advance#5 by #3\relax%
  #6=#2\relax \advance#6 by #4\relax }
\def\@LineToPoint(#1,#2)#3#4#5{%
  \ifnum#1=0 #4=\z@%
             \@signum{#5}{#2} \multiply#5 by #3\relax%
  \else \@signum{#4}{#1} \multiply#4 by #3%
        #5=#2\relax \multiply#5 by #3\relax \divide#5 by #1\relax \fi }
\def\COcalcunitlength{%
   \multiply\unitlength by \COmagnification \divide\unitlength by 1000}
\def\COtextheight#1{%
   \@t=#1 \multiply\@t by \COmagnification%
   \@ifundefined{slide}{%
      \@ifundefined{@ptsize}{\@sc=0}{\@sc=\@ptsize}%
      \ifcase\@sc\relax%
           \ifnum\@t<5500 \tiny
           \else \ifnum\@t<7500  \scriptsize
           \else \ifnum\@t<8500  \footnotesize
           \else \ifnum\@t<9500  \small
           \else \ifnum\@t<10500 \normalsize
           \else \ifnum\@t<12500 \large
           \else \ifnum\@t<14500 \Large
           \else \ifnum\@t<17500 \LARGE
           \else \ifnum\@t<20500 \huge
           \else \Huge \fi\fi\fi\fi\fi\fi\fi\fi\fi%
      \or  \ifnum\@t<6500 \tiny
           \else \ifnum\@t<8500  \scriptsize
           \else \ifnum\@t<9500  \footnotesize
           \else \ifnum\@t<10500 \small
           \else \ifnum\@t<11500 \normalsize
           \else \ifnum\@t<12500 \large
           \else \ifnum\@t<14500 \Large
           \else \ifnum\@t<17500 \LARGE
           \else \ifnum\@t<20500 \huge
           \else \Huge \fi\fi\fi\fi\fi\fi\fi\fi\fi%
      \or  \ifnum\@t<6500 \tiny
           \else \ifnum\@t<8500  \scriptsize
           \else \ifnum\@t<10500 \footnotesize
           \else \ifnum\@t<11500 \small
           \else \ifnum\@t<12500 \normalsize
           \else \ifnum\@t<14500 \large
           \else \ifnum\@t<17500 \Large
           \else \ifnum\@t<20500 \LARGE
           \else \ifnum\@t<25500 \huge
           \else \Huge \fi\fi\fi\fi\fi\fi\fi\fi\fi%
      \fi }{
     \ifnum\@t<14500 \tiny
     \else \ifnum\@t<17500 \small
     \else \ifnum\@t<20500 \normalsize
     \else \ifnum\@t<24500 \large
     \else \ifnum\@t<29500 \Large
     \else \ifnum\@t<34500 \LARGE
     \else \ifnum\@t<41500 \huge
     \else \Huge \fi\fi\fi\fi\fi\fi\fi }}
\def\COdot(#1,#2){\put(#1,#2){\rule[-0.2pt]{0.4pt}{0.4pt}}}
\def\LaTeXdot(#1,#2){\COdot(#1,#2)
   \typeout{*** use \string\COdot instead of \string\LaTeXdot ! ***}}
\def\LaTeXgraphics{%
  \def\COinitgraphics{}
  \def\COlinethickness##1{\@x=##1%
    \multiply\@x by \COmagnification \divide\@x by 1000%
    \linethickness{\the\@x}%
    \ifdim\@x>0.4pt\relax\thicklines\else\thinlines\fi }
   \def\COlinestyle##1{
         \ifcase ##1\or \let\COrect=\solidb@x%
                   \or  \let\COrect=\longdashb@x%
                   \or  \let\COrect=\dotb@x%
                   \or  \let\COrect=\solidb@x%
                   \or  \let\COrect=\dashb@x%
                   \or  \let\COrect=\solidb@x%
                   \else \let\COrect\solidb@x \fi }
  \def\COellipt(##1,##2)##3##4{%
    \ifnum##3>##4\relax \@t=##4\relax \else \@t=##3\relax \fi%
    \multiply\@t by \tw@ \put(##1,##2){\circle{\@t}} }
  \def\COfellipt(##1,##2)##3##4{%
    \ifnum##3>##4\relax \@t=##4\relax \else \@t=##3\relax \fi%
    \multiply\@t by \tw@ \put(##1,##2){\circle*{\@t}} }
  \def\solidb@x(##1,##2)(##3,##4){%
    \@BoxToPoint(##1,##2)(##3,##4){\@sc}{\@scm}%
    \COline(##1,##2)(1,0){##3}\COline(##1,##2)(0,1){##4}%
    \COline(##1,\@scm)(1,0){##3}\COline(\@sc,##2)(0,1){##4} }
  \def\dotb@x(##1,##2)(##3,##4){%
    \put(##1,##2){\dashbox{3}(##3,##4){}} }
  \def\dashb@x(##1,##2)(##3,##4){%
    \put(##1,##2){\dashbox{15}(##3,##4){}} }
  \def\longdashb@x(##1,##2)(##3,##4){%
    \put(##1,##2){\dashbox{40}(##3,##4){}} }
  \def\COfrect(##1,##2)(##3,##4){%
    \put(##1,##2){\rule{##3\unitlength}{##4\unitlength}} }
  \def\COline(##1,##2)(##3,##4)##5{%
    \put(##1,##2){\line(##3,##4){##5}} }
  \def\COvector(##1,##2)(##3,##4)##5{%
    \put(##1,##2){\vector(##3,##4){##5}} }
   \def\n@line##1(##2,##3)(##4,##5){}
  \def\fr@@line##1(##2,##3)(##4,##5){%
    \@sc=##1\relax  \@scm=\@sc \advance\@scm by -\@ne%
    \@dx=##4\unitlength \divide\@dx by \@scm%
    \@dy=##5\unitlength \divide\@dy by \@scm%
    \setbox\@pt\hbox{\vrule height\@halfwidth  depth\@halfwidth%
      width\@wholewidth}%
    \@t=\z@%
    \put(##2,##3){\@whilenum{\@t<\@sc}\do%
       {\@x=\@t\@dx \@y=\@t\@dy%
        \raise \@y \hbox to \z@{\hskip \@x\unhcopy\@pt\hss}%
          \advance\@t by \@ne}} }%
   \def\COdraftmode{\let\COfreeline=\n@line  \fin@lfalse}
   \def\COfinalmode{\let\COfreeline=\fr@@line \fin@ltrue}
   \let\COrect=\solidb@x
   \iffin@l\COfinalmode\else\COdraftmode\fi }
\def\CSgraphics{%
  \def\COinitgraphics{%
    \special{CS!r}\special{CS!u \the\unitlength} }
  \def\COlinethickness##1{%
    \@x=##1 \multiply\@x by \COmagnification \divide\@x by 1000%
    \special{CS!w \the\@x}%
    \ifdim\@x>0.4pt\relax\thicklines\else\thinlines\fi }
  \def\COlinestyle##1{%
    \@t=##1\relax \advance\@t by -\@ne \special{CS!t \the\@t} }
  \def\COellipt(##1,##2)##3##4{%
    \put(##1,##2){\special{CS!a ##3 ##4 0 0 360}}}
  \def\COfellipt(##1,##2)##3##4{
    \put(##1,##2){\special{CS!e ##3 ##4}}}
  \def\COrect(##1,##2)(##3,##4){%
    \@BoxToPoint(##1,##2)(##3,##4){\@sc}{\@scm}%
    \COline(##1,##2)(1,0){##3}\COline(##1,##2)(0,1){##4}%
    \COline(##1,\@scm)(1,0){##3}\COline(\@sc,##2)(0,1){##4} }
  \def\COfrect(##1,##2)(##3,##4){%
    \put(##1,##2){\rule{##3\unitlength}{##4\unitlength}} }
  \def\COline(##1,##2)(##3,##4)##5{%
    \ifnum##5>0  \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}
      \put(##1,##2){\special{CS!l \the\@lx\space\the\@ly}}
    \else
      \typeout{*** Call of \string\COline\space with zero length ! ***}
    \fi }
  \def\COvector(##1,##2)(##3,##4)##5{%
    \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}
    \ifnum##5>0 \put(##1,##2){\special{CS!l \the\@lx\space\the\@ly}}\fi%
    \advance\@lx by ##1\relax  \advance\@ly by ##2\relax%
    \put(\@lx,\@ly){\vector(##3,##4){0}} }
  \def\COfreeline##1(##2,##3)(##4,##5){
    \put(##2,##3){\special{CS!l ##4 ##5}} }
  \def\COdraftmode{\fin@lfalse}
  \def\COfinalmode{\fin@ltrue}
  \iffin@l\COfinalmode\else\COdraftmode\fi   }
\def\EPICgraphics{%
  \def\COinitgraphics{}
  \def\COlinethickness##1{\@x=##1%
    \multiply\@x by \COmagnification \divide\@x by 1000%
    \linethickness{\the\@x}%
    \ifdim\@x>0.4pt\relax\thicklines\else\thinlines\fi}
  \def\COlinestyle##1{%
    \ifcase ##1\relax \or \let\COline=\solid@line%
                          \let\COfreeline=\solid@freeline%
                      \or \let\COline=\longdash@line%
                          \let\COfreeline=\longdash@freeline%
                      \or \let\COline=\dot@line%
                          \let\COfreeline=\dot@freeline%
                      \or \let\COline=\solid@line%
                          \let\COfreeline=\solid@freeline%
                      \or \let\COline=\dash@line%
                          \let\COfreeline=\dash@freeline%
                      \or \let\COline=\solid@line%
                          \let\COfreeline=\solid@freeline%
                    \else \let\COline\solid@line%
                          \let\COfreeline=\solid@freeline \fi }%
  \def\COellipt(##1,##2)##3##4{%
    \ifnum##3>##4\relax \@t##4\relax \else \@t##3\relax \fi%
    \multiply\@t \tw@ \put(##1,##2){\circle{\@t}} }
  \def\COfellipt(##1,##2)##3##4{%
    \ifnum##3>##4\relax \@t##4\relax \else \@t##3\relax \fi%
    \multiply\@t \tw@ \put(##1,##2){\circle*{\@t}} }
  \def\COrect(##1,##2)(##3,##4){%
    \@BoxToPoint(##1,##2)(##3,##4){\@sc}{\@scm}
    \COline(##1,##2)(1,0){##3}\COline(##1,##2)(0,1){##4}%
    \COline(##1,\@scm)(1,0){##3}\COline(\@sc,##2)(0,1){##4} }
  \def\COfrect(##1,##2)(##3,##4){%
    \put(##1,##2){\rule{##3\unitlength}{##4\unitlength}} }
  \def\solid@line(##1,##2)(##3,##4)##5{%
    \put(##1,##2){\line(##3,##4){##5}} }
  \def\dot@line(##1,##2)(##3,##4)##5{%
    \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}%
    \advance\@lx by ##1\relax  \advance\@ly by ##2\relax%
    \dottedline{15}(##1,##2)(\@lx,\@ly) }
  \def\dash@line(##1,##2)(##3,##4)##5{%
    \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}%
    \advance\@lx by ##1\relax  \advance\@ly by ##2\relax%
    \dashline[8]{15}(##1,##2)(\@lx,\@ly) }
  \def\longdash@line(##1,##2)(##3,##4)##5{%
    \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}%
    \advance\@lx by ##1\relax  \advance\@ly by ##2\relax%
    \dashline[37]{40}(##1,##2)(\@lx,\@ly) }
  \def\COvector(##1,##2)(##3,##4)##5{%
    \ifnum##5>0\relax \COline(##1,##2)(##3,##4){##5} \fi %
    \@LineToPoint(##3,##4){##5}{\@lx}{\@ly}%
    \advance\@lx by ##1\relax  \advance\@ly by ##2\relax%
    \put(\@lx,\@ly){\vector(##3,##4){0}} }
  \def\solid@freeline##1(##2,##3)(##4,##5){%
    \@lx##2\relax \advance\@lx by ##4\relax%
    \@ly##3\relax \advance\@ly by ##5\relax%
    \drawline(##2,##3)(\@lx,\@ly) }
  \def\dot@freeline##1(##2,##3)(##4,##5){%
    \@lx##2\relax \advance\@lx by ##4\relax%
    \@ly##3\relax \advance\@ly by ##5\relax%
    \dottedline{15}(##2,##3)(\@lx,\@ly) }
  \def\dash@freeline##1(##2,##3)(##4,##5){%
    \@lx##2\relax \advance\@lx by ##4\relax%
    \@ly##3\relax \advance\@ly by ##5\relax%
    \dashline[8]{15}(##2,##3)(\@lx,\@ly) }
  \def\longdash@freeline##1(##2,##3)(##4,##5){%
    \@lx##2\relax \advance\@lx by ##4\relax%
    \@ly##3\relax \advance\@ly by ##5\relax%
    \dashline[37]{40}(##2,##3)(\@lx,\@ly) }
  \def\COdraftmode{\fin@lfalse}
  \def\COfinalmode{\fin@ltrue}
  \let\COline=\solid@line%
  \let\COfreeline=\solid@freeline%
  \iffin@l\COfinalmode\else\COdraftmode\fi }
\def\EEPICgraphics{%
   \EPICgraphics%
  \def\COlinethickness##1{\@x=##1%
    \multiply\@x by \COmagnification \divide\@x by 1000%
    \ifdim\@x>0.4pt\relax%
      \ifdim\@x>0.6pt\relax \Thicklines \else \thicklines \fi%
      \else \thinlines \fi%
    \linethickness{\@x}\allinethickness{\@x} }
   \def\COellipt(##1,##2)##3##4{\put(##1,##2){\ellipse{##3}{##4}}}
   \def\COfellipt(##1,##2)##3##4{\put(##1,##2){\ellipse*{##3}{##4}}}
  \def\solid@freeline##1(##2,##3)(##4,##5){%
    \@lx##2\relax \advance\@lx by ##4\relax%
    \@ly##3\relax \advance\@ly by ##5\relax%
    \path(##2,##3)(\@lx,\@ly) }
  \def\COdraftmode{\fin@lfalse}
  \def\COfinalmode{\fin@ltrue}
  \let\COline=\solid@line%
  \let\COfreeline=\solid@freeline%
  \iffin@l\COfinalmode\else\COdraftmode\fi }
\LaTeXgraphics
\COfinalmode
\endinput
%% 
%% End of file `graph.sty'.
