%% %% 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'.