| Current File : //usr/share/texlive/texmf-dist/tex/latex/pgf/compatibility/pgfcomp-version-0-65.sty |
% Copyright 2018 by Till Tantau
%
% This file may be distributed and/or modified
%
% 1. under the LaTeX Project Public License and/or
% 2. under the GNU Public License.
%
% See the file doc/generic/pgf/licenses/LICENSE for more details.
\RequirePackage{pgfrcs}
\ProvidesPackageRCS{pgfcomp-version-0-65.sty}
\def\pgfdirection#1{\csname pgf@direction#1\endcsname}
\def\pgf@directionn{90}
\def\pgf@directionnorth{90}
\def\pgf@directionabove{90}
\def\pgf@directions{270}
\def\pgf@directionsouth{270}
\def\pgf@directionbelow{270}
\def\pgf@directionw{180}
\def\pgf@directionwest{180}
\def\pgf@directionleft{180}
\def\pgf@directione{0}
\def\pgf@directioneast{0}
\def\pgf@directionright{0}
\def\pgf@directionne{45}
\def\pgf@directionse{315}
\def\pgf@directionnw{135}
\def\pgf@directionsw{-135}
\def\pgfpictureboxed#1#2#3#4{%
\pgfpicture{#1}{#2}{#3}{#4}%
\pgfmoveto{\pgfpoint{#1}{#2}}%
\pgflineto{\pgfpoint{#1}{#4}}%
\pgflineto{\pgfpoint{#3}{#4}}%
\pgflineto{\pgfpoint{#3}{#2}}%
\pgfclosestroke\ignorespaces}
\def\endpgfpictureboxed{\endpgfpicture}
\def\pgfxyline(#1,#2)(#3,#4){%
\pgfmoveto{\pgfxy(#1,#2)}%
\pgflineto{\pgfxy(#3,#4)}%
\pgfstroke}
\def\pgfxycurve(#1,#2)(#3,#4)(#5,#6)(#7,#8){%
\pgfmoveto{\pgfxy(#1,#2)}%
\pgfbezier{\pgfxy(#3,#4)}{\pgfxy(#5,#6)}{\pgfxy(#7,#8)}%
\pgfstroke}
\def\pgfline#1#2{%
\pgfmoveto{#1}%
\pgflineto{#2}%
\pgfstroke}
\let\pgflineto=\pgfpathlineto
\let\pgfmoveto=\pgfpathmoveto
\let\pgfcurveto=\pgfpathcurveto
\let\pgfbezier=\pgfpathcurveto
\let\pgfarc=\pgfpatharc
\def\pgfzerocircle#1{\pgfcircle{\pgforigin}{#1}}
\def\pgfzeroellipse#1#2{\pgfellipse{\pgforigin}{#1}{#2}}
\def\pgfeofill{{\pgfseteorule\pgfsys@flushpath\pgfsys@fill}\pgf@resetpathsizes\ignorespaces}
\def\pgfeofillstroke{{\pgfseteorule\pgfsys@flushpath\pgfsys@fillstroke}\pgf@resetpathsizes\ignorespaces}
\def\pgf@perform@eofill{\pgfeofill}
\def\pgf@perform@eofillstroke{\pgfeofillstroke}
\let\pgfdiff=\pgfpointdiff
\let\pgfrelative=\pgfpointadd
\let\pgfpartway=\pgfpointlineattime
\let\pgfbackoff=\pgfpointlineatdistance
\def\pgflabel#1#2#3#4{%
% First, calculate base point
\pgfpointlineattime{#1}{#2}{#3}%
\pgf@xb=\pgf@x%
\pgf@yb=\pgf@y%
\pgf@process{#2}%
\pgf@xa=\pgf@x% xb/yb = start point
\pgf@ya=\pgf@y%
\pgf@process{#3}%
\advance\pgf@x by-\pgf@xa%
\advance\pgf@y by-\pgf@ya%
\pgf@process{\pgfpointnormalised{}}% x/y = normalised vector
\setlength\pgf@ya{#4}%
\pgf@xa=-\pgf@ya\relax%
\pgf@xa=\pgf@sys@tonumber{\pgf@y}\pgf@xa%
\pgf@ya=\pgf@sys@tonumber{\pgf@x}\pgf@ya%
\pgf@x=\pgf@xb\relax%
\pgf@y=\pgf@yb\relax%
\advance\pgf@x by\pgf@xa\relax%
\advance\pgf@y by\pgf@ya\relax%
\ignorespaces}
\let\pgfnormalise=\pgfpointnormalised
\let\pgfpolar=\pgfpointpolar
\let\pgforigin=\pgfpointorigin
\let\pgfclosepath=\pgfpathclose
\def\pgfxy(#1,#2){\pgfpointxy{#1}{#2}}
\def\pgfxyz(#1,#2,#3){\pgfpointxyz{#1}{#2}{#3}}
\newcommand\pgfgrid[3][]{\pgfpathgrid[#1]{#2}{#3}\pgfqstroke}
\newcommand\pgfellipse[4][]{%
\pgfpathellipse{#2}{#3}{#4}%
\csname pgf@perform@#1\endcsname\ignorespaces
}
\newcommand\pgfcircle[3][]{\pgfellipse[#1]{#2}{\pgfpoint{#3}{0pt}}{\pgfpoint{0pt}{#3}}}
\newcommand\pgfrect[3][]{%
\pgfpathrectangle{#2}{#3}%
\csname pgf@perform@#1\endcsname%
}
\def\pgf@perform@stroke{\pgfqstroke}
\def\pgf@perform@fill{\pgffill}
\def\pgf@perform@fillstroke{\pgffillstroke}
\def\pgf@perform@clip{\pgfclip}
\def\pgfsincos#1{%
\pgfmathparse{#1}%
\pgfmathcos@{#1}\pgf@y\pgfmathresult pt%
\pgfmathsin@{#1}\pgf@x\pgfmathresult pt%
}
\let\pgfdegree=\pgfsincos
\newenvironment{pgfmagnify}[2]{\pgflowlevelscope{\pgftransformcm{#1}{0}{0}{#2}{\pgfpointorigin}}}{\endpgflowlevelscope}
\newenvironment{pgftranslate}[1]{\pgflowlevelscope{\pgftransformshift{#1}}}{\endpgflowlevelscope}
\newcommand{\pgftranslateto}[1]{\pgflowlevel{\pgftransformshift{#1}}}
\newenvironment{pgfrotateby}[1]{%
\pgf@process{#1}%
\pgf@xa=-\pgf@x%
\edef\pgf@temp{\noexpand\pgflowlevelscope{\noexpand\pgftransformcm{\pgf@sys@tonumber{\pgf@y}}{\pgf@sys@tonumber{\pgf@x}}{\pgf@sys@tonumber{\pgf@xa}}{\pgf@sys@tonumber{\pgf@y}}{\noexpand\pgfpointorigin}}}%
\pgf@temp}
{\endpgflowlevelscope}
\long\def\pgfputat#1#2{\begin{pgftranslate}{#1}#2\end{pgftranslate}}
\def\pgfputlabelrotated#1#2#3#4#5{%
\pgflabel{#1}{#2}{#3}{#4}%
\pgfputat{}{%
\pgf@process{#2}%
\pgf@xa=\pgf@x% xb/yb = start point
\pgf@ya=\pgf@y%
\pgf@process{#3}%
\advance\pgf@x by-\pgf@xa%
\advance\pgf@y by-\pgf@ya%
\pgfnormalise{}% x/y = normalised vector
\pgf@ya=-\pgf@y%
\pgfsys@transformcm{\pgf@sys@tonumber{\pgf@x}}{\pgf@sys@tonumber{\pgf@y}}{\pgf@sys@tonumber{\pgf@ya}}{\pgf@sys@tonumber{\pgf@x}}{0pt}{0pt}%
#5}%
\ignorespaces}
\def\pgfqcurveto#1#2#3#4#5#6{\pgfpathqcurveto{#1bp}{#2bp}{#3bp}{#4bp}{#5bp}{#6bp}}
\let\pgfqbezier=\pgfqcurveto
\def\pgfqlineto#1#2{\pgfpathqlineto{#1bp}{#2bp}}
\def\pgfqmoveto#1#2{\pgfpathqmoveto{#1bp}{#2bp}}
\let\pgfqstroke=\pgfusepathqstroke
\def\pgfstroke{\pgfusepath{stroke}}
\def\pgfclip{\pgfusepath{clip}}
\def\pgffill{\pgfusepath{fill}}
\def\pgfclosestroke{\pgfpathclose\pgfusepath{stroke}}
\def\pgffillstroke{\pgfusepath{fill,stroke}}
\def\pgfstrokeclip{\pgfusepath{clip,stroke}}
\def\pgffillclip{\pgfusepath{clip,stroke}}
\def\pgfclosestrokeclip{\pgfpathclose\pgfusepath{stroke,clip}}
\def\pgffillstrokeclip{\pgfusepath{stroke,fill,clip}}
\def\pgfclearendarrow{\pgfsetendarrow{}}
\def\pgfclearstartarrow{\pgfsetstartarrow{}}
\def\pgfputarrow#1#2#3{\pgflowlevelobj{\pgftransformarrow{#1}{#2}}{\pgfsys@setdash{}{0pt}#3}}
\def\pgfsetstartarrow#1{\def\pgf@startarrow{#1}\def\pgf@shorten@start{\pgf@x=0.0pt}}
\def\pgfsetendarrow#1{\def\pgf@endarrow{#1}\def\pgf@shorten@end{\pgf@x=0.0pt}}
\def\pgfdefarrow#1#2#3#4{%
\pgfdefobject{pgf@#1}{#2}{#3}{\pgfsys@setlinewidth{1bp}#4}%
\expandafter\gdef\csname#1\endcsname{%
\pgf@x=\pgflinewidth%
\pgf@y=\pgflinewidth%
\pgfuseobjectmagnify{pgf@#1}\ignorespaces}}
\def\pgfdefarrowabs#1#2#3#4{%
\pgfdefobject{pgf@#1}{#2}{#3}{\pgfarrowlinewidthscale{1}#4}%
\expandafter\gdef\csname#1\endcsname{%
\pgfuseobject{pgf@#1}\ignorespaces}
}
\def\pgfarrowlinewidthscale#1{\pgfsys@setlinewidth{#1bp}\ignorespaces}
\pgfdefarrow{pgfarrowsingle}{\pgfpoint{-7pt}{-5pt}}{\pgfpoint{3pt}{5pt}}{%
\pgfqmoveto{2}{0}
\pgfqlineto{-6}{4}
\pgfqlineto{-3}{0}
\pgfqlineto{-6}{-4}
\pgfusepathqfill}
\def\pgfarrowswap#1{\pgflowlevelobj{\pgftransformxscale{-1}}{#1}}
\def\pgfarrowcombine#1#2{%
#1%
\pgflowlevelobj{\pgftransformshift{\pgfpoint{-7\pgflinewidth}{0pt}}}{#2}}
\def\pgfarrowcombineloose#1#2{#1\pgflowlevelobj{\pgftransformshift{\pgfpoint{-14\pgflinewidth}{0pt}}}{#2}}
\def\pgfarrowdouble#1{\pgfarrowcombine{#1}{#1}}
\def\pgfarrowtriple#1{%
#1%
\pgflowlevelobj{\pgftransformshift{\pgfpoint{-7\pgflinewidth}{0pt}}}{#1}%
\pgflowlevelobj{\pgftransformshift{\pgfpoint{-14\pgflinewidth}{0pt}}}{#1}}
\pgfdefarrow{pgfarrowto}{\pgfpoint{-4pt}{-5pt}}{\pgfpoint{2pt}{5pt}}{%
\pgfarrowlinewidthscale{0.8}
\pgfsetdash{}{0pt}
\pgfsetroundcap
\pgfsetroundjoin
\pgfqmoveto{-3}{4}
\pgfqcurveto{-2.75}{2.5}{0}{0.25}{0.75}{0}
\pgfqcurveto{0}{-0.25}{-2.75}{-2.5}{-3}{-4}
\pgfusepathqstroke}
\pgfdefarrow{pgfarrowbar}{\pgfpoint{-1pt}{-6pt}}{\pgfpoint{1pt}{6pt}}{%
\pgfsetdash{}{0pt}
\pgfqmoveto{0}{-5}
\pgfqlineto{0}{5}
\pgfusepathqstroke}
\pgfdefarrow{pgfarrowsquare}{\pgfpoint{-4pt}{-6pt}}{\pgfpoint{1pt}{6pt}}{%
\pgfsetdash{}{0pt}
\pgfqmoveto{-3}{-5}
\pgfqlineto{0}{-5}
\pgfqlineto{0}{5}
\pgfqlineto{-3}{5}
\pgfusepathqstroke}
\pgfdefarrow{pgfarrowround}{\pgfpoint{-3pt}{-6pt}}{\pgfpoint{2pt}{6pt}}{%
\pgfsetdash{}{0pt}
\pgfqmoveto{-2}{-5}
\pgfqcurveto{1}{-3}{1}{3}{-2}{5}
\pgfusepathqstroke}
\pgfdefarrow{pgfarrowpointed}{\pgfpoint{-6pt}{-6pt}}{\pgfpoint{2pt}{6pt}}{%
\pgfsetdash{}{0pt}
\pgfqmoveto{-4.5}{-5}
\pgfqlineto{0.5}{0}
\pgfqlineto{-4.5}{5}
\pgfusepathqstroke}
\pgfdefarrow{pgfarrowdot}{\pgfpoint{-7pt}{-4pt}}{\pgfpoint{2pt}{4pt}}{%
\pgfsys@transformshift{-2.5bp}{0bp}%
\pgfsetdash{}{0pt}
\pgfpathqcircle{3bp}
\pgfusepathqfillstroke}
\pgfdefarrow{pgfarrowdiamond}{\pgfpoint{-12pt}{-4pt}}{\pgfpoint{2pt}{4pt}}{%
\pgfsetdash{}{0pt}
\pgfqmoveto{1}{0}
\pgfqlineto{-5}{3}
\pgfqlineto{-11}{0}
\pgfqlineto{-5}{-3}
\pgfpathclose
\pgfusepathqfillstroke}
\def\pgfarrowcircle#1{%
\pgfsetdash{}{0pt}
\setlength\pgf@xa{#1}%
\pgf@xb=\pgf@xa%
\advance\pgf@xa by-0.5\pgflinewidth
\begin{pgflowlevelscope}{\pgftransformshift{\pgfpoint{-\pgf@xa}{0pt}}}%
\pgfpathqcircle{\pgf@sys@tonumber{\pgf@xb}bp}
\pgfusepathqfillstroke
\end{pgflowlevelscope}}
\def\pgfarrowtriangle#1{%
\pgfsetdash{}{0pt}
\begin{pgfscope}%
\setlength\pgf@xa{#1}%
\pgf@ya=0.577\pgf@xa%
\advance\pgf@xb by-\pgflinewidth%
\pgfpathmoveto{\pgfpoint{-\pgf@xa}{-\pgf@ya}}%
\pgfpathlineto{\pgfpoint{\pgflinewidth}{0pt}}%
\pgfpathlineto{\pgfpoint{-\pgf@xa}{\pgf@ya}}%
\pgfpathclose%
\pgfusepathqfillstroke%
\end{pgfscope}}
\def\pgfarrowlargepointed#1{%
\pgfsetdash{}{0pt}
\begin{pgfscope}%
\setlength\pgf@xa{#1}%
\pgfpathmoveto{\pgfpoint{-\pgf@xa}{-\pgf@xa}}
\pgfpathlineto{\pgfpointorigin}
\pgfpathlineto{\pgfpoint{-\pgf@xa}{\pgf@xa}}
\pgfusepathqstroke
\end{pgfscope}}
\newcommand\pgfcorner[3][sw]{%
\pgf@process{#2}%
\pgf@xa=\pgf@x%
\pgf@ya=\pgf@y%
\pgf@process{#3}%
\ifdim\pgf@xa<\pgf@x%
\pgf@xb=\pgf@x%
\pgf@x=\pgf@xa%
\pgf@xa=\pgf@xb%
\fi%
\ifdim\pgf@ya<\pgf@y%
\pgf@yb=\pgf@y%
\pgf@y=\pgf@ya%
\pgf@ya=\pgf@yb%
\fi%
\csname pgf@corner@#1\endcsname\relax%
}
\def\pgf@corner@se{\pgf@x=\pgf@xa}
\def\pgf@corner@ne{\pgf@x=\pgf@xa\pgf@y=\pgf@ya}
\def\pgf@corner@nw{\pgf@y=\pgf@ya}
\def\pgf@corner@sw{}
\def\pgf@corner@s{\pgf@x=.5\pgf@x\advance\pgf@x by.5\pgf@xa}
\def\pgf@corner@n{\pgf@x=.5\pgf@x\advance\pgf@x by.5\pgf@xa\pgf@y=\pgf@ya}
\def\pgf@corner@w{\pgf@y=.5\pgf@y\advance\pgf@y by.5\pgf@ya}
\def\pgf@corner@e{\pgf@y=.5\pgf@y\advance\pgf@y by.5\pgf@ya\pgf@x=\pgf@xa}
% Defines a circle node of name #1 at position #3 of radius #4.
%
% #1 = a name
% #2 = ``stroke'' or ``fill'' or ``fillstroke'' or ``virtual'' (= draw
% nothing)
% #3 = a point
% #4 = a radius
%
% Example:
%
% \pgfnodecircle{mynode}[stroke]{\pgfxy(1,1)}{2cm}
\def\pgfnodecircle#1[#2]#3#4{%
\pgf@process{#3}%
\expandafter\def\csname pgfno@#1\endcsname{\pgf@backoffcircle{#4}}%
\expandafter\def\csname pgfnob@#1\endcsname{\pgf@anglecircle{#4}}%
\expandafter\edef\csname pgfnom@#1\endcsname{\noexpand\pgf@x=\pgf@sys@tonumber{\pgf@x}pt\noexpand\pgf@y=\pgf@sys@tonumber{\pgf@y}pt}%
\expandafter\ifx\csname pgf@@#2\endcsname\pgf@@virtual%
\else%
\pgfcircle[#2]{\csname pgfnom@#1\endcsname}{#4}%
\fi\ignorespaces}
\def\pgf@@virtual{}
% Defines a rectangular node of name #1 with center at position #3 and
% width/height vector #4
%
% #1 = a name
% #2 = ``stroke'' or ``fill'' or ``fillstroke'' or ``virtual'' (= draw
% nothing)
% #3 = a center
% #4 = width/height vector
%
% Example:
%
% \pgfnoderect{mynode}[stroke]{\pgfxy(1,1)}{\pgfxy(2,2)}
\def\pgfnoderect#1[#2]#3#4{%
\pgf@process{#3}%
\pgf@xa=\pgf@x%
\pgf@ya=\pgf@y%
\pgf@process{#4}%
\pgf@x=.5\pgf@x%
\pgf@y=.5\pgf@y%
\expandafter\edef\csname pgfno@#1\endcsname{\noexpand\pgf@backoffrect%
{\pgf@sys@tonumber{\pgf@x}pt}{\pgf@sys@tonumber{\pgf@y}pt}}%
\expandafter\edef\csname pgfnob@#1\endcsname{\noexpand\pgf@anglerect%
{\pgf@sys@tonumber{\pgf@x}pt}{\pgf@sys@tonumber{\pgf@y}pt}}%
\expandafter\edef\csname
pgfnom@#1\endcsname{\noexpand\pgf@x=\pgf@sys@tonumber{\pgf@xa}pt\noexpand\pgf@y=\pgf@sys@tonumber{\pgf@ya}pt}%
\expandafter\ifx\csname pgf@@#2\endcsname\pgf@@virtual%
\else%
\advance\pgf@xa by-\pgf@x%
\advance\pgf@ya by-\pgf@y%
\edef\pgf@temp{\noexpand\pgf@x=\pgf@sys@tonumber{\pgf@xa}pt\noexpand\pgf@y=\pgf@sys@tonumber{\pgf@ya}pt}%
\pgfrect[#2]{\pgf@temp}{#4}%
\fi\ignorespaces}
% Defines a rectangular node of name #1 with center at position #3
% contaning a box #4
%
% #1 = a name
% #2 = ``stroke'' or ``fill'' or ``fillstroke'' or ``virtual'' (= draw
% nothing)
% #3 = a center
% #4 = TeX text that will be boxed
% #5 = a horizontal border offset
% #6 = a vertical border offset
%
% Example:
%
% \pgfnodebox{mynode}[stroke]{\pgfxy(1,1)}{start}{2pt}{2pt}
\def\pgfnodebox#1[#2]#3#4#5#6{%
\pgf@makehbox{#4}%
\pgf@x=\wd\pgf@hbox%
\pgf@y=\ht\pgf@hbox%
\advance\pgf@y by \dp\pgf@hbox%
\addtolength\pgf@x{#5}%
\addtolength\pgf@x{#5}%
\addtolength\pgf@y{#6}%
\addtolength\pgf@y{#6}%
\edef\pgf@boxsize{\noexpand\pgf@x=\the\pgf@x\noexpand\pgf@y=\the\pgf@y}%
\csname pgf@haligncompcenter\endcsname%
\csname pgf@valigncompcenter\endcsname%
\wd\pgf@hbox=0pt%
\pgfputat{#3}{%
\pgfsys@hbox\pgf@hbox}%
\pgfnoderect{#1}[#2]{#3}{\pgf@boxsize}\ignorespaces}
% Retrieves the center of #1.
%
% #1 = a node name
%
% Example:
%
% \pgfpathmoveto{\pgfnodecenter{mynode}}
\def\pgfnodecenter#1{%
\expandafter\ifx\csname pgfnom@#1\endcsname\relax%
\GenericError{\space\space\space\@spaces\@spaces\@spaces}%
{PGF Error: Node "#1" undefined.}{}{\@ehc}%
\pgfpoint{0pt}{0pt}%
\else\csname pgfnom@#1\endcsname\fi\ignorespaces}
% Returns a position relative to the center of #1.
%
% #1 = a node name
% #2 = a direction (see \pgfdirection)
% #3 = a distance
%
% Example:
%
% \pgfpathmoveto{\pgfnoderelative{mynode}[north]{1cm}}
\def\pgfnoderelative#1[#2]#3{%
\pgfrelative{\pgfnodecenter{#1}}{\pgfpolar{\pgfdirection{#2}}{#3}}\ignorespaces}
% Retrieves a border point of #1 at angle #2 and distance #3 from
% border.
%
% #1 = a node name
% #2 = an angle
% #3 = a distance from the border
%
% Example:
%
% \pgfpathmoveto{\pgfnodeborder{first}{30}{0pt}}
% \pgfpathlineto{\pgfnodeborder{second}{180}{2pt}}
% \pgfstroke
\def\pgfnodeborder#1#2#3{%
\csname pgfnob@#1\endcsname{#3}{#2}{\pgfnodecenter{#1}}\ignorespaces}
% Gives the beginning of a connection of #2 and #3, taking a
% separation distance of #1 into account.
%
% #1 = a separation distance
% #2 = a node name
% #3 = a second node name
%
% Example:
%
% \pgfpathmoveto{\pgfnodeconnstart{first}{second}}
% \pgfpathlineto{\pgfnodeconnstart{second}{first}}
\def\pgfnodeconnstart[#1]#2#3{%
\csname pgfno@#2\endcsname[#1]{\pgfnodecenter{#2}}{\pgfnodecenter{#3}}%
\ignorespaces}
\newdimen\pgf@nodesepstart
\newdimen\pgf@nodesepend
% Sets the node separation for starts of lines.
%
% #1 = a distance
%
% Example:
%
% \pgfnodesetsepstart{2pt}
\def\pgfnodesetsepstart#1{\setlength\pgf@nodesepstart{#1}\ignorespaces}
\pgfnodesetsepstart{0pt}
% Sets the node separation for end of lines.
%
% #1 = a distance
%
% Example:
%
% \pgfnodesetsepend{2pt}
\def\pgfnodesetsepend#1{\setlength\pgf@nodesepend{#1}\ignorespaces}
\pgfnodesetsepend{0pt}
% Draws a line from #1 to #2.
%
% #1 = a node name
% #2 = a second node name
%
% Example:
%
% \pgfnodeconnline{first}{second}
\def\pgfnodeconnline#1#2{%
\pgfpathmoveto{\pgfnodeconnstart[\pgf@nodesepstart]{#1}{#2}}%
\pgfpathlineto{\pgfnodeconnstart[\pgf@nodesepend]{#2}{#1}}%
\pgfstroke%
\ignorespaces}
% Draws a curve from #1 to #2. The starting angle at #1 is #3 and the
% length to the first support point is #5. The starting angle at #2
% is #4 and the length to the second support point is #6.
%
% #1 = a node name
% #2 = a second node name
% #3 = angle at first node
% #4 = angle at second node
% #5 = distance to support point at first node
% #6 = distance to support point at second node
%
% Example:
%
% \pgfnodeconncurve{first}{second}{10}{-10}{1cm}{1cm}
\def\pgfnodeconncurve#1#2#3#4#5#6{%
\pgfpathmoveto{\pgfnodeborder{#1}{#3}{\pgf@nodesepstart}}%
\pgfpathcurveto{\pgfnodeborder{#1}{#3}{#5}}{\pgfnodeborder{#2}{#4}{#6}}%
{\pgfnodeborder{#2}{#4}{\pgf@nodesepend}}%
\pgfstroke\ignorespaces}
% Put a label on a line from #1 to #2.
%
% #1 = a node name
% #2 = a second node name
% #3 = fraction of way from #1 to #2
% #4 = vertical offset
% #5 = label
%
% Example:
%
% \pgfnodelabel{first}{second}[.5][2pt]{\pgfbox[center,base]{owns}}
\def\pgfnodelabel#1#2[#3][#4]#5{%
\pgfputat{\pgflabel%
{#3}%
{\pgfnodeconnstart[\pgf@nodesepstart]{#1}{#2}}%
{\pgfnodeconnstart[\pgf@nodesepend]{#2}{#1}}%
{#4}}%
{#5}\ignorespaces}
% Put a rotated label on a line from #1 to #2.
%
% #1 = a node name
% #2 = a second node name
% #3 = fraction of way from #1 to #2
% #4 = vertical offset
% #5 = label
%
% Example:
%
% \pgfnodelabelrotated{first}{second}[.5][2pt]{\pgfbox[center,base]{owns}}
\def\pgfnodelabelrotated#1#2[#3][#4]#5{%
\pgfputlabelrotated%
{#3}%
{\pgfnodeconnstart[\pgf@nodesepstart]{#1}{#2}}%
{\pgfnodeconnstart[\pgf@nodesepend]{#2}{#1}}%
{#4}%
{#5}\ignorespaces}
% Internals
\def\pgf@backoffcircle#1[#2]#3#4{%
% Calculate backoff for a circle of radius
% #1 and offset separation #2. #3 is the center of the circle, #4
% is the target point.
\setlength\pgf@x{#1}%
\addtolength\pgf@x{#2}%
\edef\pgf@temp{{\pgf@sys@tonumber{\pgf@x}pt}}%
\expandafter\pgfbackoff\pgf@temp{#3}{#4}\ignorespaces}
\def\pgf@mult#1#2#3{#1=#2#3}
\def\pgf@anglecircle#1#2#3#4{%
% Calculate border point. #1 is radius, #2 is additional backoff, #3
% is an angle, #4 is the center of the circle.
\pgfsincos{#3}%
\setlength\pgf@xa{#1}%
\addtolength\pgf@xa{#2}%
\pgf@ya=\pgf@xa\relax%
\pgf@mult{\pgf@xa}{\pgf@sys@tonumber{\pgf@x}}{\pgf@xa}%
\pgf@mult{\pgf@ya}{\pgf@sys@tonumber{\pgf@y}}{\pgf@ya}%
\pgf@process{#4}%
\advance\pgf@y by\pgf@xa\relax%
\advance\pgf@x by\pgf@ya\ignorespaces}
\def\pgf@backoffrect#1#2[#3]#4#5{%
% Calculate backoff for a rect with half width #1,
% half height #2, offset separation #3. #4 is the center of the rect, #5
% is the target point.
\pgfdiff{#4}{#5}%
\pgf@xa=\pgf@x%
\pgf@ya=\pgf@y%
\setlength\pgf@xb{#1}%
\setlength\pgf@yb{#2}%
\addtolength\pgf@xb{#3}%
\addtolength\pgf@yb{#3}%
\ifnum\pgf@xa<0\relax% move into first quadrant
\pgf@x=-\pgf@x%
\fi%
\ifnum\pgf@ya<0\relax%
\pgf@y=-\pgf@y%
\fi%
\c@pgf@counta=\pgf@x%
\c@pgf@countb=\pgf@y%
\divide\c@pgf@counta by 256\relax%
\divide\c@pgf@countb by 256\relax%
\ifnum\c@pgf@countb<\c@pgf@counta%
\ifnum\c@pgf@counta<1\relax%
\pgf@y=\pgf@yb\relax%
\pgf@x=0pt\relax%
\else%
\pgf@y=16\pgf@y%
\divide\pgf@y by \c@pgf@counta%
\pgf@y=16\pgf@y%
\pgf@mult{\pgf@y}{\pgf@sys@tonumber{\pgf@xb}}{\pgf@y}%
\ifnum\pgf@y<\pgf@yb%
\pgf@x=\pgf@xb%
\else% rats, calculate intersection on upper side
\ifnum\c@pgf@countb<1\relax%
\pgf@x=\pgf@xb\relax%
\pgf@y=0pt\relax%
\else%
\pgf@x=16\pgf@x%
\divide\pgf@x by \c@pgf@countb%
\pgf@x=16\pgf@x%
\pgf@mult{\pgf@x}{\pgf@sys@tonumber{\pgf@yb}}{\pgf@x}%
\pgf@y=\pgf@yb%
\fi%
\fi%
\fi%
\else%
\ifnum\c@pgf@countb<1\relax%
\pgf@x=\pgf@xb\relax%
\pgf@y=0pt\relax%
\else%
\pgf@x=16\pgf@x%
\divide\pgf@x by \c@pgf@countb%
\pgf@x=16\pgf@x%
\pgf@mult{\pgf@x}{\pgf@sys@tonumber{\pgf@yb}}{\pgf@x}%
\ifnum\pgf@x<\pgf@xb%
\pgf@y=\pgf@yb%
\else%
\ifnum\c@pgf@counta<1\relax%
\pgf@y=\pgf@yb\relax%
\pgf@x=0pt\relax%
\else%
\pgf@y=16\pgf@y%
\divide\pgf@y by \c@pgf@counta%
\pgf@y=16\pgf@y%
\pgf@mult{\pgf@y}{\pgf@sys@tonumber{\pgf@xb}}{\pgf@y}%
\pgf@x=\pgf@xb%
\fi%
\fi%
\fi%
\fi%
\ifnum\pgf@xa<0\relax\pgf@x=-\pgf@x\fi%
\ifnum\pgf@ya<0\relax\pgf@y=-\pgf@y\fi%
\pgf@xa=\pgf@x%
\pgf@ya=\pgf@y%
\pgf@process{#4}%
\advance\pgf@x by\pgf@xa%
\advance\pgf@y by\pgf@ya\ignorespaces}
\def\pgf@anglerect#1#2#3#4#5{%
% Calculate border point. #1/#2 is half width/height, #3 is additional backoff, #4
% is an angle, #5 is the center of the rect.
\pgfsincos{#4}%
\pgf@xa=100\pgf@x%
\pgf@ya=100\pgf@y%
\pgf@process{#5}%
\advance\pgf@x by\pgf@ya%
\advance\pgf@y by\pgf@xa%
\edef\pgf@temp{{\noexpand\pgf@x=\the\pgf@x\noexpand\pgf@y=\the\pgf@y}}%
\expandafter\pgf@caller\pgf@temp{#1}{#2}{#3}{#5}\ignorespaces}
\def\pgf@caller#1#2#3#4#5{\pgf@backoffrect{#2}{#3}[#4]{#5}{#1}}
\long\def\pgfbox[#1,#2]#3{%
\pgf@makehbox{#3}%
\csname pgf@haligncomp#1\endcsname%
\csname pgf@valigncomp#2\endcsname%
\wd\pgf@hbox=0pt%
\ht\pgf@hbox=0pt%
\dp\pgf@hbox=0pt%
\pgfqbox{\pgf@hbox}%
\ignorespaces}
\def\pgf@haligncompleft{}% do nothing
\def\pgf@haligncompcenter{\setbox\pgf@hbox=\hbox{\hskip-.5\wd\pgf@hbox\box\pgf@hbox}}
\def\pgf@haligncompright{\setbox\pgf@hbox=\hbox{\hskip-\wd\pgf@hbox\box\pgf@hbox}}
\def\pgf@valigncompbase{}% do nothing
\def\pgf@valigncompbottom{\setbox\pgf@hbox=\hbox{\raise\dp\pgf@hbox\box\pgf@hbox}}
\def\pgf@valigncompcenter{%
\setbox\pgf@hbox=\hbox{\raise.5\dp\pgf@hbox\hbox{\lower.5\ht\pgf@hbox\box\pgf@hbox}}}%
\def\pgf@valigncomptop{\setbox\pgf@hbox=\hbox{\lower\ht\pgf@hbox\box\pgf@hbox}}
\endinput