rst

git-svn-id: svn://tug.org/texlive/trunk@1287 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 1152 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/rst/rst.sty b/Master/texmf-dist/tex/latex/rst/rst.sty
new file mode 100644
index 00000000000..6ba85c31e76
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/rst/rst.sty
@@ -0,0 +1,1152 @@
+%%%
+%%% Macros to typeset Rhetorical Structures (RSTs).
+%%%
+%%% Written by David Reitter (reitter at mle.media.mit.edu)
+%%%
+%%% All rights reserved. Usage is free, put please cite or point to the manual.
+%%% Copyright 2003 David Reitter
+%%%
+%%% New versions to be found here: http://www.reitter-it-media.de/compling/
+%%%
+
+%%%
+%%% This package provides the commands \dirrel, \multinuc, \rstsegment
+%%% and the environment rhetoricaltext with the associated commands \unit, \source and \relr.
+%%%
+%%% Please refer to rst.pdf for instructions.
+%%%
+
+%%% revised 11-06: horizontal spacing issues (at least) improved so that relation names 
+%%%                        can be drawn correctly. Still does not work well in some multi-satellite
+%%%                        configurations.
+%%% revised 01-15: rhetoricaltext environment uses better label / reference mechanism now
+%%%                        so TeX won't run out of memory when working with large documents and
+%%%                        many rhetoricaltexts. You always need to compile twice to get the refs right!
+%%% revised 02-12: rhetoricaltext environment does not use \lineheight any more. Margins
+%%%                        before and after rhetoricaltexts may change.
+%%% revised 02-17: provide \rl command to format a relation name (capitalized)
+%%%                        All relation names in diagrams are capitalized now
+
+\ProvidesPackage {rst}
+    [2003/02/17 typeset rhetorical structures v. 1.3]
+
+\RequirePackage{color}
+
+\newlength{\compressionWidth}
+\setlength{\compressionWidth}{0pt}  % set to any length>0 to compress trees horizontally
+
+\newlength{\terminalWidth}
+\setlength{\terminalWidth}{100pt}  % set to any length>0 to compress trees horizontally
+
+\newlength{\rstmargin}          % left and right margin
+\setlength{\rstmargin}{3pt}  
+ 
+\newlength{\rstmiddleskip}          % margin between spans
+
+\setlength{\rstmiddleskip}{1em}
+
+%empty the following two if you wish NOT to use the color package
+\newcommand{\relnamebgcolor}{}%       background color. 
+\newcommand{\relnamecolor}{red}%     relation name color
+
+
+%uncomment the following two if you wish NOT to use the color package
+\newcommand{\mycolorbox}{}  % uncommented so that \raisebox may be used
+
+%\newcommand{\mycolor}{}
+
+
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%% no change beyond this point.
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+
+\providecommand {\rl}[1]{\textsc{\expandafter\MakeUppercase#1}}
+
+
+
+% internal stuff 
+
+
+
+
+
+
+\newcommand{\nuc}{}
+
+
+
+\providecommand{\mycolorbox}{\colorbox}
+
+\providecommand{\mycolor}{\color}
+
+\newlength{\drwdone}
+\newlength{\drwdtwo}
+\newlength{\drwdthree}
+\newlength{\drwdfour}
+\newlength{\drwdfive}
+\newlength{\drwdtemp}
+\newlength{\drwdtempx}
+\newlength{\drwdtempy}
+
+
+\newlength{\drwdbezleft}
+\newlength{\drwdbezright}
+\newlength{\drwdbezA}
+\newlength{\drwdbezB}
+\newlength{\drwdbezC}
+\newlength{\drwdbezD}
+\newlength{\drwdbezE}
+\newlength{\drwdgraph}
+\newlength{\drwdmiddle}
+\newlength{\drwdmiddleOne}
+\newlength{\drwdmiddleTwo}
+\newlength{\drwdmiddleThree}
+\newlength{\drwdmiddleFour}
+\newlength{\drhegraph}
+\newlength{\drhetext}
+\newlength{\drhetotal}
+%\newlength{\drwdrstrealwidth}% temp (local)
+%\newlength{\rstrealwidth}% global (as return var)
+%\newlength{\rstleftoffset}% global (as return var)
+%\newlength{\rstrightoffset}% global (as return var)
+%\gdef\rstrealwidth{}\gdef\rstleftoffset{}\gdef\rstleftoffset{}% all global
+\newlength{\relnamepos}
+\newlength{\@relnamewd}            
+\newsavebox{\rstboxone}
+\newsavebox{\rstboxtwo}
+\newsavebox{\rstboxthree}
+\newsavebox{\rstboxfour}
+\newsavebox{\rstboxfive}
+\newsavebox{\rstallbox}
+
+\newcommand\@optOne{}
+\newcommand\@optTwo{}
+\newcommand\@optThree{}
+\newcommand\@optFour{}
+\newcommand\@optFive{}
+\newcommand\@relOne{}
+\newcommand\@relTwo{}
+\newcommand\@relThree{}
+\newcommand\@relFour{}
+\newcommand\@relFive{}
+%\makeatletter
+\newcommand{\LenToUnit}[1]{%
+    #1\@gobble
+}
+%\makeatother
+
+\newcommand{\drhspacer}[1]{%
+\setlength{\unitlength}{#1}%    
+\begin{picture}(1,0)(0,0)% spacing
+\end{picture}%
+}
+
+%% This package ...
+
+
+\let\rstvarfont=\it%          Font for variables
+\let\rstcondfont=\rm%         Font for conditions -- no spaces in here!!
+\let\rstseparator=\hline%     Separator between variables and conditions
+
+\newcommand{\relnamefont} [1] {\mycolor\relnamecolor\small\rl{#1}}
+
+  
+\newcount\@rstlevel \@rstlevel=0
+%\def\rst@strut{{\large\strut}}
+%\def\dirrel@strut{{\large\strut}}
+
+\newlength{\myVSpace}% the height of the box
+\setlength{\myVSpace}{1ex}% the default, 
+\newcommand\xstrut{\raisebox{-1\myVSpace}% symmetric behaviour, 
+  {\rule{0pt}{\myVSpace}}%
+}
+
+
+% calc middle position
+\newcommand{\setmiddle}[3]{
+\setlength{#1}{#2}
+\addtolength{#1}{#3}
+\setlength{#1}{.5 #1}
+}
+
+
+\newlength{\@strhtemp}
+\newcommand{\settorealheight}[2]{%
+\settoheight{#1}{#2}%
+\settodepth{\@strhtemp}{#2}%
+\addtolength{#1}{\@strhtemp}%
+}%
+
+\newlength{\drwdemptycheck}
+\newcommand{\ifemptyd}[1]{\settowidth{\drwdemptycheck}{#1}\ifnum\drwdemptycheck<1}% this is stupid, but other variants did not work
+\newcommand{\ifemptydd}[3]{\settowidth{\drwdemptycheck}{#1}\ifnum\drwdemptycheck<1#2\else#3\fi}% this is stupid, but other variants did not work
+
+%for compatibility reasons (old aux files)
+\newcommand{\@definerstlabelu}[2]{}
+\newcommand{\@definerstlabelt}[2]{}
+
+% called from .aux file
+%\newcommand{\@definerstlabelu}[2]{\@ifundefined{c@uu#1}{\newcounter{uu#1}}{}%
+%\setcounter{uu#1}{#2}}
+%\newcommand{\@definerstlabelt}[2]{\@ifundefined{c@tt#1}{\newcounter{tt#1}}{}%
+%\setcounter{tt#1}{#2}}
+%\newcommand{\@definerstlabelu}[2]{\def{\c@rstuu#1}{#2}}%
+%\newcommand{\@definerstlabelt}[2]{\def{\c@rsttt#1}{#2}}%
+% local versions
+%\newcommand{\@definerstlabelintu}[2]{\newcounter{u#1}%
+%\setcounter{u#1}{#2}}
+%\newcommand{\@definerstlabelintt}[2]{\newcounter{t#1}%
+%\setcounter{t#1}{#2}}
+%\newcommand{\@definerstlabelintu}[2]{\def\u#1{#2}}
+%\newcommand{\@definerstlabelintt}[2]{\def\t#1{#2}}
+%
+\def\tmakedef#1#2{\expandafter\xdef\csname #1\endcsname{#2}}%
+\newcounter{rhetoricaltextno}
+\setcounter{rhetoricaltextno}{0}
+\newcounter{rhetoricalunitno}
+\newenvironment{rhetoricaltext}{
+\addtocounter{rhetoricaltextno}{1}\setcounter{rhetoricalunitno}{0}\setlength{\parindent}{0pt}\flushleft\sf}{\vspace{\baselineskip}}
+\newcommand{\unit}[2][]{%
+\ifemptyd{#1}[#2]\else%
+\addtocounter{rhetoricalunitno}{1}%
+%\@ifundefined{uu#1}{}{\typeout{rst-package error: you defined the #1 label for a rst unit twice.}}%
+%\@definerstlabelu{#1}{\value{rhetoricalunitno}}%
+%\@definerstlabelt{#1}{\value{rhetoricaltextno}}%
+%\if@filesw\immediate\write\@auxout{\noexpand\@definerstlabelu{#1}{\arabic{rhetoricalunitno}}}%
+%\immediate\write\@auxout{\noexpand\@definerstlabelt{#1}{\arabic{rhetoricaltextno}}}\fi%
+\if@filesw\immediate\write\@auxout{\noexpand\tmakedef{rstuu#1}{\Alph{rhetoricalunitno}}}%
+\immediate\write\@auxout{\noexpand\tmakedef{rsttt#1}{\arabic{rhetoricaltextno}}}\fi%
+%\def\c@u#1{\Alph{rhetoricalunitno}}%
+%\def\c@t#1{\arabic{rhetoricaltextno}}%
+[#2]$^{\arabic{rhetoricaltextno}\Alph{rhetoricalunitno}}$\fi}
+%\newcommand{\refr}[1]{\@ifundefined{@rstt#1}{\@ifundefined{@rsttt#1}{??}{\csname\@rsttt#1\endcsname\csname\@rstuu#1\endcsname}}{\csname\t#1\endcsname\csname\u#1\endcsname}}
+
+\def\tcallup#1{\csname #1\endcsname}
+\newcommand{\refr}[1]{\tcallup{rsttt#1}\tcallup{rstuu#1}}%
+
+%\newcommand{\refr}[1]{\@ifundefined{\expandafter\csname\@rsttt #1\endcsname}{??}{\csname\@rsttt#1\endcsname\csname\@rstuu#1\endcsname}}%
+%\newcommand{\refr}[1]{\@ifundefined{c@t#1}{\@ifundefined{c@tt#1}{??}{\arabic{tt#1}\Alph{uu#1}}}{\arabic{t#1}\Alph{u#1}}}
+\newcommand{\source}[1]{ {\hfill\small(#1)}}
+
+
+
+
+\newcommand{\addadditionalspace}%
+{\ifemptydd{\@relOne}%\else% if 1 is the nuc
+{% to 1st right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relTwo\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdone}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\addtolength{\drwdtempx}{0.8\drwdtwo}%most of right
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleOne}{\drwdtemp}%
+\fi%
+% to 2. right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relThree\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdone}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\addtolength{\drwdtempx}{\drwdtwo}%
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{0.8\drwdthree}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleTwo}{\drwdtemp}%
+\fi%
+% to 3. right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFour\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdone}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\addtolength{\drwdtempx}{\drwdtwo}%
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{\drwdthree}% 
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.8\drwdfour}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleThree}{\drwdtemp}%
+\fi%
+% to 4. right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFive\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdone}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\addtolength{\drwdtempx}{\drwdtwo}%
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{\drwdthree}% 
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{\drwdthree}%most of right
+\addtolength{\drwdtempx}{\drwdmiddleFour}%
+\addtolength{\drwdtempx}{0.8\drwdfive}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleFour}{\drwdtemp}%
+\fi%
+}{}%
+\ifnum\drwdtwo>0\ifemptydd{\@relTwo}%\else% if 2 is the nuc
+{% to 1st left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relOne\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdone}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\addtolength{\drwdtempx}{0.5\drwdtwo}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleOne}{\drwdtemp}%
+\fi%
+% to 1st right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relThree\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdtwo}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{0.8\drwdthree}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleTwo}{\drwdtemp}%
+\fi%
+% to 2nd right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFour\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdtwo}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{\drwdthree}% 
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.8\drwdfour}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleThree}{\drwdtemp}%
+\fi%
+% to 4th right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFive\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdtwo}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{\drwdthree}% 
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{\drwdthree}%most of right
+\addtolength{\drwdtempx}{\drwdmiddleFour}%
+\addtolength{\drwdtempx}{0.8\drwdfive}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleFour}{\drwdtemp}%
+\fi%
+}{}\fi%
+\ifnum\drwdthree>0\ifemptydd{\@relThree}%\else% if 3 is the nuc
+{% to 1st left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relTwo\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdtwo}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{0.5\drwdthree}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleTwo}{\drwdtemp}%
+\fi%
+% to 2nd left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relOne\ }}%
+\setlength{\drwdtemp}{\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdone}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\setlength{\drwdtempx}{\drwdtwo}%
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\addtolength{\drwdtempx}{0.5\drwdthree}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleOne}{\drwdtemp}%
+\fi%
+% to 1st right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFour\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdthree}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.8\drwdfour}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleThree}{\drwdtemp}%
+\fi%
+% to 2nd right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFive\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.5\drwdthree}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{\drwdfour}% 
+\addtolength{\drwdtempx}{\drwdmiddleFour}%
+\addtolength{\drwdtempx}{0.8\drwdfive}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleFour}{\drwdtemp}%
+\fi%
+}{}\fi%
+\ifnum\drwdfour>0\ifemptydd{\@relFour}%\else% if 4 is the nuc
+{% to 1st left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relTwo\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdthree}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.5\drwdfour}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleThree}{\drwdtemp}%
+\fi%
+% to 2nd left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relOne\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdtwo}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\setlength{\drwdtempx}{\drwdthree}%
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.5\drwdfour}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleTwo}{\drwdtemp}%
+\fi%
+% to 3rd left
+\settowidth{\drwdtemp}{\relnamefont{\ \@relOne\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\setlength{\drwdtempx}{0.8\drwdone}%most of left
+\addtolength{\drwdtempx}{\drwdmiddleOne}%
+\setlength{\drwdtempx}{\drwdtwo}%
+\addtolength{\drwdtempx}{\drwdmiddleTwo}%
+\setlength{\drwdtempx}{\drwdthree}%
+\addtolength{\drwdtempx}{\drwdmiddleThree}%
+\addtolength{\drwdtempx}{0.5\drwdfour}%half of nuc
+\ifdim\drwdtemp>\drwdtempx%
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleOne}{\drwdtemp}%
+\fi%
+% to 1st right
+\settowidth{\drwdtemp}{\relnamefont{\ \@relFive\ }}%
+\setlength{\drwdtemp}{1.0\drwdtemp}% space that we need
+\addtolength{\drwdtempx}{0.5\drwdfour}%half of nuc
+\addtolength{\drwdtempx}{\drwdmiddleFour}%
+\addtolength{\drwdtempx}{0.8\drwdfive}%most of right
+\ifdim\drwdtemp>\drwdtempx
+\addtolength{\drwdtemp}{-\drwdtempx}%
+\addtolength{\drwdmiddleFour}{\drwdtemp}%
+\fi%
+}{}\fi%
+}%
+
+
+\newcommand{\initrstwidths}{%
+\settowidth{\drwdone}{\@optOne}%
+\settowidth{\drwdtwo}{\@optTwo}%
+\settowidth{\drwdthree}{\@optThree}%
+\settowidth{\drwdfour}{\@optFour}%
+\settowidth{\drwdfive}{\@optFive}%
+%\setlength{\drwdrstrealwidth}{\drwdone}%
+%\addtolength{\drwdrstrealwidth}{\drwdtwo}%
+%\addtolength{\drwdrstrealwidth}{\drwdthree}%
+%\addtolength{\drwdrstrealwidth}{\drwdfour}%
+%\addtolength{\drwdrstrealwidth}{\drwdfive}%
+\ifdim\compressionWidth>0pt\ifdim\drwdone>\compressionWidth\setlength{\drwdone}{\compressionWidth}\fi\fi%
+\ifdim\compressionWidth>0pt\ifdim\drwdtwo>\compressionWidth\setlength{\drwdtwo}{\compressionWidth}\fi\fi%
+\ifdim\compressionWidth>0pt\ifdim\drwdthree>\compressionWidth\setlength{\drwdthree}{\compressionWidth}\fi\fi%
+\ifdim\compressionWidth>0pt\ifdim\drwdfour>\compressionWidth\setlength{\drwdfour}{\compressionWidth}\fi\fi%
+\ifdim\compressionWidth>0pt\ifdim\drwdfive>\compressionWidth\setlength{\drwdfive}{\compressionWidth}\fi\fi%
+\savebox{\rstboxone}[\drwdone]{\@optOne}% returns rstrealwidth -- we just need left and right borders
+%\addtolength{\rstrealwidth}{-\drwdtwo}%
+%\addtolength{\rstleftoffset}{\rstrealwidth}%
+\savebox{\rstboxtwo}[\drwdtwo]{\@optTwo}%
+\savebox{\rstboxthree}[\drwdthree]{\@optThree}%
+\savebox{\rstboxfour}[\drwdfour]{\@optFour}%
+\savebox{\rstboxfive}[\drwdfive]{\@optFive}% one of these returns the right border (others are empty)
+%\ifnum\drwdtwo>0\addtolength{\rstrealwidth}{-\drwdtwo}\fi%
+%\ifnum\drwdthree>0\addtolength{\rstrealwidth}{-\drwdthree}\fi%
+%\ifnum\drwdfour>0\addtolength{\rstrealwidth}{-\drwdfour}\fi%
+%\ifnum\drwdfive>0\addtolength{\rstrealwidth}{-\drwdfive}\fi%
+%\addtolength{\rstrightoffset}{\rstrealwidth}%
+}%
+
+\newcommand{\returnrstrealwidths}{%
+%\setlength{\rstrealwidth}{\drwdrstrealwidth}% this to be returned to calling macro
+%\ifnum\drwdtwo>0\addtolength{\rstrealwidth}{\drwdmiddleOne}\fi%
+%\ifnum\drwdthree>0\addtolength{\rstrealwidth}{\drwdmiddleTwo}\fi%
+%\ifnum\drwdfour>0\addtolength{\rstrealwidth}{\drwdmiddleThree}\fi%
+%\ifnum\drwdfive>0\addtolength{\rstrealwidth}{\drwdmiddleFour}\fi%
+}
+
+
+
+%\long\def\rstbox#1{%
+%\setlength{\rstleftoffset}{0pt}\setlength{\rstrightoffset}{0pt}%
+%\savebox{\rstallbox}{#1}%
+%\frame{a\drhspacer{\rstrealwidth}b\usebox{\rstallbox}\drhspacer{\rstrightoffset}}}%
+
+
+\long\def\dirrel{%
+\dirrela}
+\long\def\dirrela#1{%  
+\@ifnextchar\bgroup{\dirrelb{#1}}{\typeout{dirrel: syntax error. needs at least 3 \{ \} arguments (relname, nucleus-idx, segment+)}\relax}}
+\long\def\dirrelb#1#2{%
+\@ifnextchar\bgroup{\dirrelc{#1}{#2}}{\typeout{dirrel: syntax error. needs at least 3 \{ \} arguments (relname, nucleus-idx, segment+)}\relax}}
+\long\def\dirrelc#1#2#3{%
+\@ifnextchar\bgroup{\dirreld{#1}{#2}{#3}}{\dirrelz{#1}{#2}{#3}{}{}{}{}{}{}\relax}}
+\long\def\dirreld#1#2#3#4{%
+\@ifnextchar\bgroup{\dirrele{#1}{#2}{#3}{#4}}{\dirrelz{#1}{#2}{#3}{#4}{}{}{}{}\relax}}
+\long\def\dirrele#1#2#3#4#5{%
+\@ifnextchar\bgroup{\dirrelf{#1}{#2}{#3}{#4}{#5}}{\dirrelz{#1}{#2}{#3}{#4}{#5}{}{}{}{}\relax}}
+\long\def\dirrelf#1#2#3#4#5#6{%
+\@ifnextchar\bgroup{\dirrelg{#1}{#2}{#3}{#4}{#5}{#6}}{\dirrelz{#1}{#2}{#3}{#4}{#5}{#6}{}{}{}\relax}}
+\long\def\dirrelg#1#2#3#4#5#6#7{%
+\@ifnextchar\bgroup{\dirrelh{#1}{#2}{#3}{#4}{#5}{#6}{#7}}{\dirrelz{#1}{#2}{#3}{#4}{#5}{#6}{#7}{}{}\relax}}
+\long\def\dirrelh#1#2#3#4#5#6#7#8{%
+\@ifnextchar\bgroup{\dirreli{#1}{#2}{#3}{#4}{#5}{#6}{#7}{#8}}{\dirrelz{#1}{#2}{#3}{#4}{#5}{#6}{#7}{#8}{}\relax}}
+\long\def\dirreli#1#2#3#4#5#6#7#8#9{%
+\dirrelz{#1}{#2}{#3}{#4}{#5}{#6}{#7}{#8}{#9}\relax}
+
+
+% syntax: \dirrel{relname}{nucleus-number}{arg1}...{arg5}
+
+ 
+\newcommand{\dirrelz}[9]%
+%\long\def\dirrelz#1#2#3#4#5#6#7#8#9% 
+{%
+\bgroup%
+\advance\@rstlevel by 1%
+\renewcommand\@optOne{\ignorespaces#2}%
+\renewcommand\@optTwo{\ignorespaces#4}%
+\renewcommand\@optThree{\ignorespaces#6}%
+\renewcommand\@optFour{\ignorespaces#8}%
+\renewcommand\@optFive{}%
+\renewcommand\@relOne{\ignorespaces#1}%
+\renewcommand\@relTwo{\ignorespaces#3}%
+\renewcommand\@relThree{\ignorespaces#5}%
+\renewcommand\@relFour{\ignorespaces#7}%
+\renewcommand\@relFive{\ignorespaces#9}%
+\relax%
+{\rstcondfont%
+\def\arraystretch{0}% undefined by default: value for \arraystretch
+\fboxsep0pt%    no space
+\fboxrule0pt%    no space
+\initrstwidths%
+%%%%% calc graph width %%%%%%%%%%%%%%%%%%%%%%%%%%%
+%\setlength{\drwdmiddle}{\rstmiddleskip}% middle space
+\setlength{\drwdmiddleOne}{\rstmiddleskip}% middle space
+\setlength{\drwdmiddleTwo}{\rstmiddleskip}% middle space
+\setlength{\drwdmiddleThree}{\rstmiddleskip}% middle space
+\setlength{\drwdmiddleFour}{\rstmiddleskip}% middle space
+%%%%%%
+\addadditionalspace%
+\setlength{\drwdgraph}{2\rstmargin}
+\ifnum\drwdone>0\addtolength{\drwdgraph}{\drwdone}\fi%
+\ifnum\drwdtwo>0\addtolength{\drwdgraph}{\drwdtwo}\addtolength{\drwdgraph}{\drwdmiddleOne}\fi%
+\ifnum\drwdthree>0\addtolength{\drwdgraph}{\drwdthree}\addtolength{\drwdgraph}{\drwdmiddleTwo}\fi%
+\ifnum\drwdfour>0\addtolength{\drwdgraph}{\drwdfour}\addtolength{\drwdgraph}{\drwdmiddleThree}\fi%
+\ifnum\drwdfive>0\addtolength{\drwdgraph}{\drwdfive}\addtolength{\drwdgraph}{\drwdmiddleFour}\fi%
+%%%%% calc bezier positions %%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+\ifnum\drwdone>0%
+\setlength{\drwdbezA}{\rstmargin}%
+\addtolength{\drwdbezA}{.3333\drwdone}%  
+\fi%
+\ifnum\drwdtwo>0%
+\setlength{\drwdbezB}{\rstmargin}%
+\addtolength{\drwdbezB}{\drwdone}%  
+\addtolength{\drwdbezB}{\drwdmiddleOne}%
+\addtolength{\drwdbezB}{.5\drwdtwo}%
+%\setlength{\drwdbezB}{.5\drwdgraph}% 
+\else%
+\addtolength{\drwdbezA}{.1666\drwdone}% a single branch should go straight down
+\fi%
+\ifnum\drwdthree>0%
+\setlength{\drwdbezC}{\rstmargin}%
+\addtolength{\drwdbezC}{\drwdone}%
+\addtolength{\drwdbezC}{\drwdmiddleOne}%
+\addtolength{\drwdbezC}{\drwdtwo}%
+\addtolength{\drwdbezC}{\drwdmiddleTwo}%
+\addtolength{\drwdbezC}{.5\drwdthree}%
+\else%
+\addtolength{\drwdbezB}{.1666\drwdtwo}% the rightmost branch goes further to the right
+\fi%
+\ifnum\drwdfour>0%
+\setlength{\drwdbezD}{\rstmargin}%
+\addtolength{\drwdbezD}{\drwdone}%  
+\addtolength{\drwdbezD}{\drwdmiddleOne}%
+\addtolength{\drwdbezD}{\drwdtwo}%
+\addtolength{\drwdbezD}{\drwdmiddleTwo}%
+\addtolength{\drwdbezD}{\drwdthree}%
+\addtolength{\drwdbezD}{\drwdmiddleThree}%
+\addtolength{\drwdbezD}{.5\drwdfour}%
+\else%
+\addtolength{\drwdbezC}{.1666\drwdthree}% the rightmost branch goes further to the right
+\fi%
+\ifnum\drwdfive>0%
+\setlength{\drwdbezE}{\rstmargin}%
+\addtolength{\drwdbezE}{\drwdone}%  
+\addtolength{\drwdbezE}{\drwdmiddleOne}%
+\addtolength{\drwdbezE}{\drwdtwo}%
+\addtolength{\drwdbezE}{\drwdmiddleTwo}%
+\addtolength{\drwdbezE}{\drwdthree}%
+\addtolength{\drwdbezE}{\drwdmiddleThree}%
+\addtolength{\drwdbezE}{\drwdfour}%
+\addtolength{\drwdbezE}{\drwdmiddleFour}%
+\addtolength{\drwdbezE}{.6666\drwdfive}%
+\else%
+\addtolength{\drwdbezD}{.1666\drwdfour}% the rightmost branch goes further to the right
+\fi%
+%
+%set nucleus position
+%
+\setlength{\drwdbezleft}{0pt}%
+\ifnum\drwdone>0\ifemptyd{\@relOne}\setlength{\drwdbezleft}{\drwdbezA}\fi\fi%
+\ifnum\drwdtwo>0\ifemptyd{\@relTwo}\setlength{\drwdbezleft}{\drwdbezB}\fi\fi%
+\ifnum\drwdthree>0\ifemptyd{\@relThree}\setlength{\drwdbezleft}{\drwdbezC}\fi\fi%
+\ifnum\drwdfour>0\ifemptyd{\@relFour}\setlength{\drwdbezleft}{\drwdbezD}\fi\fi%
+\ifnum\drwdfive>0\ifemptyd{\@relFive}\setlength{\drwdbezleft}{\drwdbezE}\fi\fi%
+\ifnum\drwdbezleft=0\typeout{dirrel: where's my nucleus?? One of the relation parameters should be empty}\fi%
+%
+%%%%% calc graph height %%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\drhegraph}{.3\drwdgraph}%
+\settorealheight{\drwdtemp}{\relnamefont{\mycolorbox{\relnamebgcolor}{\@relOne}}}%
+\setlength{\drwdtemp}{2.5\drwdtemp}%  1/(0.4) = 2.5
+\addtolength{\drwdtemp}{4pt}%
+\ifnum\drhegraph<\drwdtemp\setlength{\drhegraph}{\drwdtemp}\fi%
+%%%%% calc text height %%%%%%%%%%%%%%%%%%%%%%%%%%%
+\settorealheight{\drhetext}{\usebox{\rstboxone}}%
+\settorealheight{\drwdtemp}{\usebox{\rstboxtwo}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxthree}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxfour}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxfive}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+%%%%% calc total height %%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\drhetotal}{\drhetext}%
+\addtolength{\drhetotal}{\drhegraph}%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\baselineskip}{0pt}%
+%\frame{%
+\limparbox{\drwdgraph}{\drhetotal}{%
+% vertical space
+\setlength{\unitlength}{\drhegraph}%
+\begin{picture}(0,1)(0,0)% spacing
+\end{picture}%
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\unitlength}{\drwdgraph}%  middle
+\begin{picture}(0,0)(0,0)%
+\ifnum\drwdone>0\ifnum\drwdbezA=\drwdbezleft\else\ifnum\drwdbezA<\drwdbezleft\put(\LenToUnit{\drwdbezleft},0){\vector(1,-1){0}}\else\put(\LenToUnit{\drwdbezleft},0){\vector(-1,-1){0}}\fi\setmiddle{\drwdtempx}{\drwdbezleft}{\drwdbezA}\qbezier(\LenToUnit{\drwdbezA},0)(\LenToUnit{\drwdtempx},\LenToUnit{.3\drwdgraph})(\LenToUnit{\drwdbezleft},.0)\fi\fi%
+\ifnum\drwdtwo>0\ifnum\drwdbezB=\drwdbezleft\else\ifnum\drwdbezB<\drwdbezleft\put(\LenToUnit{\drwdbezleft},0){\vector(1,-1){0}}\else\put(\LenToUnit{\drwdbezleft},0){\vector(-1,-1){0}}\fi\setmiddle{\drwdtempx}{\drwdbezleft}{\drwdbezB}\qbezier(\LenToUnit{\drwdbezB},0)(\LenToUnit{\drwdtempx},\LenToUnit{.3\drwdgraph})(\LenToUnit{\drwdbezleft},.0)\fi\fi%
+\ifnum\drwdthree>0\ifnum\drwdbezC=\drwdbezleft\else\ifnum\drwdbezC<\drwdbezleft\put(\LenToUnit{\drwdbezleft},0){\vector(1,-1){0}}\else\put(\LenToUnit{\drwdbezleft},0){\vector(-1,-1){0}}\fi\setmiddle{\drwdtempx}{\drwdbezleft}{\drwdbezC}\qbezier(\LenToUnit{\drwdbezC},0)(\LenToUnit{\drwdtempx},\LenToUnit{.3\drwdgraph})(\LenToUnit{\drwdbezleft},.0)\fi\fi%
+\ifnum\drwdfour>0\ifnum\drwdbezD=\drwdbezleft\else\ifnum\drwdbezD<\drwdbezleft\put(\LenToUnit{\drwdbezleft},0){\vector(1,-1){0}}\else\put(\LenToUnit{\drwdbezleft},0){\vector(-1,-1){0}}\fi\setmiddle{\drwdtempx}{\drwdbezleft}{\drwdbezD}\qbezier(\LenToUnit{\drwdbezD},0)(\LenToUnit{\drwdtempx},\LenToUnit{.3\drwdgraph})(\LenToUnit{\drwdbezleft},.0)\fi\fi%
+\ifnum\drwdfive>0\ifnum\drwdbezE=\drwdbezleft\else\ifnum\drwdbezE<\drwdbezleft\put(\LenToUnit{\drwdbezleft},0){\vector(1,-1){0}}\else\put(\LenToUnit{\drwdbezleft},0){\vector(-1,-1){0}}\fi\setmiddle{\drwdtempx}{\drwdbezleft}{\drwdbezE}\qbezier(\LenToUnit{\drwdbezE},0)(\LenToUnit{\drwdtempx},\LenToUnit{.3\drwdgraph})(\LenToUnit{\drwdbezleft},.0)\fi\fi%
+% draw vertical line; bezleft contains nucleus position
+\put(\LenToUnit{\drwdbezleft},0){\line(0,1){\LenToUnit{\drhegraph}}}%
+\end{picture}%
+%
+% draw relation name %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% attention: these picture environments must overlap 100%. no spaces inbetween in source code allowed! 
+%\settowidth{\drwdtemp}{\relnamefont{#1}}%
+\setlength{\unitlength}{1pt}%
+%\addtolength{\unitlength}{.5\drwdtemp}%
+\begin{picture}(0,0)(0,0)%
+\ifemptyd{\@relOne}\else\setmiddle{\drwdtemp}{\drwdbezA}{\drwdbezleft}\settowidth{\drwdtempx}{\relnamefont{\@relOne}}\addtolength{\drwdtemp}{-.5\drwdtempx}\put(\LenToUnit{\drwdtemp},\LenToUnit{.6\drhegraph}){\relnamefont{\mycolorbox{\relnamebgcolor}{\@relOne}}}\fi%
+\ifemptyd{\@relTwo}\else\setmiddle{\drwdtemp}{\drwdbezB}{\drwdbezleft}\settowidth{\drwdtempx}{\relnamefont{\@relTwo}}\addtolength{\drwdtemp}{-.5\drwdtempx}\put(\LenToUnit{\drwdtemp},\LenToUnit{.6\drhegraph}){\relnamefont{\mycolorbox{\relnamebgcolor}{\@relTwo}}}\fi%
+\ifemptyd{\@relThree}\else\setmiddle{\drwdtemp}{\drwdbezC}{\drwdbezleft}\settowidth{\drwdtempx}{\relnamefont{\@relThree}}\addtolength{\drwdtemp}{-.5\drwdtempx}\put(\LenToUnit{\drwdtemp},\LenToUnit{.6\drhegraph}){\relnamefont{\mycolorbox{\relnamebgcolor}{\@relThree}}}\fi%
+\ifemptyd{\@relFour}\else\setmiddle{\drwdtemp}{\drwdbezD}{\drwdbezleft}\settowidth{\drwdtempx}{\relnamefont{\@relFour}}\addtolength{\drwdtemp}{-.5\drwdtempx}\put(\LenToUnit{\drwdtemp},\LenToUnit{.6\drhegraph}){\relnamefont{\mycolorbox{\relnamebgcolor}{\@relFour}}}\fi%
+\ifemptyd{\@relFive}\else\setmiddle{\drwdtemp}{\drwdbezE}{\drwdbezleft}\settowidth{\drwdtempx}{\relnamefont{\@relFive}}\addtolength{\drwdtemp}{-.5\drwdtempx}\put(\LenToUnit{\drwdtemp},\LenToUnit{.6\drhegraph}){\relnamefont{\mycolorbox{\relnamebgcolor}{\@relFive}}}\fi%
+\end{picture}%
+%%%%%% spacing %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\drhspacer{\rstmargin}%
+\settoheight{\unitlength}{\usebox{\rstboxone}}%
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxone}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdone}%    left
+\begin{picture}(1,0)(0,0)% spacing
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdmiddleOne}%  middle
+\begin{picture}(1,0)(0,0)%
+\end{picture}%
+%
+\settoheight{\unitlength}{\usebox{\rstboxtwo}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxtwo}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdtwo}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdmiddleTwo}%  middle
+\begin{picture}(1,0)(0,0)%
+\end{picture}%
+%
+\ifnum\drwdthree>0%
+\settoheight{\unitlength}{\usebox{\rstboxthree}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxthree}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdthree}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdmiddleThree}%  middle
+\begin{picture}(1,0)(0,0)%
+\end{picture}%
+\fi%
+%
+\ifnum\drwdfour>0%
+\settoheight{\unitlength}{\usebox{\rstboxfour}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxfour}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdfour}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdmiddleFour}%  middle
+\begin{picture}(1,0)(0,0)%
+\end{picture}%
+\fi%
+%
+\ifnum\drwdfive>0%
+\settoheight{\unitlength}{\usebox{\rstboxfive}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxfive}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdfive}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+\fi%
+}%limpar
+%}%frame
+}%
+\egroup%
+}                        % close \dirrel
+
+
+
+
+%########## MULTINUC relations ########################################################################
+%##
+%##
+%##
+ 
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+
+\long\def\multirel{%
+\multirela}
+\long\def\multirela#1{%
+\@ifnextchar\bgroup{\expandafter\multirelb{#1}}{\multirelz{#1}{}{}{}{}\relax}}
+\long\def\multirelb#1#2{%
+\@ifnextchar\bgroup{\expandafter\multirelc{#1}{#2}}{\multirelz{#1}{#2}{}{}{}\relax}}
+\long\def\multirelc#1#2#3{%
+\@ifnextchar\bgroup{\expandafter\multireld{#1}{#2}{#3}}{\multirelz{#1}{#2}{#3}{}{}\relax}}
+\long\def\multireld#1#2#3#4{%
+\@ifnextchar\bgroup{\expandafter\multirele{#1}{#2}{#3}{#4}}{\multirelz{#1}{#2}{#3}{#4}{}\relax}}
+
+\long\def\multirele#1#2#3#4#5{%
+\multirelz{#1}{#2}{#3}{#4}{#5}\relax}
+
+%\def\multirelz#1#2#3#4#5{%
+% ( #1-#2-#3-#4-#5 )
+%}
+
+
+\newcommand{\multirelz}[6]{%
+\renewcommand\@optOne{\ignorespaces#2}%
+\renewcommand\@optTwo{\ignorespaces#3}%
+\renewcommand\@optThree{\ignorespaces#4}%
+\renewcommand\@optFour{\ignorespaces#5}%
+\renewcommand\@optFive{\ignorespaces#6}%
+\bgroup%
+\advance\@rstlevel by 1%
+\relax%
+{\raggedleft\rstcondfont%
+\def\arraystretch{0}% undefined by default: value for \arraystretch
+\fboxsep0pt%    no space
+\fboxrule0pt%    no space
+\initrstwidths%
+%%%%% calc graph width %%%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\drwdmiddle}{\rstmiddleskip}% middle space
+\setlength{\drwdgraph}{2\rstmargin}%
+\ifnum\drwdone>0\addtolength{\drwdgraph}{\drwdone}\fi%
+\ifnum\drwdtwo>0\addtolength{\drwdgraph}{\drwdtwo}\addtolength{\drwdgraph}{\drwdmiddle}\fi%
+\ifnum\drwdthree>0\addtolength{\drwdgraph}{\drwdthree}\addtolength{\drwdgraph}{\drwdmiddle}\fi%
+\ifnum\drwdfour>0\addtolength{\drwdgraph}{\drwdfour}\addtolength{\drwdgraph}{\drwdmiddle}\fi%
+\ifnum\drwdfive>0\addtolength{\drwdgraph}{\drwdfive}\addtolength{\drwdgraph}{\drwdmiddle}\fi%
+\settowidth{\drwdtemp}{\relnamefont{#1}}%
+\setlength{\drwdtemp}{1.3\drwdtemp}%
+\ifdim\drwdgraph<\drwdtemp%
+\ifnum\drwdone>0%
+\addtolength{\drwdtemp}{-\drwdgraph}%                
+\addtolength{\drwdgraph}{\drwdtemp}%  
+\ifnum\drwdtwo>0\setlength{\drwdtemp}{\drwdtemp}\fi%
+\ifnum\drwdthree>0\setlength{\drwdtemp}{.5\drwdtemp}\fi%
+\ifnum\drwdfour>0\setlength{\drwdtemp}{.3333\drwdtemp}\fi%
+\ifnum\drwdfive>0\setlength{\drwdtemp}{.25\drwdtemp}\fi%
+\addtolength{\drwdmiddle}{\drwdtemp}%  
+\fi\fi%
+%%%%% calc bezier positions %%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%\setlength{\drwdbezleft}{10pt}%
+%\ifdim\drwdbezleft>0.333\drwdone%
+\setlength{\drwdbezleft}{0.333\drwdone}%
+%\fi%
+%
+\ifnum\drwdtwo>0%
+\setlength{\drwdbezA}{\rstmargin}%
+\addtolength{\drwdbezA}{\drwdone}%  
+\addtolength{\drwdbezA}{\drwdmiddle}%
+\addtolength{\drwdbezA}{.5\drwdtwo}%
+%\setlength{\drwdbezA}{.5\drwdgraph}% uncomment this for nicer (straight) lines in the middle - layout may break! 
+\else%
+\addtolength{\drwdbezC}{.1666\drwdbezleft}% a single branch should go straight down    %%%%%%%%%%%%%% was \drwdleft ???
+\fi%
+\ifnum\drwdthree>0%
+\setlength{\drwdbezB}{\rstmargin}%
+\addtolength{\drwdbezB}{\drwdone}%
+\addtolength{\drwdbezB}{\drwdmiddle}%
+\addtolength{\drwdbezB}{\drwdtwo}%
+\addtolength{\drwdbezB}{\drwdmiddle}%
+\addtolength{\drwdbezB}{.5\drwdthree}%
+\else%
+\addtolength{\drwdbezA}{.1666\drwdtwo}% the rightmost branch goes further to the right
+\fi%
+\ifnum\drwdfour>0%
+\setlength{\drwdbezC}{\rstmargin}%
+\addtolength{\drwdbezC}{\drwdone}%  
+\addtolength{\drwdbezC}{\drwdmiddle}%
+\addtolength{\drwdbezC}{\drwdtwo}%
+\addtolength{\drwdbezC}{\drwdmiddle}%
+\addtolength{\drwdbezC}{\drwdthree}%
+\addtolength{\drwdbezC}{\drwdmiddle}%
+\addtolength{\drwdbezC}{.5\drwdfour}%
+\else%
+\addtolength{\drwdbezB}{.1666\drwdthree}% the rightmost branch goes further to the right
+\fi%
+\ifnum\drwdfive>0%
+\setlength{\drwdbezD}{\rstmargin}%
+\addtolength{\drwdbezD}{\drwdone}%  
+\addtolength{\drwdbezD}{\drwdmiddle}%
+\addtolength{\drwdbezD}{\drwdtwo}%
+\addtolength{\drwdbezD}{\drwdmiddle}%
+\addtolength{\drwdbezD}{\drwdthree}%
+\addtolength{\drwdbezD}{\drwdmiddle}%
+\addtolength{\drwdbezD}{\drwdfour}%
+\addtolength{\drwdbezD}{\drwdmiddle}%
+\addtolength{\drwdbezD}{.6666\drwdfive}%
+\else%
+\addtolength{\drwdbezC}{.1666\drwdfour}% the rightmost branch goes further to the right
+\fi%
+%
+%
+%%%%% calc graph height %%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\drhegraph}{.25\drwdgraph}%
+%%%%% calc text height %%%%%%%%%%%%%%%%%%%%%%%%%%%
+\settorealheight{\drhetext}{\usebox{\rstboxone}}%
+\settorealheight{\drwdtemp}{\usebox{\rstboxtwo}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxthree}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxfour}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+\settorealheight{\drwdtemp}{\usebox{\rstboxfive}}%
+\ifnum\drhetext<\drwdtemp\setlength{\drhetext}{\drwdtemp}\fi%
+%%%%% calc total height %%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\drhetotal}{\drhetext}%
+\addtolength{\drhetotal}{\drhegraph}%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\setlength{\baselineskip}{0pt}%
+%\frame{%
+\limparbox{\drwdgraph}{\drhetotal}{%
+%
+\setlength{\unitlength}{\drhegraph}%
+\begin{picture}(0,1)(0,0)% spacing
+\end{picture}%
+% a \vspace at this point would lead to a line break...
+%
+\setlength{\unitlength}{\drwdgraph}%  middle
+\setlength{\drwdtemp}{.5\drwdgraph}%
+%
+\begin{picture}(0,0)(0,0)%
+\qbezier(\LenToUnit{\drwdbezleft},0)(\LenToUnit{\drwdtemp},.25)(\LenToUnit{\drwdtemp},.25)%
+\ifnum\drwdtwo>0\qbezier(\LenToUnit{\drwdbezA},0)(\LenToUnit{\drwdtemp},.25)(\LenToUnit{\drwdtemp},.25)\fi%
+\ifnum\drwdthree>0\qbezier(\LenToUnit{\drwdbezB},0)(\LenToUnit{\drwdtemp},.25)(\LenToUnit{\drwdtemp},.25)\fi%
+\ifnum\drwdfour>0\qbezier(\LenToUnit{\drwdbezC},0)(\LenToUnit{\drwdtemp},.25)(\LenToUnit{\drwdtemp},.25)\fi%
+\ifnum\drwdfive>0\qbezier(\LenToUnit{\drwdbezD},0)(\LenToUnit{\drwdtemp},.25)(\LenToUnit{\drwdtemp},.25)\fi%
+%\qbezier(\LenToUnit{\drwdbezleft},0)(.5,.3)(\LenToUnit{\drwdbezright},0)%
+\end{picture}%
+%%%%%%%% spacer %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%
+\drhspacer{\rstmargin}%
+%
+% draw relation name %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% attention: these picture environments must overlap 100%. no spaces inbetween in source code allowed!
+\settowidth{\drwdtemp}{\relnamefont{#1}}%
+\setlength{\unitlength}{.5\drwdgraph}%
+\addtolength{\unitlength}{-.5\drwdtemp}%
+\begin{picture}(0,0)(0,0)%
+% we need to center the relation name...
+%\put(\LenToUnit{.5\drwdgraph},0.1025){\colorbox}%
+\put(1,\LenToUnit{.2\drhegraph}){\relnamefont{#1}}%
+\end{picture}%
+%
+%
+%%%%%% text and horizontal lines %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\settoheight{\unitlength}{\usebox{\rstboxone}}%
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxone}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdone}%    left
+\begin{picture}(1,0)(0,0)% spacing
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+%
+\drhspacer{\drwdmiddle}%
+%
+\settoheight{\unitlength}{\usebox{\rstboxtwo}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxtwo}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdtwo}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+%
+\drhspacer{\drwdmiddle}%
+%
+\ifnum\drwdthree>0%
+\settoheight{\unitlength}{\usebox{\rstboxthree}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxthree}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdthree}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+%
+\drhspacer{\drwdmiddle}%
+\fi%
+%
+\ifnum\drwdfour>0%
+\settoheight{\unitlength}{\usebox{\rstboxfour}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxfour}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdfour}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+%
+\drhspacer{\drwdmiddle}%
+\fi%
+%
+\ifnum\drwdfive>0%
+\settoheight{\unitlength}{\usebox{\rstboxfive}}% text
+\begin{picture}(0,0)(0,0)%
+\put(0,-1){\usebox{\rstboxfive}}%
+\end{picture}%
+\setlength{\unitlength}{\drwdfive}%    spacing
+\begin{picture}(1,0)(0,0)%
+\put(0,0){\line(1,0){1}}%
+\end{picture}%
+%
+%\drhspacer{\drwdmiddle}%
+\fi%
+%\setlength{\unitlength}{\drhetext}%    spacing
+%\begin{picture}(0,1)(0,0)%
+%\end{picture}%
+}%limpar
+%}% frame
+}% font
+% add margins to global width variable (needed for positioning if \compressionWidth works!)
+\returnrstrealwidths%
+\egroup%
+}                        % close \dirrel
+
+
+
+
+\newcommand{\rstsegment}[1]{\ifdim\terminalWidth>0pt\naturalparbox[\terminalWidth]{\vspace{1ex}\setlength{\baselineskip}{11pt}{\raggedright#1}\vspace{1ex}}\else\naturalparbox{\vspace{1ex}\setlength{\baselineskip}{11pt}{\raggedright#1}\vspace{1ex}}\fi%
+}%
+
+ 
+ 
+%\newcommand{\rstsegment}[1]{\vspace{1ex}\setlength{\baselineskip}{11pt}{\raggedright#1}}
+
+
+ 
+\newcommand\limparbox[4][c]{{\mbox{%
+\dimen0=2\fboxrule\advance\dimen0 2\fboxsep%
+\dimen1=#2\advance\dimen1 -\dimen0%
+\dimen2=#3\advance\dimen2 -\dimen0%
+\parbox[#1][\dimen2][t]{\dimen1}{#4}}}}%
+
+\newcommand\limfparbox[4][c]{\mbox{\fbox{%
+\dimen0=0pt%2\fboxrule\advance\dimen0 2\fboxsep%
+\dimen1=#2\advance\dimen1 -\dimen0%
+\dimen2=#3\advance\dimen2 -\dimen0%
+\parbox[#1][\dimen2][t]{\dimen1}{#4}}}}%
+
+
+
+
+% naturalparbox
+%
+% Crude attempt at making parboxes of `natural' width.
+%
+% Author: Stephan Lehmke <Stephan.Lehmke@cs.uni-dortmund.de>
+%
+% Originally, this belongs to the TeXPower package: http://texpower.sourceforge.net/
+
+\NeedsTeXFormat{LaTeX2e}
+
+%\ProvidesPackage{naturalparbox}
+%[2001/11/11 Attempt at making parboxes of `natural' width]
+
+\RequirePackage{ifthen}
+\RequirePackage{calc}
+
+% User-configurable: Which `resolution' should be used when searching for `best' width?
+\newcommand{\optwidthsteps}{100}
+
+% User-configurable: Which badness should be tolerated as `perfect' (stopping the search for a better one).
+\newcommand{\optwidthlinetolerance}{200}
+
+% Internal parameter: Badness of the parbox currently under consideration.
+\let\maxbadness@NPB=\@tempcnta
+
+\newlength{\maxheight@NPB}
+\newlength{\optwidth@NPB}
+\newlength{\tempdima@NPB}
+\newcounter{probe@NPB}
+\newboolean{carryon@NPB}
+\newbox\tempbox@NPB
+
+% \naturalparbox[<max width>][<max height>]{<contents>} will (try to)
+% automatically calculate the `best' width of a \parbox to contain
+% <contents> and then set <contents> into a \parbox of this width.
+%
+% The optional parameters <max width> (default \linewidth) and <max
+% height> (default \textheight) limit the growth of the box. If not
+% both can be respected, <max width> will be respected and <max
+% height> violated.
+%
+% Owing to limitations set by TeX, there are certain limits to the
+% sophistication of the procedure for finding the `optimal' width. For
+% instance, any `whatsits' (specials (like color changes), file
+% accesses (like \label), or hyper anchors) or rules which are
+% inserted directly in the vertical list of the parbox `block' the
+% analysis, so the procedure can't `see' past them (starting at the
+% bottom of the box) when analysing the contents of the parbox. The
+% user should make sure such items are set in horizontal mode (by
+% using \leavevmode or enclosing stuff in boxes). Furthermore, only
+% overfull and underfull hboxes which occur while setting the parbox
+% are considered when judging which width is `best'. This will
+% reliably make the width large enough to contain `wide' objects like
+% tabulars or included graphics, but might not give optimal results
+% for justified text.
+% vboxes occurring directly in the parbox are ignored.
+% Note further that hboxes with fixed width (made by \hbox to...)
+% which occur directly in the vbox may disturb the procedure, because
+% the fixed width cannot be recovered. These hboxes will be
+% reformatted with the width of the vbox, generating an extremely
+% large badness, unsettling the calculation of maximum badness. To
+% avoid this such hboxes should be either contained in a vbox or set
+% in horizontal mode with appropriate glue at the end.
+\newcommand{\naturalparbox}[1][\linewidth]{\def\maxwidth@NPB{#1}\@naturalparbox}
+
+\newcommand{\@naturalparbox}[2][\textheight]
+{%
+% Calculate `best' width of a parbox. The current algorithm will set the textual contents into parboxes of increasing
+% width, starting from 0pt and ending with the maximum width given, in \optwidthsteps steps. The `badness' of every
+% parbox is measured. If it is below the threshold defined by \optwidthlinetolerance, the process is stopped and the
+% found width accepted. If this doesn't happen, the width of the parbox with the least badness is returned.
+  \setcounter{probe@NPB}{0}%                                    Initialize `probe counter' for box width.
+  \let\best@cnt@NPB=\empty%                                     Initialize number of best `probe' so far.
+  \def\bestbadness@NPB{1000000}%                                Initialize badness of best `probe'.
+  \setboolean{carryon@NPB}{true}%                               Flag for breaking out of loop.
+  \setlength{\maxheight@NPB}{#1}%                               Store maximal box height.
+  \whiledo
+  {\value{probe@NPB}<\optwidthsteps\and\boolean{carryon@NPB}}%   Probes done or break of loop?
+  {%
+    \stepcounter{probe@NPB}%                                     Start next probe.
+    \setbox\@tempboxa=\vbox%                                      The trick with vbox/lastbox is to get the vbox
+    {%                                                           produced by \parbox `immediately' into a box register.
+      \parbox[b]{(\maxwidth@NPB)/\optwidthsteps*\value{probe@NPB}}% Make the next parbox.
+      {\hfuzz\maxdimen\hbadness\@M\relax#2}%
+      \global\setbox\tempbox@NPB=\lastbox%                       ... and assign \tempbox@NPB to it.
+      }%
+    \setlength{\tempdima@NPB}{\ht\tempbox@NPB+\dp\tempbox@NPB}%  Measure total height.
+    \ifthenelse{\lengthtest{\tempdima@NPB>\maxheight@NPB}}%      If it exceeds the maximum height given, the box isn't
+    {}%                                                          acceptable anyway.
+    {%
+      \calcmaxbadness@NPB{\maxbadness@NPB}{\tempbox@NPB}%      Calculate `worst badness' of any hbox appearing in parbox.
+      \ifthenelse{\not\maxbadness@NPB>\optwidthlinetolerance}%   Below Threshold?
+      {% Yes. Accept this width.
+        \edef\best@cnt@NPB{\theprobe@NPB}%                       Store this probe number.
+        \setboolean{carryon@NPB}{false}%                         Break loop.
+        }
+      {% No. Carry on.
+        \ifthenelse{\maxbadness@NPB<\bestbadness@NPB}%           Below lowest badness found so far?
+        {% Yes. Store probe number.
+          \edef\bestbadness@NPB{\number\maxbadness@NPB}%         Store badness value.
+          \edef\best@cnt@NPB{\theprobe@NPB}%                     Store probe number.
+          }
+        {}% No. Try next probe.
+        }% matches second argument of \ifthenelse{\not\maxbadness@NPB>\optwidthlinetolerance}%
+      }% matches second argument of \ifthenelse{\lengthtest{\tempdima@NPB>\maxheight@NPB}}%
+    }% matches \whiledo{\value{probe@NPB}<\optwidthsteps\and\boolean{carryon@NPB}}{%
+  \ifx\best@cnt@NPB\empty%                                      Was _any_ badness below the initialization value found?
+    \setlength{\optwidth@NPB}{\maxwidth@NPB}%                   No; return max width.
+   \else
+    \setlength{\optwidth@NPB}{(\maxwidth@NPB)/\optwidthsteps*\best@cnt@NPB}% Yes; return width of best probe.
+  \fi
+  \parbox{\optwidth@NPB}{#2}%
+  }
+
+% Calculate maximal badness of any hbox occurring in a vbox.
+\newcommand{\calcmaxbadness@NPB}[2]
+{%
+  \let\@resultcnt@NPB=#1%           Here we store the result.
+  \global\@resultcnt@NPB=\z@\relax% Just in case no hbox occurs...
+  \setlength{\@tempdima}{\wd#2}%    This is the width to which every hbox is stretched for finding its badness.
+  \setbox\@tempboxa=\vbox%          A dummy vbox for recursively analysing the vbox contents using \lastbox
+  {%
+    \hfuzz\maxdimen\hbadness\@M
+    \unvbox#2%                     `free' the contents of the vbox.
+    \measureboxes@NPB%              Analyse `tail to head' using \lastbox.
+    }%
+  }
+
+
+% Recursively analyse vertical list using \lastbox, to find maximum badness of any contained hbox.
+\newcommand{\measureboxes@NPB}%
+{%
+  \unskip\unpenalty\unkern%    This is a kluge for TeX, because there is no certain way of finding out whether there's a
+  \unskip\unpenalty\unkern%    penalty, glue or kern on the vertical list. \lastpenalty will give its value, but a
+  \unskip\unpenalty\unkern%    value of 0 might mean there was none or there was one of value 0.
+  \unskip\unpenalty\unkern%    This is different in eTeX. I might make a switch to a smarter solution.
+  \unskip\unpenalty\unkern
+  \unskip\unpenalty\unkern
+  \unskip\unpenalty\unkern
+  \unskip\unpenalty\unkern
+  \unskip\unpenalty\unkern
+  \unskip\unpenalty\unkern
+  \setbox\@tempboxa=\lastbox% Grab last box.
+  \ifhbox\@tempboxa%          Was this an hbox?
+    \setbox0=\hb@xt@\@tempdima{\unhbox\@tempboxa}% Yes. Reformat with given width.
+    \ifnum\badness>\@resultcnt@NPB%                 Badness larger than largest recorded badness?
+      \global\@resultcnt@NPB=\badness%              Yes. Memorize.
+    \fi
+    \expandafter\measureboxes@NPB%                  Recursive call.
+   \else
+    \ifvbox\@tempboxa%                                       Was this a vbox?
+      \expandafter\expandafter\expandafter\measureboxes@NPB% Ignore, but execute recursive call.
+    \fi
+  \fi
+  }