@lofcz/tikz 0.1.0 → 0.2.0

package/runtime/dist/bundles/latex-extra/files/tex/generic/pgf/libraries/shapes/pgflibraryshapes.symbols.code.tex

@@ -1,2775 +0,0 @@
-% Copyright 2018 by Till Tantau and Mark Wibrow
-%
-% 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.
-
-\ProvidesFileRCS{pgflibraryshapes.symbols.code.tex}
-
-\pgfdeclareshape{forbidden sign}
-{%
-  \inheritsavedanchors[from=circle]% this is nearly a circle
-  \inheritanchorborder[from=circle]%
-  \inheritanchor[from=circle]{north}%
-  \inheritanchor[from=circle]{north west}%
-  \inheritanchor[from=circle]{north east}%
-  \inheritanchor[from=circle]{center}%
-  \inheritanchor[from=circle]{west}%
-  \inheritanchor[from=circle]{east}%
-  \inheritanchor[from=circle]{mid}%
-  \inheritanchor[from=circle]{mid west}%
-  \inheritanchor[from=circle]{mid east}%
-  \inheritanchor[from=circle]{base}%
-  \inheritanchor[from=circle]{base west}%
-  \inheritanchor[from=circle]{base east}%
-  \inheritanchor[from=circle]{south}%
-  \inheritanchor[from=circle]{south west}%
-  \inheritanchor[from=circle]{south east}%
-  \inheritbackgroundpath[from=circle]%
-  \foregroundpath{
-    \centerpoint%
-    \pgf@xc=\pgf@x%
-    \pgf@yc=\pgf@y%
-    \pgfutil@tempdima=\radius%
-    \pgfmathsetlength{\pgf@xb}{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength{\pgf@yb}{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@xb<\pgf@yb%
-      \advance\pgfutil@tempdima by-\pgf@yb%
-    \else%
-      \advance\pgfutil@tempdima by-\pgf@xb%
-    \fi%
-    \pgfpathmoveto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}{\pgfqpoint{-0.707107\pgfutil@tempdima}{-0.707107\pgfutil@tempdima}}}
-    \pgfpathlineto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}{\pgfqpoint{0.707107\pgfutil@tempdima}{0.707107\pgfutil@tempdima}}}
-    \pgfsetarrowsstart{}
-    \pgfsetarrowsend{}
-  }%
-}%
-
-
-\pgfdeclareshape{correct forbidden sign}
-{%
-  \inheritsavedanchors[from=circle]% this is nearly a circle
-  \inheritanchorborder[from=circle]%
-  \inheritanchor[from=circle]{north}%
-  \inheritanchor[from=circle]{north west}%
-  \inheritanchor[from=circle]{north east}%
-  \inheritanchor[from=circle]{center}%
-  \inheritanchor[from=circle]{west}%
-  \inheritanchor[from=circle]{east}%
-  \inheritanchor[from=circle]{mid}%
-  \inheritanchor[from=circle]{mid west}%
-  \inheritanchor[from=circle]{mid east}%
-  \inheritanchor[from=circle]{base}%
-  \inheritanchor[from=circle]{base west}%
-  \inheritanchor[from=circle]{base east}%
-  \inheritanchor[from=circle]{south}%
-  \inheritanchor[from=circle]{south west}%
-  \inheritanchor[from=circle]{south east}%
-  \inheritbackgroundpath[from=circle]%
-  \foregroundpath{
-    \centerpoint%
-    \pgf@xc=\pgf@x%
-    \pgf@yc=\pgf@y%
-    \pgfutil@tempdima=\radius%
-    \pgfmathsetlength{\pgf@xb}{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength{\pgf@yb}{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@xb<\pgf@yb%
-      \advance\pgfutil@tempdima by-\pgf@yb%
-    \else%
-      \advance\pgfutil@tempdima by-\pgf@xb%
-    \fi%
-    \pgfpathmoveto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}{\pgfqpoint{0.707107\pgfutil@tempdima}{-0.707107\pgfutil@tempdima}}}
-    \pgfpathlineto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}{\pgfqpoint{-0.707107\pgfutil@tempdima}{0.707107\pgfutil@tempdima}}}
-    \pgfsetarrowsstart{}
-    \pgfsetarrowsend{}
-  }%
-}%
-
-
-
-
-
-% Keys for starburst shape
-%
-% /pgf/starburst point height : The maximum height of the outer points.
-% /pgf/starburst points       : The number of points.
-% /pgf/random starburst       : The seed for the random number generator.
-%
-\pgfkeys{/pgf/random starburst/%
-  .code={%
-    \ifx\pgfkeysnovalue#1%
-      \pgfmathgeneratepseudorandomnumber%
-    \else%
-      \pgfmathtruncatemacro\pgfmathresult{#1}%
-    \fi%
-    \pgfkeyslet{/pgf/random starburst}{\pgfmathresult}%
-  }%
-}%
-\pgfkeys{/pgf/random starburst=100}%
-
-\pgfkeys{/pgf/starburst point height/.value required}%
-\pgfkeys{/pgf/starburst point height/.code={%
-    \pgfmathparse{#1}%
-    \edef\pgfmathresult{\pgfmathresult pt}%
-    \pgfkeyslet{/pgf/starburst point height}{\pgfmathresult}%
-  }%
-}%
-\pgfkeys{/pgf/starburst point height=.5cm}%
-
-\pgfkeys{/pgf/starburst points/.value required}%
-\pgfkeys{/pgf/starburst points/.code={%
-    \pgfmathtruncatemacro\pgfmathresult{#1}%
-    \pgfkeyslet{/pgf/starburst points}{\pgfmathresult}%
-  }%
-}%
-\pgfkeys{/pgf/starburst points=17}%
-
-\pgfdeclareshape{starburst}{%
-  \savedmacro\anglestep{%
-    \pgfmathdivide@{180}{\pgfkeysvalueof{/pgf/starburst points}}%
-    \let\anglestep\pgfmathresult%
-  }%
-  \savedmacro\calculatestarburstpoints{%
-    %
-    % Get the angle step.
-    %
-    \pgfmathdivide@{180}{\pgfkeysvalueof{/pgf/starburst points}}%
-    \let\anglestep\pgfmathresult%
-    %
-    % Get the total number of points.
-    %
-    \pgfmathsetcounter{pgf@counta}{\pgfkeysvalueof{/pgf/starburst points}}%
-    \multiply\c@pgf@counta2\relax%
-    \edef\totalpoints{\the\c@pgf@counta}%
-    \addtosavedmacro{\totalpoints}%
-    %
-    % Calculate the centerpoint.
-    %
-    \pgfextract@process\centerpoint{%
-      \pgfmathsetlength\pgf@x{+.5\wd\pgfnodeparttextbox}%
-      \pgfmathsetlength\pgf@y{+.5\ht\pgfnodeparttextbox}%
-      \pgfmathaddtolength\pgf@y{+-.5\dp\pgfnodeparttextbox}%
-    }%
-    %
-    % Get the larger of the outer sep.
-    %
-    \pgfmathsetlength\pgf@x{+\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength\pgf@y{+\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@x<\pgf@y%
-      \pgf@x\pgf@y%
-    \fi%
-    \edef\outersep{\the\pgf@x}%
-    %
-    % Get the node dimensions.
-    %
-    \pgfmathsetlength\pgf@x{+\pgfkeysvalueof{/pgf/inner xsep}}%
-    \pgfmathaddtolength\pgf@x{+.5\wd\pgfnodeparttextbox}%
-    \pgfmathsetlength\pgf@y{+\pgfkeysvalueof{/pgf/inner ysep}}%
-    \pgfmathaddtolength\pgf@y{+.5\ht\pgfnodeparttextbox}%
-    \pgfmathaddtolength\pgf@y{+.5\dp\pgfnodeparttextbox}%
-    %
-    %  Calculate the inner radii.
-    %
-    \ifpgfshapeborderusesincircle%
-      \pgfkeysgetvalue{/pgf/shape border rotate}{\rotate}%
-      %
-      % Use the incircle...
-      %
-      \ifdim\pgf@y>\pgf@x%
-        \pgf@x\pgf@y%
-      \fi%
-      \pgf@x1.41421\pgf@x%
-      \pgf@y\pgf@x%
-    \else%
-      %
-      % Get the rotation (with rounding).
-      %
-      \pgfkeysgetvalue{/pgf/shape border rotate}{\rotate}%
-      \pgfmathmod@{\rotate}{360}%
-      \afterassignment\pgfmath@gobbletilpgfmath@%
-      \expandafter\c@pgf@counta\pgfmathresult\relax\pgfmath@%
-      \advance\c@pgf@counta45\relax%
-      \divide\c@pgf@counta90\relax%
-      \multiply\c@pgf@counta90\relax%
-      \ifnum\c@pgf@counta<0\relax%
-        \advance\c@pgf@counta360\relax%
-      \fi%
-      %
-      % Calculate the width and height of the node
-      % contents, according to any border rotation.
-      %
-      \ifnum\c@pgf@counta=90\relax%
-        \pgf@xc\pgf@x%
-        \pgf@x\pgf@y%
-        \pgf@y\pgf@xc%
-      \else%
-        \ifnum\c@pgf@counta=270\relax%
-          \pgf@xc\pgf@x%
-          \pgf@x\pgf@y%
-          \pgf@y\pgf@xc%
-        \fi%
-      \fi%
-      \edef\rotate{\the\c@pgf@counta}%
-      %
-      % ...or not.
-      %
-      \pgf@x=1.41421\pgf@x%
-      \pgf@y=1.41421\pgf@y%
-    \fi%
-    \addtosavedmacro{\rotate}%
-    %
-    % Adjust innerradius for minimum width and height.
-    %
-    \pgf@xa\pgf@x%
-    \pgfmathsetlength\pgf@xb{+\pgfkeysvalueof{/pgf/starburst point height}}%
-    \advance\pgf@xa\pgf@xb%
-    \pgfmathsetlength\pgf@xc{+\pgfkeysvalueof{/pgf/minimum width}}%
-    \ifdim\pgf@xa<.5\pgf@xc%
-      \pgf@x.5\pgf@xc%
-      \advance\pgf@x-\pgf@xb%
-    \fi%
-    \pgf@ya\pgf@y%
-    \pgfmathsetlength\pgf@yb{+\pgfkeysvalueof{/pgf/starburst point height}}%
-    \advance\pgf@ya\pgf@yb%
-    \pgfmathsetlength\pgf@yc{+\pgfkeysvalueof{/pgf/minimum height}}%
-    \ifdim\pgf@ya<.5\pgf@yc%
-      \pgf@y.5\pgf@yc%
-      \advance\pgf@y-\pgf@yb%
-    \fi%
-    \edef\xinnerradius{\the\pgf@x}%
-    \edef\yinnerradius{\the\pgf@y}%
-    \addtosavedmacro{\xinnerradius}%
-    \addtosavedmacro{\yinnerradius}%
-    %
-    % Calculate a radius outside the starburst.
-    %
-    \ifdim\pgf@y>\pgf@x%
-      \pgf@x\pgf@y%
-    \fi%
-    \pgfmathaddtolength\pgf@x{+\pgfkeysvalueof{/pgf/starburst point height}}%
-    \edef\externalradius{\the\pgf@x}%
-    \addtosavedmacro{\externalradius}%
-    %
-    % Set the seed for the random number generator.
-    %
-    \pgfmathsetseed{\pgfkeysvalueof{/pgf/random starburst}}%
-    %
-    % Now create the points on the shape and also
-    % the miter length and angle for each point.
-    %
-    \def\angle{90}% Start at the top.
-    %
-    % At point a, the miter length and angle are calculated for point b = a - 1.
-    %
-    \c@pgf@counta1\relax%
-    \c@pgf@countb0\relax%
-    %
-    % As 3 consecutive points are required to be defined for miter
-    % calculations, it is necessary to go over the first two points
-    % again.
-    %
-    \c@pgf@countc\totalpoints\relax%
-    \advance\c@pgf@countc2\relax%
-    \edef\looppoints{\the\c@pgf@countc}%
-    \let\secondpoint\pgfutil@empty%
-    \let\thirdpoint\pgfutil@empty%
-    \pgfmathloop%
-      %
-      % Cycle the point definitions.
-      %
-      \let\firstpoint\secondpoint%
-      \let\secondpoint\thirdpoint%
-      \ifnum\pgfmathcounter>\looppoints%
-      \else%
-        \ifnum\pgfmathcounter>\totalpoints%
-          \expandafter\let\expandafter\thirdpoint\csname point@\the\c@pgf@counta @\endcsname%
-        \else%
-          \ifodd\pgfmathcounter%
-            %
-            % An outer point.
-            %
-            \ifnum\pgfkeysvalueof{/pgf/random starburst}=0\relax%
-              \pgf@xa\pgfkeysvalueof{/pgf/starburst point height}\relax%
-            \else%
-              \pgf@x\pgfkeysvalueof{/pgf/starburst point height}\relax%
-              \pgf@xa.75\pgf@x%
-              \pgf@xb.25\pgf@x%
-              \pgfmathrnd%
-              \pgf@xa\pgfmathresult\pgf@xa%
-              \advance\pgf@xa\pgf@xb%
-            \fi%
-            \pgf@x\xinnerradius\relax%
-            \advance\pgf@x\pgf@xa%
-            \pgf@y\yinnerradius\relax%
-            \advance\pgf@y\pgf@xa%
-            \expandafter\pgfextract@process\csname point@\the\c@pgf@counta @\endcsname{%
-              \pgfpointpolar{\angle}{\the\pgf@x and \the\pgf@y}%
-              \pgf@xa\pgf@x%
-              \pgf@ya\pgf@y%
-              \centerpoint%
-              \advance\pgf@x\pgf@xa%
-              \advance\pgf@y\pgf@ya%
-            }%
-          \else%
-            %
-            % An inner point.
-            %
-            \expandafter\pgfextract@process\csname point@\the\c@pgf@counta @\endcsname{%
-              \pgfpointpolar{\angle}{\xinnerradius and \yinnerradius}%
-              \pgf@xa\pgf@x%
-              \pgf@ya\pgf@y%
-              \centerpoint%
-              \advance\pgf@x\pgf@xa%
-              \advance\pgf@y\pgf@ya%
-            }%
-          \fi%
-          %
-          % Add the points to the saved macro.
-          %
-          \expandafter\let\expandafter\thirdpoint\csname point@\the\c@pgf@counta @\endcsname%
-          \expandafter\addtosavedmacro\expandafter{\csname point@\the\c@pgf@counta @\endcsname}%
-        \fi%
-        %
-        % It is only possible to do the miter calculations if three points are defined.
-        %
-        \ifx\firstpoint\pgfutil@empty%
-        \else%
-          %
-          % Calculate the miter length...
-          %
-          \pgfmathanglebetweenlines{\secondpoint}{\thirdpoint}{\secondpoint}{\firstpoint}%
-          \pgfmathdivide@{\pgfmathresult}{2}%
-          \let\defaultmiterangle\pgfmathresult%
-          \pgfmathcosec@{\pgfmathresult}%
-          \pgf@x\outersep\relax%
-          \pgf@x\pgfmathresult\pgf@x%
-          \edef\miterlength{\the\pgf@x}%
-          %
-          % ...the miter angle...
-          %
-          \pgfmathanglebetweenlines{\firstpoint}{\secondpoint}{\firstpoint}{\thirdpoint}%
-          \pgfmathadd@{\pgfmathresult}{\defaultmiterangle}%
-          \pgfmathsubtract@{180}{\pgfmathresult}%
-          \let\angletemp\pgfmathresult%
-          \pgfmathanglebetweenpoints{\firstpoint}{\thirdpoint}%
-          \pgfmathsubtract@{180}{\pgfmathresult}%
-          \pgfmathsubtract@{\angletemp}{\pgfmathresult}%
-          \edef\miterangle{\pgfmathresult}%
-          %
-          % ...and thus the border point.
-          %
-          \pgfextract@process\borderpoint{%
-            \secondpoint%
-            \pgf@xa\pgf@x
-            \pgf@ya\pgf@y%
-            \pgfpointpolar{\miterangle}{\miterlength}%
-            \advance\pgf@x\pgf@xa%
-            \advance\pgf@y\pgf@ya%
-          }%
-          %
-          % Get the angle from the centerpoint to the *unrotated* border points.
-          %
-          \pgfmathanglebetweenpoints{\centerpoint}{\borderpoint}%
-          \expandafter\edef\csname angletoborderpoint@\the\c@pgf@countb @\endcsname{\pgfmathresult}%
-          \expandafter\addtosavedmacro\expandafter{\csname angletoborderpoint@\the\c@pgf@countb @\endcsname}%
-          %
-          % Rotate the border points and save.
-          %
-          \expandafter\pgfextract@process\csname borderpoint@\the\c@pgf@countb @\endcsname{%
-            \pgfmathrotatepointaround{\borderpoint}{\centerpoint}{\rotate}%
-          }%
-          \expandafter\addtosavedmacro\expandafter{\csname borderpoint@\the\c@pgf@countb @\endcsname}%
-          %
-          % Now create the anchors.
-          %
-          \c@pgf@countc\c@pgf@countb%
-          \advance\c@pgf@countc1\relax%
-          \divide\c@pgf@countc2\relax%
-          \ifodd\c@pgf@countb\relax%
-            \pgfutil@ifundefined{pgf@anchor@starburst@outer point\space\the\c@pgf@countc}{%
-              \expandafter\xdef\csname pgf@anchor@starburst@outer point\space\the\c@pgf@countc\endcsname{%
-                \noexpand\calculatestarburstpoints%
-                \noexpand\csname borderpoint@\the\c@pgf@countb @\noexpand\endcsname%
-              }%
-            }{}%
-          \else%
-            \pgfutil@ifundefined{pgf@anchor@starburst@inner point\space\the\c@pgf@countc}{%
-              \expandafter\xdef\csname pgf@anchor@starburst@inner point\space\the\c@pgf@countc\endcsname{%
-                \noexpand\calculatestarburstpoints%
-                \noexpand\csname borderpoint@\the\c@pgf@countb @\noexpand\endcsname%
-              }%
-            }{}%
-          \fi%
-        \fi%
-        \pgfmathadd@{\angle}{\anglestep}%
-        \pgfmathmod@{\pgfmathresult}{360}%
-        \let\angle\pgfmathresult%
-        \advance\c@pgf@counta1\relax%
-        \ifnum\c@pgf@counta>\totalpoints%
-          \c@pgf@counta1\relax%
-        \fi%
-        \advance\c@pgf@countb1\relax%
-        \ifnum\c@pgf@countb>\totalpoints%
-          \c@pgf@countb1\relax%
-        \fi%
-    \repeatpgfmathloop%
-  }%
-  \savedanchor\centerpoint{%
-    \pgfmathsetlength\pgf@x{+.5\wd\pgfnodeparttextbox}%
-    \pgfmathsetlength\pgf@y{+.5\ht\pgfnodeparttextbox}%
-    \pgfmathaddtolength\pgf@y{+-.5\dp\pgfnodeparttextbox}%
-  }%
-  \savedanchor\midpoint{%
-    \pgfmathsetlength\pgf@x{+.5\wd\pgfnodeparttextbox}%
-    \pgfmathsetlength\pgf@y{+.5ex}%
-  }%
-  \savedanchor\basepoint{%
-    \pgfmathsetlength\pgf@x{+.5\wd\pgfnodeparttextbox}%
-    \pgf@y0pt\relax%
-  }%
-  \anchor{center}{\centerpoint}%
-  \anchor{base}{\basepoint}%
-  \anchor{mid}{\midpoint}%
-  \anchor{north}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{0pt}{\externalradius}}%
-  }%
-  \anchor{south}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{0pt}{-\externalradius}}%
-  }%
-  \anchor{east}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{\externalradius}{0pt}}%
-  }%
-  \anchor{west}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{-\externalradius}{0pt}}%
-  }%
-  \anchor{north west}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{-\externalradius}{\externalradius}}%
-  }%
-  \anchor{south west}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{-\externalradius}{-\externalradius}}%
-  }%
-  \anchor{north east}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{\externalradius}{\externalradius}}%
-  }%
-  \anchor{south east}{%
-    \calculatestarburstpoints%
-    \csname pgf@anchor@starburst@border\endcsname{\pgfqpoint{\externalradius}{-\externalradius}}%
-  }%
-  \backgroundpath{%
-    \calculatestarburstpoints%
-    \pgfmathloop%
-      \ifnum\pgfmathcounter>\totalpoints%
-      \else%
-        \ifnum\pgfmathcounter=1\relax%
-          \let\starburstaction\pgfpathmoveto%
-        \else%
-          \let\starburstaction\pgfpathlineto%
-        \fi%
-        \starburstaction{%
-          %\pgfmathrotatepointaround{\csname point@\pgfmathcounter @\endcsname}{\centerpoint}{\rotate}}%
-          \csname point@\pgfmathcounter @\endcsname}
-      \repeatpgfmathloop%
-    \pgfpathclose%
-  }%
-  \anchorborder{%
-    %
-    % Save x and y.
-    %
-    \edef\externalx{\the\pgf@x}%
-    \edef\externaly{\the\pgf@y}%
-    %
-    % Adjust the location of the external
-    % point relative to \centerpoint.
-    %
-    \centerpoint%
-    \pgf@xa\externalx\relax%
-    \pgf@ya\externaly\relax%
-    \advance\pgf@xa\pgf@x%
-    \advance\pgf@ya\pgf@y%
-    \edef\externalx{\the\pgf@xa}%
-    \edef\externaly{\the\pgf@ya}%
-    %
-    % Get the starburst points.
-    %
-    \calculatestarburstpoints%
-    %
-    % Get the angle of the external point to the \centerpoint.
-    %
-    \pgfmathanglebetweenpoints{\centerpoint}{\pgfqpoint{\externalx}{\externaly}}%
-    \pgfmathsubtract@{\pgfmathresult}{\rotate}%
-    \ifdim\pgfmathresult pt<0pt\relax%
-      \pgfmathadd@{\pgfmathresult}{360}%
-    \fi%
-    \let\externalangle\pgfmathresult%
-    %
-    % Locate the appropriate sides on the starburst border...
-    %
-    \ifdim\externalangle pt<90pt\relax%
-      \c@pgf@counta0\relax%
-      \c@pgf@countb\totalpoints\relax%
-      \pgfmathloop%
-      \ifnum\c@pgf@counta>0\relax%
-      \else%
-        \ifdim\csname angletoborderpoint@\the\c@pgf@countb @\endcsname pt>90pt\relax%
-          \c@pgf@counta\c@pgf@countb%
-        \else%
-          \ifdim\externalangle pt>\csname angletoborderpoint@\the\c@pgf@countb @\endcsname pt\relax%
-            \c@pgf@counta\c@pgf@countb%
-          \fi%
-        \fi%
-        \advance\c@pgf@countb-1\relax%
-      \repeatpgfmathloop%
-      \edef\first{\the\c@pgf@counta}%
-      \advance\c@pgf@counta1\relax%
-      \ifnum\c@pgf@counta>\totalpoints\relax%
-        \c@pgf@counta1\relax%
-      \fi%
-      \edef\second{\the\c@pgf@counta}%
-    \else%
-      \c@pgf@counta0\relax%
-      \pgfmathloop%
-      \ifnum\c@pgf@counta>0\relax%
-      \else%
-        \ifdim\csname angletoborderpoint@\pgfmathcounter @\endcsname pt<90pt\relax%
-          \c@pgf@counta\pgfmathcounter%
-        \else%
-          \ifdim\externalangle pt<\csname angletoborderpoint@\pgfmathcounter @\endcsname pt\relax%
-            \c@pgf@counta\pgfmathcounter%
-          \fi%
-        \fi%
-      \repeatpgfmathloop%
-      \edef\first{\the\c@pgf@counta}%
-      \advance\c@pgf@counta-1\relax%
-      \ifnum\c@pgf@counta=0\relax%
-        \c@pgf@counta\totalpoints\relax%
-      \fi%
-      \edef\second{\the\c@pgf@counta}%
-    \fi%
-    %
-    % ...and thus, the point on the star border.
-    %
-    \pgfpointintersectionoflines{\centerpoint}{\pgfqpoint{\externalx}{\externaly}}%
-        {\csname borderpoint@\first @\endcsname}{\csname borderpoint@\second @\endcsname}%
-  }%
-}%
-
-
-
-
-% Keys for shape cloud.
-%
-% /pgf/cloud puffs    : the number of cloud puffs.
-% /pgf/cloud puff arc : the length of the cloud puff arc.
-
-\newif\ifpgfcloudanchorsuseellipse%
-\newif\ifpgfcloudignoresaspect%
-\pgfcloudignoresaspectfalse%
-\pgfkeys{/pgf/.cd,
-  cloud puffs/.initial=10,
-  cloud puff arc/.initial=150,
-  cloud ignores aspect/.is if=pgfcloudignoresaspect,
-  cloud anchors use ellipse/.is if=pgfcloudanchorsuseellipse,
-}%
-
-
-% If symbol library is loaded separately these need to be defined.
-%
-\pgfkeys{/pgf/.cd,
-  aspect/.code={\pgfsetshapeaspect{#1}},% this for tikz...
-  shape aspect/.initial=1,% but this is consistent with other pgfset stuff.
-  shape aspect/.code={%
-    \pgfkeys{/pgf/aspect={#1}}%
-    \pgfkeyssetvalue{/pgf/shape aspect}{#1}
-  }%
-}%
-
-\def\pgfsetshapeaspect#1{%
-  \def\pgfshapeaspect{#1}%
-  % Invert
-  \pgfutil@tempdima=#1pt%
-  \pgfutil@tempdima=.125\pgfutil@tempdima%
-  \c@pgf@counta=\pgfutil@tempdima\relax% 8192*determinant
-  \pgfutil@tempdima=8192pt%
-  \divide\pgfutil@tempdima by\c@pgf@counta%
-  \edef\pgfshapeaspectinverse{\pgf@sys@tonumber{\pgfutil@tempdima}}%
-}%
-
-\pgfsetshapeaspect{1}%
-
-
-% Shape cloud.
-%
-\pgfdeclareshape{cloud}{%
-  \savedmacro\getradii{%
-    \pgfmathtruncatemacro\puffs{\pgfkeysvalueof{/pgf/cloud puffs}}%
-    \addtosavedmacro\puffs%
-    \pgfmathdivide{360}{\pgfkeysvalueof{/pgf/cloud puffs}}%
-    \let\anglestep\pgfmathresult%
-    \addtosavedmacro\anglestep%
-    \pgfmathsetmacro\arc{\pgfkeysvalueof{/pgf/cloud puff arc}}%
-    \addtosavedmacro\arc%
-    %
-    % x radius.
-    %
-    \pgfmathsetlength\pgf@x{\pgfkeysvalueof{/pgf/inner xsep}}%
-    \advance\pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@x1.4142135\pgf@x%
-    %
-    % y radius.
-    %
-    \pgfmathsetlength\pgf@y{\pgfkeysvalueof{/pgf/inner ysep}}%
-    \advance\pgf@y.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y.5\dp\pgfnodeparttextbox%
-    \pgf@y1.4142135\pgf@y%
-    %
-    % Adjust for shape aspect.
-    %
-    \ifpgfcloudignoresaspect%
-      \pgf@xc\pgf@x%
-      \pgf@yc\pgf@y%
-    \else%
-      \pgf@xc\pgfshapeaspect\pgf@y%
-      \ifdim\pgf@xc<\pgf@x%
-        \pgf@xc\pgf@x%
-      \fi%
-      \pgf@yc\pgfshapeaspectinverse\pgf@xc%
-      \ifdim\pgf@yc<\pgf@y%
-        \pgf@yc\pgf@y%
-        \pgf@xc\pgfshapeaspect\pgf@y%
-      \fi%
-    \fi%
-    %
-    \edef\xinnerradius{\the\pgf@xc}%
-    \edef\yinnerradius{\the\pgf@yc}%
-    %
-    % Get the larger of the outer sep.
-    %
-    \pgfmathsetlength\pgf@x{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength\pgf@y{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@x<\pgf@y%
-      \pgf@x\pgf@y%
-    \fi%
-    \edef\outersep{\the\pgf@x}%
-    \addtosavedmacro\outersep%
-    %
-    % For a given cloud, with puff arc length a, the quotient of the
-    % distance between the start and end point of a puffs circular arc
-    % and the radius of that arc, is constant:
-    %
-    % g = .5 * sec((180-a)/2)
-    %
-    \pgfmathsubtract{180}{\arc}%
-    \pgfmathdivide@{\pgfmathresult}{2}%
-    \let\tempangle\pgfmathresult%
-    \pgfmathsec@{\pgfmathresult}%
-    \pgfmathdivide@{\pgfmathresult}{2}%
-    \let\arcradiusquotient\pgfmathresult%
-    \addtosavedmacro\arcradiusquotient%
-    %
-    % In addition, the quotient of the distance between the start and
-    % end point of a puffs circular arc and the height of that arc
-    % (ignoring rotation), is also constant:
-    %
-    % h = .5 * (1-sin((180-a)/2))/cos((180-a)/2)
-    %   = g  * (1 - sin((180-a)/2))
-    \pgfmathsin@{\tempangle}%
-    \pgfmathsubtract@{1}{\pgfmathresult}%
-    \pgfmathmultiply@{\pgfmathresult}{\arcradiusquotient}%
-    \let\archeightquotient\pgfmathresult%
-    \addtosavedmacro\archeightquotient%
-    %
-    % Minimum size is applied to the circum-ellipse (i.e. the ellipse
-    % that passes through the extremities of each puff). Thus, the
-    % relationship between the radii of the elliptical incircle ("inellipse"?)
-    % of the cloud (x and y) and the radii of the circum-ellipse (X and Y),
-    % is given by
-    %
-    % X = 2(x*cos(p/2) + ky)
-    % Y = 2(y*cos(p/2) + kx)
-    %
-    % where:
-    % k = sin(p/2)*((1-cos(a/2))/sin(a/2))
-    % p = the angle between each puff (i.e. 360/<puffs>)
-    % a = the length of arc of the puff.
-    %
-    \pgfmathdivide{\arc}{2}%
-    \let\halfarcangle\pgfmathresult%
-    \pgfmathcos@{\pgfmathresult}%
-    \pgfmathsubtract@{1}{\pgfmathresult}%
-    \let\pgf@temp\pgfmathresult%
-    \pgfmathsin@{\halfarcangle}%
-    \pgfmathdivide@{\pgf@temp}{\pgfmathresult}%
-    \let\pgf@temp\pgfmathresult%
-    \pgfmathdivide@{\anglestep}{2}%
-    \pgfmathsin@{\pgfmathresult}%
-    \pgfmathmultiply@{\pgfmathresult}{\pgf@temp}%
-    \let\k\pgfmathresult%
-    %
-    \pgfmathdivide@{\anglestep}{2}%
-    \pgfmathcos@{\pgfmathresult}%
-    \let\coshalfanglestep\pgfmathresult%
-    %
-    % Calculate the actual radii of the circum-ellipse.
-    %
-    \pgf@x\xinnerradius\relax%
-    \pgf@y\yinnerradius\relax%
-    \pgf@xa\coshalfanglestep\pgf@x%
-    \advance\pgf@xa\k\pgf@y%
-    \pgf@ya\coshalfanglestep\pgf@y%
-    \advance\pgf@ya\k\pgf@x%
-    %
-    % Adjust for minimum height (Y').
-    %
-    \pgfmathsetlength\pgf@yb{\pgfkeysvalueof{/pgf/minimum height}}%
-    \ifdim\pgf@ya<.5\pgf@yb%
-      \pgf@ya.5\pgf@yb%
-    \fi%
-    %
-    % Adjust for minimum width (X').
-    %
-    \pgfmathsetlength\pgf@xb{\pgfkeysvalueof{/pgf/minimum width}}%
-    \ifdim\pgf@xa<.5\pgf@xb%
-      \pgf@xa.5\pgf@xb%
-    \fi%
-    %
-    \edef\xouterradius{\the\pgf@xa}%
-    \addtosavedmacro\xouterradius%
-    \edef\youterradius{\the\pgf@ya}%
-    \addtosavedmacro\youterradius%
-    %
-    % Now recalculate `in-ellipse' radii:
-    %
-    % x = (X'cos(p/2)-kY')/cos^2(p/2)-k^2,
-    % y = (Y'cos(p/2)-kX')/cos^2(p/2)-k^2,
-    %
-    \pgf@xc\k pt\relax%
-    \pgf@xc-\k\pgf@xc%
-    \pgf@yc\coshalfanglestep pt\relax%
-    \pgf@yc\coshalfanglestep\pgf@yc%
-    \advance\pgf@xc\pgf@yc\relax%
-    \pgfmathreciprocal@{\pgfmath@tonumber{\pgf@xc}}% cos^2(p/2)-k^2
-    %
-    \pgf@x\coshalfanglestep\pgf@xa%
-    \advance\pgf@x-\k\pgf@ya%
-    \pgf@x\pgfmathresult\pgf@x%
-    \pgf@y\coshalfanglestep\pgf@ya%
-    \advance\pgf@y-\k\pgf@xa%
-    \pgf@y\pgfmathresult\pgf@y%
-    %
-    \edef\xinnerradius{\the\pgf@x}%
-    \edef\yinnerradius{\the\pgf@y}%
-    \addtosavedmacro\xinnerradius%
-    \addtosavedmacro\yinnerradius%
-    %
-    % Get some useful trig. constants.
-    %
-    \pgfmathdivide@{\arc}{4}%
-    \let\quarterarc\pgfmathresult%
-    \pgfmathsubtract@{180}{\arc}%
-    \pgfmathdivide@{\pgfmathresult}{2}%
-    \let\halfcomplementarc\pgfmathresult%
-    %
-    \addtosavedmacro\arc%
-    \addtosavedmacro\quarterarc%
-    \addtosavedmacro\halfcomplementarc%
-    %
-    \pgfmathsec@{\halfcomplementarc}% 1/cos((180-a)/2)
-    \let\sechalfcomplementarc\pgfmathresult%
-    \pgfmathsin@{\halfcomplementarc}% sin((180-a)/2)
-    \let\sinhalfcomplementarc\pgfmathresult%
-    %
-    \addtosavedmacro\sechalfcomplementarc%
-    \addtosavedmacro\sinhalfcomplementarc%
-    %
-    \pgfmathsin@{\quarterarc}% sin(a/4)
-    \let\sinquarterarc\pgfmathresult%
-    \pgfmathcos@{\quarterarc}% cos(a/4)
-    \let\cosquarterarc\pgfmathresult%
-    \pgfmathreciprocal@{\cosquarterarc}%
-    \pgfmathmultiply@{\pgfmathresult}{\sinquarterarc}% tan(a/4)
-    \let\tanquarterarc\pgfmathresult%
-    %
-    \addtosavedmacro\sinquarterarc%
-    \addtosavedmacro\cosquarterarc%
-    \addtosavedmacro\tanquarterarc%
-    %
-  }%
-  \savedanchor\centerpoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y-.5\dp\pgfnodeparttextbox%
-  }%
-  \savedanchor\midpoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@y{+.5ex}%
-  }%
-  \savedanchor\basepoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y0pt%
-  }%
-  \anchor{center}{\centerpoint}%
-  \anchor{mid}{\midpoint}%
-  \anchor{base}{\basepoint}%
-  \anchor{north}{%
-    \getradii%
-    \csname pgf@anchor@cloud@border\endcsname{\pgfqpoint{0pt}{\youterradius}}%
-  }%
-  \anchor{south}{%
-    \getradii%
-    \csname pgf@anchor@cloud@border\endcsname{\pgfqpoint{0pt}{-\youterradius}}%
-  }%
-  \anchor{east}{%
-    \getradii%
-    \csname pgf@anchor@cloud@border\endcsname{\pgfqpoint{\xouterradius}{0pt}}%
-  }%
-  \anchor{west}{%
-    \getradii%
-    \csname pgf@anchor@cloud@border\endcsname{\pgfqpoint{-\xouterradius}{0pt}}%
-  }%
-  \anchor{north west}{%
-    \getradii%
-    \pgfextract@process\pgf@sh{%
-      \pgf@x\xouterradius\relax%
-      \pgf@x-0.707106\pgf@x%
-      \pgf@y\youterradius\relax%
-      \pgf@y0.707106\pgf@y%
-    }%
-    \csname pgf@anchor@cloud@border\endcsname{\pgf@sh}%
-  }%
-  \anchor{north east}{%
-    \getradii%
-    \pgfextract@process\pgf@sh{%
-      \pgf@x\xouterradius\relax%
-      \pgf@x0.707106\pgf@x%
-      \pgf@y\youterradius\relax%
-      \pgf@y0.707106\pgf@y%
-    }%
-    \csname pgf@anchor@cloud@border\endcsname{\pgf@sh}%
-  }%
-  \anchor{south west}{%
-    \getradii%
-    \pgfextract@process\pgf@sh{%
-      \pgf@x\xouterradius\relax%
-      \pgf@x-0.707106\pgf@x%
-      \pgf@y\youterradius\relax%
-      \pgf@y-0.707106\pgf@y%
-    }%
-    \csname pgf@anchor@cloud@border\endcsname{\pgf@sh}%
-  }%
-  \anchor{south east}{%
-    \getradii%
-    \pgfextract@process\pgf@sh{%
-      \pgf@x\xouterradius\relax%
-      \pgf@x0.707106\pgf@x%
-      \pgf@y\youterradius\relax%
-      \pgf@y-0.707106\pgf@y%
-    }%
-    \csname pgf@anchor@cloud@border\endcsname{\pgf@sh}%
-  }%
-  %
-  % Each `puff' is a circular arc of length a, drawn using two a/2
-  % arcs (a < 180), approximated by Bezier curves.
-  % Due to TeX rounding errors, it is sometimes necessary to `force'
-  % the arc to end at a specific point. So...
-  %
-  % @article{riskus2006,
-  %   author  = {Aleskus Ri\v{s}kus},
-  %   title   = {Approximation of a cubic Bezier curve by circular arcs and vice versa},
-  %   journal = {Information Technology and Control},
-  %   year    = {2006},
-  %   volume  = {35},
-  %   number  = {4}
-  % }
-  %
-  \backgroundpath{%
-    {%
-    \getradii%
-    %
-    % Get the start angle.
-    %
-    \pgfmathdivide@{\anglestep}{2}%
-    \pgfmathsubtract@{90}{\pgfmathresult}%
-    \let\angle\pgfmathresult%
-    %
-    % Calculate the first arc point.
-    %
-    \pgfextract@process\arcfirstpoint{%
-      \pgfpointadd{\centerpoint}{%
-        \pgfpointpolar{+\angle}{+\xinnerradius and +\yinnerradius}%
-      }%
-    }%
-    \pgfpathmoveto{\arcfirstpoint}%
-    \let\arcendpoint\arcfirstpoint%
-    %
-    \pgfmathloop%
-    \ifnum\pgfmathcounter>\puffs\relax%
-    \else
-      \let\arcstartpoint\arcendpoint%
-      %
-      % Make sure beginning and end of path are exactly the same.
-      %
-      \ifnum\pgfmathcounter=\puffs\relax%
-        \let\arcendpoint\arcfirstpoint%
-      \else%
-        \pgfmathadd@{\angle}{\anglestep}%
-        \let\angle\pgfmathresult%
-        \pgfextract@process\arcendpoint{%
-          \pgfpointadd{\centerpoint}{%
-            \pgfpointpolar{+\angle}{+\xinnerradius and +\yinnerradius}%
-          }%
-        }%
-      \fi%
-      %
-      % Get some useful cloud parameters from \arcstartpoint and \arcendpoint.
-      %
-      \pgf@sh@getcloudpuffparameters%
-      %
-      % Get the rotation for the Bezier curve.
-      %
-      \pgfmathsubtract@{90}{\quarterarc}%
-      \pgfmathadd@{\pgfmathresult}{\arcslope}%
-      \let\arcrotate\pgfmathresult%
-      \pgfmathsin@{\arcrotate}%
-      \let\sinarcrotate\pgfmathresult%
-      \pgfmathcos@{\arcrotate}%
-      \let\cosarcrotate\pgfmathresult%
-      %
-      % Calculate the amount by which to scale the control
-      % points, in order to approximate an a/2 arc with radius x.
-      %
-      \pgf@x\arcradius\relax%
-      \pgf@x\tanquarterarc\pgf@x% tan(a/4)
-      \edef\controlscale{\pgfmath@tonumber{\pgf@x}}%
-      %
-      % Get the first control point for the first arc (length a/2)...
-      %
-      \pgfextract@process\controlone{%
-        %
-        % k = 0.552284745 (a `magic' number)...
-        %
-        \pgf@x0.55228475pt\relax%
-        \pgf@x\sinquarterarc\pgf@x% k * sin(a/2)
-        \pgf@y0.55228475pt\relax%
-        \pgf@y\cosquarterarc\pgf@y% k * cos(a/2)
-        %
-        % ...scale the control points up...
-        %
-        \pgf@x\controlscale\pgf@x%
-        \pgf@y\controlscale\pgf@y%
-        %
-        % ...rotate...
-        %
-        \pgf@xa\cosarcrotate\pgf@x%
-        \advance\pgf@xa-\sinarcrotate\pgf@y%
-        \pgf@ya\cosarcrotate\pgf@y%
-        \advance\pgf@ya\sinarcrotate\pgf@x%
-        %
-        % ...and shift.
-        %
-        \arcstartpoint%
-        \advance\pgf@x\pgf@xa%
-        \advance\pgf@y\pgf@ya%
-      }%
-      %
-      % Get the midpoint of the 150� arc.
-      %
-      \pgfextract@process\arcmidpoint{%
-        \pgfextract@process\arcmidpoint{%
-          \pgf@x-\halfchordlength\relax%
-          \pgf@y\segmentheight\relax%
-        }%
-        \pgfpointadd{\arcstartpoint}{%
-          \pgfmathrotatepointaround{\arcmidpoint}{\pgfpointorigin}{\arcslope}%
-        }%
-      }%
-      %
-      % Get the second control point for the first arc (length a/2)...
-      %
-      \pgfextract@process\controltwo{%
-        \pgf@x0.55228475pt\relax%
-        \pgf@x\sinquarterarc\pgf@x%  k * sin(a/2)
-        \pgf@y-0.55228475pt\relax%
-        \pgf@y\cosquarterarc\pgf@y% -k * cos(a/2)
-        %
-        % ...scale, rotate and shift.
-        %
-        \pgf@x\controlscale\pgf@x%
-        \pgf@y\controlscale\pgf@y%
-        %
-        \pgf@xa\cosarcrotate\pgf@x%
-        \advance\pgf@xa-\sinarcrotate\pgf@y%
-        \pgf@ya\cosarcrotate\pgf@y%
-        \advance\pgf@ya\sinarcrotate\pgf@x%
-        %
-        \arcmidpoint%
-        \advance\pgf@x\pgf@xa%
-        \advance\pgf@y\pgf@ya%
-      }%
-      {%
-        \pgfsetcornersarced{\pgfpointorigin}%
-        \pgfpathcurveto{\controlone}{\controltwo}{\arcmidpoint}%
-      }%
-      %
-      % Do the same for the second arc...
-      %
-      \pgfmathadd@{\quarterarc}{90}%
-      \pgfmathadd@{\pgfmathresult}{\arcslope}%
-      \let\arcrotate\pgfmathresult%
-      \pgfmathsin@{\arcrotate}%
-      \let\sinarcrotate\pgfmathresult%
-      \pgfmathcos@{\arcrotate}%
-      \let\cosarcrotate\pgfmathresult%
-      %
-      % First control point for the second arc...
-      %
-      \pgfextract@process\controlone{%
-        \pgf@x0.55228475pt\relax%
-        \pgf@x\sinquarterarc\pgf@x% k * sin(a/2)
-        \pgf@y0.55228475pt\relax%
-        \pgf@y\cosquarterarc\pgf@y% k * cos(a/2)
-        %
-        % ...scale, rotate and shift.
-        %
-        \pgf@x\controlscale\pgf@x%
-        \pgf@y\controlscale\pgf@y%
-        %
-        \pgf@xa\cosarcrotate\pgf@x%
-        \advance\pgf@xa-\sinarcrotate\pgf@y%
-        \pgf@ya\cosarcrotate\pgf@y%
-        \advance\pgf@ya\sinarcrotate\pgf@x%
-        %
-        \arcmidpoint%
-        \advance\pgf@x\pgf@xa%
-        \advance\pgf@y\pgf@ya%
-      }%
-      %
-      % Second control point for the second arc.
-      %
-      \pgfextract@process\controltwo{%
-        \pgf@x0.55228475pt\relax%
-        \pgf@x\sinquarterarc\pgf@x%  k * sin(a/2)
-        \pgf@y-0.55228475pt\relax%
-        \pgf@y\cosquarterarc\pgf@y% -k * cos(a/2)
-        %
-        % ...scale, rotate and shift.
-        %
-        \pgf@x\controlscale\pgf@x%
-        \pgf@y\controlscale\pgf@y%
-        %
-        \pgf@xa\cosarcrotate\pgf@x%
-        \advance\pgf@xa-\sinarcrotate\pgf@y%
-        \pgf@ya\cosarcrotate\pgf@y%
-        \advance\pgf@ya\sinarcrotate\pgf@x%
-        %
-        \arcendpoint%
-        \advance\pgf@x\pgf@xa%
-        \advance\pgf@y\pgf@ya%
-      }%
-      \pgfpathcurveto{\controlone}{\controltwo}{\arcendpoint}%
-      \repeatpgfmathloop%
-    \pgfpathclose% Phew!
-    }%
-  }%
-  %
-  % Calculate a point on the border of the cloud. This is a two-stage process:
-  %
-  % 1. Locate the correct puff.
-  % 2. Locate the angle on the circular arc which forms the puff.
-  %
-  \anchorborder{%
-    %
-    % Save x and y.
-    %
-    \edef\externalx{\the\pgf@x}%
-    \edef\externaly{\the\pgf@y}%
-     %
-    % Get the inner radii and trig. constants.
-    %
-    \getradii%
-    %
-    %
-    %
-    \ifpgfcloudanchorsuseellipse%
-      \pgfpointadd{\centerpoint}{%
-        \pgfpointborderellipse{%
-          \pgfpoint{\externalx}{\externaly}
-          }{%
-            \pgfpoint{\xouterradius}{\youterradius}
-          }%
-      }%
-    \else%
-      \pgfextract@process\externalpoint{%
-        \centerpoint%
-        \advance\pgf@x\externalx\relax%
-        \advance\pgf@y\externaly\relax%
-      }%
-      \pgfmathanglebetweenpoints{\centerpoint}{\externalpoint}%
-      \let\externalangle\pgfmathresult%
-      %
-      % 1. Locate the correct puff:
-      %
-      % Get end angle of the relevant puff arc.
-      %
-      \pgfmathdivide@{\anglestep}{2}%
-      \let\halfanglestep\pgfmathresult%
-      \pgfmathsubtract@{90}{\halfanglestep}%
-      \let\endangle\pgfmathresult%
-      \pgfmathloop%
-        \pgfmathsubtract@{\endangle}{\anglestep}%
-        \ifdim\pgfmathresult pt<-\anglestep pt\relax%
-        \else%
-          \let\endangle\pgfmathresult%
-      \repeatpgfmathloop%
-      \def\angle{0}%
-      \let\lastangle\angle%
-      \pgfmathloop%
-        \pgfmathadd@{\endangle}{\anglestep}%
-        \let\endangle\pgfmathresult%
-        %
-        % Calculate the `miter point'. This is the point between
-        % each puff, and takes into account the outer sep.
-        %
-        \pgfextract@process\miterpoint{%
-          %
-          \pgfextract@process\secondpoint{%
-            \pgfpointpolar{+\endangle}{+\xinnerradius and +\yinnerradius}%
-          }%
-          %
-          \pgfmathadd@{\endangle}{\anglestep}%
-          \let\angletemp\pgfmathresult%
-          \pgfextract@process\thirdpoint{%
-            \pgfpointpolar{+\angletemp}{+\xinnerradius and +\yinnerradius}%
-          }%
-          %
-          \pgfmathsubtract@{\endangle}{\anglestep}%
-          \let\angletemp\pgfmathresult%
-          \pgfextract@process\firstpoint{%
-            \pgfpointpolar{+\angletemp}{+\xinnerradius and +\yinnerradius}%
-          }%
-          %
-          \pgfmathanglebetweenpoints{\firstpoint}{\secondpoint}%
-          \let\anglealpha\pgfmathresult%
-          \pgfmathanglebetweenpoints{\secondpoint}{\thirdpoint}%
-          \let\anglebeta\pgfmathresult%
-          %
-          \pgfmathsubtract@{\anglebeta}{\anglealpha}%
-          \pgfmathdivide@{\pgfmathresult}{2}%
-          \pgfmathadd@{\pgfmathresult}{\halfcomplementarc}%
-          \pgfmathcosec@{\pgfmathresult}%
-          \pgf@x\outersep\relax%
-          \pgf@x\pgfmathresult\pgf@x%
-          \edef\miterradius{\the\pgf@x}%
-          %
-          \pgfmathadd@{\anglealpha}{\anglebeta}%
-          \pgfmathsubtract@{\pgfmathresult}{180}%
-          \pgfmathdivide@{\pgfmathresult}{2}%
-          \let\miterangle\pgfmathresult%
-          \pgfpointadd{\secondpoint}{%
-            \pgfqpointpolar{\miterangle}{\miterradius}%
-          }%
-        }%
-        %
-        % Get the angle of the miter point...
-        %
-        \pgfmathanglebetweenpoints{\pgfpointorigin}{\miterpoint}%
-        \let\angle\pgfmathresult%
-        \ifdim\angle pt<\lastangle pt\relax% Guard against 360� = 0�
-          \pgfmathadd@{\angle}{360}%
-          \let\angle\pgfmathresult%
-        \fi%
-        \let\lastangle\angle%
-        %
-        % ...and see if it is greater than the external point.
-        %
-      \ifdim\externalangle pt>\angle pt\relax%
-      \repeatpgfmathloop%
-      %
-      % Get the start angle of the relevant arc and ensure angles are in the range.
-      %
-      \pgfmathmod@{\endangle}{360}%
-      \let\endangle\pgfmathresult%
-      \pgfmathsubtract@{\endangle}{\anglestep}%
-      \ifdim\pgfmathresult pt<0pt\relax%
-        \pgfmathadd@{\pgfmathresult}{360}%
-      \fi%
-      \let\startangle\pgfmathresult%
-      %
-      % Now, get the start and end points of the arc.
-      %
-      \pgfextract@process\arcstartpoint{%
-        \pgfpointadd{\centerpoint}{%
-          \pgfpointpolar{+\startangle}{+\xinnerradius and +\yinnerradius}%
-        }%
-      }%
-      \pgfextract@process\arcendpoint{%
-        \pgfpointadd{\centerpoint}{%
-          \pgfpointpolar{+\endangle}{+\xinnerradius and +\yinnerradius}%
-        }%
-      }%
-      %
-      % Get some useful cloud parameters from \arcstartpoint and \arcendpoint.
-      %
-      \pgf@sh@getcloudpuffparameters%
-      %
-      % Hackery, for when an arc straddles 0�.
-      %
-      \ifdim\endangle pt<\startangle pt\relax%
-        \pgfmathadd@{\externalangle}{180}%
-        \pgfmathmod@{\pgfmathresult}{360}%
-        \let\x\pgfmathresult%
-      \else%
-        \let\x\externalangle%
-      \fi%
-      %
-      % 2. Locate the angle on the circular arc which forms the puff.
-      %
-      % Essentially a binary search to find the angle on the circular
-      % arc, which provides the nearest estimate to the border point.
-      %
-      \let\s\halfcomplementarc% The start of the arc.
-      \pgfmathadd@{\s}{\arc}%
-      \let\e\pgfmathresult% The end of the arc.
-      \pgfmathadd@{\e}{\s}%
-      \pgfmathdivide@{\pgfmathresult}{2}%
-      \let\n\pgfmathresult% The nearest estimate (default to middle of arc).
-      \def\m{360}% Measure of `nearness'.
-      \pgfmathloop%
-        \pgfmathadd@{\e}{\s}%
-        \pgfmathdivide@{\pgfmathresult}{2}%
-        \let\p\pgfmathresult% The point halfway between \s and \e.
-        \ifdim\p pt=\s pt\relax%
-        \else%
-          %
-          % Get the point on the circular arc.
-          %
-          \pgfmathadd@{\p}{\arcslope}%
-          \let\a\pgfmathresult%
-          \pgfextract@process\arcpoint{%
-            \pgfpointadd{\circlecenterpoint}{%
-              \pgfqpointpolar{\a}{\outerarcradius}%
-            }%
-          }%
-          %
-          % Find the angle between the node centre and the point on the arc.
-          %
-          \pgfmathanglebetweenpoints{\centerpoint}{\arcpoint}%
-          %
-          % Hackery, for when an arc straddles 0�.
-          %
-          \ifdim\endangle pt<\startangle pt\relax%
-            \pgfmathadd@{\pgfmathresult}{180}%
-            \pgfmathmod@{\pgfmathresult}{360}%
-          \fi%
-          \let\q\pgfmathresult%
-          \ifdim\x pt=\q pt% Found it!
-            \pgfmathbreakloop% Breaks after current iteration is complete.
-          \else
-            \ifdim\x pt<\q pt\relax%
-              \let\e\p%
-            \else%
-              \let\s\p%
-            \fi%
-          \fi%
-          \pgfmathsubtract@{\x}{\q}%
-          \pgfmathabs@{\pgfmathresult}%
-          %
-          % Save the estimate if it is better than any previous estimate.
-          %
-          \ifdim\pgfmathresult pt<\m pt\relax%
-            \let\m\pgfmathresult%
-            \let\n\p%
-          \fi%
-      \repeatpgfmathloop%
-      %
-      % Use the nearest estimate as the anchor angle.
-      %
-      \pgfmathadd@{\n}{\arcslope}%
-      \let\anchorangle\pgfmathresult%
-      %
-      % Finally, the required point.
-      %
-      \pgfpointadd{\circlecenterpoint}{%
-        \pgfqpointpolar{\anchorangle}{\outerarcradius}%
-      }%
-    \fi%
-  }% Again, Phew!
-  %
-  % Now, a sneaky hack. This means an arbitrary `puff' anchors
-  % can be used for positioning the cloud shape. This is needed
-  % if a cloud is positioned using the `puff <n+1>' anchor, where
-  % n is the number of puffs of any previously drawn cloud.
-  %
-  \pgfutil@g@addto@macro\pgf@sh@s@cloud{%
-    \c@pgf@counta\puffs\relax%
-    \pgfmathloop%
-      \ifnum\c@pgf@counta>0\relax%
-        \pgfutil@ifundefined{pgf@anchor@cloud@puff\space\the\c@pgf@counta}{%
-        \expandafter\xdef\csname pgf@anchor@cloud@puff\space\the\c@pgf@counta\endcsname{%
-          \noexpand\pgf@sh@@cloudpuffanchor{\the\c@pgf@counta}%
-        }%
-      }{\c@pgf@counta0\relax}%
-      \advance\c@pgf@counta-1\relax%
-    \repeatpgfmathloop%
-  }%
-}%
-
-% \pgf@sh@@cloudpuffanchor
-%
-% Internal macro for calculating the anchors puff 1, puff 2, ... etc.
-%
-\def\pgf@sh@@cloudpuffanchor#1{%
-    \getradii%
-    \pgfmathdivide@{\anglestep}{2}%
-    \let\halfanglestep\pgfmathresult%
-    \c@pgf@counta#1\relax%
-    \advance\c@pgf@counta-1\relax%
-    \pgfmathmultiply@{\anglestep}{\the\c@pgf@counta}%
-    \pgfmathadd@{\pgfmathresult}{90}%
-    \pgfmathsubtract@{\pgfmathresult}{\halfanglestep}%
-    \let\angle\pgfmathresult%
-    %
-    % Calculate the first arc point.
-    %
-    \pgfextract@process\arcstartpoint{%
-      \pgfpointadd{\centerpoint}{%
-        \pgfpointpolar{+\angle}{+\xinnerradius and +\yinnerradius}%
-      }%
-    }%
-    %
-    \pgfmathadd@{\angle}{\anglestep}%
-    \let\angle\pgfmathresult%
-    \pgfextract@process\arcendpoint{%
-      \pgfpointadd{\centerpoint}{%
-        \pgfpointpolar{+\angle}{+\xinnerradius and +\yinnerradius}%
-      }%
-    }%
-    %
-    % Get some useful cloud parameters from \arcstartpoint and \arcendpoint.
-    %
-    \pgf@sh@getcloudpuffparameters%
-    %
-    % Calculate the point.
-    %
-    \pgfmathadd@{\arcslope}{90}%
-    \let\anchorangle\pgfmathresult%
-    \pgfpointadd{\circlecenterpoint}{%
-      \pgfqpointpolar{\anchorangle}{\outerarcradius}%
-    }%
-}%
-
-% \pgf@sh@cloudpuffparameters
-%
-% Internal macro to calculate some common arc parameters which
-% are required when calculating radii, drawing the background
-% path and calculating border anchors.
-%
-\def\pgf@sh@getcloudpuffparameters{%
-  %
-  % Calculate the angle to which the entire arc is sloped.
-  %
-  \pgfmathanglebetweenpoints{\arcendpoint}{\arcstartpoint}%
-  \let\arcslope\pgfmathresult%
-  %
-  % Calculate the chord length and arc radius.
-  %
-  \pgfpointdiff{\arcendpoint}{\arcstartpoint}%
-  \pgfmathveclen@{\pgfmath@tonumber{\pgf@x}}{\pgfmath@tonumber{\pgf@y}}
-  \pgf@x\pgfmathresult pt\relax%
-  \pgf@xa.5\pgf@x%
-  \edef\halfchordlength{\the\pgf@xa}%
-  \pgf@x\arcradiusquotient\pgf@x%
-  \edef\arcradius{\the\pgf@x}%
-  \pgf@xa\outersep\relax%
-  \advance\pgf@xa\pgf@x%
-  \edef\outerarcradius{\the\pgf@xa}%
-  %
-  % Calculate the height of the resulting segment.
-  %
-  \pgf@y-\sinhalfcomplementarc\pgf@x% sin((180-a)/2)
-  \advance\pgf@y\pgf@x%
-  \edef\segmentheight{\the\pgf@y}%
-  %
-  % Calculate the center of the circle of which the arc is a part.
-  %
-  \pgfextract@process\circlecenterpoint{%
-    \pgfextract@process\circlecenterpoint{%
-      \pgf@x-\halfchordlength\relax%
-      \pgf@y\segmentheight\relax%
-      \advance\pgf@y-\arcradius
-    }%
-    \pgfpointadd{\arcstartpoint}{%
-      \pgfmathrotatepointaround{\circlecenterpoint}{\pgfpointorigin}{\arcslope}%
-    }%
-  }%
-}%
-
-
-
-
-
-% Internal macros for signal shape.
-%
-\def\pgf@lib@sh@signal@nowhere{nowhere}%
-\def\pgf@lib@sh@signal@from{from}%
-\def\pgf@lib@sh@signal@to{to}%
-
-\def\pgf@lib@sh@signal@parsedirection#1#2{%
-  %
-  \let\pgf@lib@sh@signal@direction=#2%
-  \edef\pgf@lib@sh@temp{#1}%
-  \expandafter\pgf@lib@sh@signal@@parsedirection\pgf@lib@sh@temp\pgf@stop}%
-
-\def\pgf@lib@sh@signal@@parsedirection#1\pgf@stop{%
-  \pgfutil@in@{and}{#1}%
-  \ifpgfutil@in@%
-    \pgf@lib@sh@signal@@@parsedirection#1\pgf@lib%
-  \else%
-    \pgf@lib@sh@signal@@@parsedirection#1 and #1\pgf@lib%
-  \fi
-}%
-\def\pgf@lib@sh@signal@@@parsedirection#1 and #2\pgf@lib{%
-  \pgfutil@in@{nowhere}{#1}%
-  \ifpgfutil@in@
-  \else%
-    \pgf@lib@sh@signal@@@@parsedirection{#1}%
-    \pgf@lib@sh@signal@@@@parsedirection{#2}%
-  \fi%
-}%
-\def\pgf@lib@sh@signal@@@@parsedirection#1{%
-  \pgfutil@in@{ #1 }{ east right }%
-  \ifpgfutil@in@%
-    \let\pgf@lib@sh@signal@east=\pgf@lib@sh@signal@direction%
-    \let\pgf@lib@sh@signal@north=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@south=\pgf@lib@sh@signal@nowhere%
-  \fi%
-  \pgfutil@in@{ #1 }{ left west }%
-  \ifpgfutil@in@%
-    \let\pgf@lib@sh@signal@west=\pgf@lib@sh@signal@direction%
-    \let\pgf@lib@sh@signal@north=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@south=\pgf@lib@sh@signal@nowhere%
-  \fi%
-  \pgfutil@in@{ #1 }{ above up north }%
-  \ifpgfutil@in@%
-    \let\pgf@lib@sh@signal@north=\pgf@lib@sh@signal@direction%
-    \let\pgf@lib@sh@signal@east=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@west=\pgf@lib@sh@signal@nowhere%
-  \fi%
-  \pgfutil@in@{ #1 }{ below down south }%
-  \ifpgfutil@in@%
-    \let\pgf@lib@sh@signal@south=\pgf@lib@sh@signal@direction%
-    \let\pgf@lib@sh@signal@east=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@west=\pgf@lib@sh@signal@nowhere%
-  \fi%
-}%
-
-
-% Keys for signal shape:
-%
-\pgfkeys{/pgf/.cd,
-  signal pointer angle/.initial=90,
-  signal to/.initial=east,
-  signal from/.initial=nowhere,
-}%
-
-\pgfdeclareshape{signal}{%
-  \savedmacro\installsignalparameters{%
-    %
-    \let\pgf@lib@sh@signal@north=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@south=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@east=\pgf@lib@sh@signal@nowhere%
-    \let\pgf@lib@sh@signal@west=\pgf@lib@sh@signal@nowhere%
-    %
-    \pgf@lib@sh@signal@parsedirection{\pgfkeysvalueof{/pgf/signal from}}{\pgf@lib@sh@signal@from}%
-    \pgf@lib@sh@signal@parsedirection{\pgfkeysvalueof{/pgf/signal to}}{\pgf@lib@sh@signal@to}%
-    %
-    % Define a centerpoint.
-    %
-    \pgfextract@process\centerpoint{%
-      \pgf@x.5\wd\pgfnodeparttextbox%
-      \pgf@y.5\ht\pgfnodeparttextbox%
-      \advance\pgf@y-.5\dp\pgfnodeparttextbox%
-    }%
-    %
-    % Get some useful trig. stuff
-    %
-    \pgfmathsetmacro\pointerangle{\pgfkeysvalueof{/pgf/signal pointer angle}}%
-    %
-    \pgfmathdivide@{\pointerangle}{2}%
-    \let\halfpointerangle=\pgfmathresult%
-    %
-    \pgfmathcosec@{\halfpointerangle}%
-    \let\cosechalfpointerangle=\pgfmathresult%
-    %
-    \pgfmathdivide@{\halfpointerangle}{2}%
-    \let\quarterpointerangle=\pgfmathresult%
-    %
-    \pgfmathcosec@{\quarterpointerangle}%
-    \let\cosecquarterpointerangle=\pgfmathresult%
-    %
-    \pgfmathsec@{\quarterpointerangle}%
-    \let\secquarterpointerangle=\pgfmathresult%
-    %
-    \pgfmathsubtract@{90}{\quarterpointerangle}%
-    \let\complementquarterpointerangle\pgfmathresult%
-    %
-    % Get the larger of the outer sep.
-    %
-    \pgfmathsetlength\pgf@x{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength\pgf@y{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@x>\pgf@y%
-      \pgf@y\pgf@x%
-    \fi%
-    \pgf@yc=\pgf@y%
-    %
-    % Calculate the miter due to the line width, at the pointer apex...
-    %
-    \pgf@x=\cosechalfpointerangle\pgf@y%
-    \edef\pointerapexmiter{\the\pgf@x}%
-    %
-    % ...at a corner by a `to' pointer (i.e. sticks out)...
-    %
-    \pgf@x=\secquarterpointerangle\pgf@y%
-    \edef\tocornermiter{\the\pgf@x}%
-    %
-    % ...at a corner by a `from' pointer (i.e. sticks in).
-    %
-    \pgf@x=\cosecquarterpointerangle\pgf@y
-    \edef\fromcornermiter{\the\pgf@x}%
-    %
-    % Get the (half) dimensions of the node.
-    %
-    \pgfmathsetlength\pgf@xa{\pgfkeysvalueof{/pgf/inner xsep}}%
-    \advance\pgf@xa.5\wd\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@ya{\pgfkeysvalueof{/pgf/inner ysep}}%
-    \advance\pgf@ya.5\ht\pgfnodeparttextbox%
-    \advance\pgf@ya.5\dp\pgfnodeparttextbox%
-    %
-    % Get the distance a pointer sticks out to the side...
-    %
-    \pgfmathsubtract@{90}{\halfpointerangle}%
-    \pgfmathtan@{\pgfmathresult}%
-    \pgf@xb=\pgfmathresult\pgf@ya%
-    %
-    % ...and up.
-    %
-    \pgf@yb=\pgfmathresult\pgf@xa%
-    %
-    % Adjust for minimum height.
-    %
-    \pgfutil@tempdima=2.0\pgf@ya%
-    \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@nowhere%
-    \else%
-      \advance\pgfutil@tempdima by\pgf@yb%
-    \fi%
-    \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@nowhere%
-    \else%
-      \advance\pgfutil@tempdima by\pgf@yb%
-    \fi%
-    \pgfmathsetlength\pgf@y{\pgfkeysvalueof{/pgf/minimum height}}%
-    \ifdim\pgfutil@tempdima<\pgf@y%
-      \pgfutil@tempdima=\pgf@y%
-      %
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@nowhere%
-      \else%
-        \advance\pgfutil@tempdima by-\pgf@yb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@nowhere%
-      \else%
-        \advance\pgfutil@tempdima by-\pgf@yb%
-      \fi%
-      \pgf@ya=0.5\pgfutil@tempdima%
-      \pgfmathsubtract@{90}{\halfpointerangle}%
-      \pgfmathtan@{\pgfmathresult}%
-      \pgf@xb=\pgfmathresult\pgf@ya%
-    \fi%
-    %
-    % Adjust for minimum width.
-    %
-    \pgfutil@tempdima=2.0\pgf@xa%
-    \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@nowhere%
-    \else%
-      \advance\pgfutil@tempdima by\pgf@xb%
-    \fi%
-    \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@nowhere%
-    \else%
-      \advance\pgfutil@tempdima by\pgf@xb%
-    \fi%
-    \pgfmathsetlength\pgf@x{\pgfkeysvalueof{/pgf/minimum width}}%
-    \ifdim\pgfutil@tempdima<\pgf@x%
-      \pgfutil@tempdima=\pgf@x%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@nowhere%
-      \else%
-        \advance\pgfutil@tempdima by-\pgf@xb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@nowhere%
-      \else%
-        \advance\pgfutil@tempdima by-\pgf@xb%
-      \fi%
-      \pgf@xa=0.5\pgfutil@tempdima%
-      \pgfmathsubtract@{90}{\halfpointerangle}%
-      \pgfmathtan@{\pgfmathresult}%
-      \pgf@yb=\pgfmathresult\pgf@xa%
-    \fi%
-    %
-    % So, define the points for the background path.
-    %
-    \pgfextract@process\north{%
-      \centerpoint%
-      \advance\pgf@y\pgf@ya%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@to%
-        \advance\pgf@y\pgf@yb%
-      \fi%
-    }%
-    \pgfextract@process\south{%
-      \centerpoint%
-      \advance\pgf@y-\pgf@ya%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@to%
-        \advance\pgf@y-\pgf@yb%
-      \fi%
-    }%
-    \pgfextract@process\east{%
-      \centerpoint%
-      \advance\pgf@x\pgf@xa%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@to%
-        \advance\pgf@x\pgf@xb%
-      \fi%
-    }%
-    \pgfextract@process\west{%
-      \centerpoint%
-      \advance\pgf@x-\pgf@xa%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@to%
-        \advance\pgf@x-\pgf@xb%
-      \fi%
-    }%
-    \pgfextract@process\northeast{%
-      \centerpoint%
-      \advance\pgf@y\pgf@ya%
-      \advance\pgf@x\pgf@xa%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@from%
-        \advance\pgf@y\pgf@yb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@from%
-        \advance\pgf@x\pgf@xb%
-      \fi%
-    }%
-    \pgfextract@process\southeast{%
-      \centerpoint%
-      \advance\pgf@y-\pgf@ya%
-      \advance\pgf@x\pgf@xa%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@from%
-        \advance\pgf@y-\pgf@yb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@from%
-        \advance\pgf@x\pgf@xb%
-      \fi%
-    }%
-    \pgfextract@process\southwest{%
-      \centerpoint%
-      \advance\pgf@y-\pgf@ya%
-      \advance\pgf@x-\pgf@xa%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@from%
-        \advance\pgf@y-\pgf@yb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@from%
-        \advance\pgf@x-\pgf@xb%
-      \fi%
-    }%
-    \pgfextract@process\northwest{%
-      \centerpoint%
-      \advance\pgf@y\pgf@ya%
-      \advance\pgf@x-\pgf@xa%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@from%
-        \advance\pgf@y\pgf@yb%
-      \fi%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@from%
-        \advance\pgf@x-\pgf@xb%
-      \fi%
-    }%
-    \addtosavedmacro{\north}%
-    \addtosavedmacro{\south}%
-    \addtosavedmacro{\east}%
-    \addtosavedmacro{\west}%
-    \addtosavedmacro{\northeast}%
-    \addtosavedmacro{\southwest}%
-    \addtosavedmacro{\southeast}%
-    \addtosavedmacro{\northwest}%
-    %
-    % Calculate the `miter vectors' (i.e. +outer sep).
-    %
-    \pgfextract@process\northmiter{%
-      \pgf@x0pt%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@nowhere%
-        \pgf@y\pgf@yc%
-      \else%
-        \pgf@y\pointerapexmiter\relax%
-      \fi%
-    }%
-    \pgfextract@process\southmiter{%
-      \pgf@x0pt%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@nowhere%
-        \pgf@y-\pgf@yc%
-      \else%
-        \pgf@y-\pointerapexmiter\relax%
-      \fi%
-    }%
-    \pgfextract@process\eastmiter{%
-      \pgf@y0pt%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@nowhere%
-        \pgf@x\pgf@yc%
-      \else%
-        \pgf@x\pointerapexmiter\relax%
-      \fi%
-    }%
-    \pgfextract@process\westmiter{%
-      \pgf@y0pt%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@nowhere%
-        \pgf@x-\pgf@yc%
-      \else%
-        \pgf@x-\pointerapexmiter\relax%
-      \fi%
-    }%
-    \pgfextract@process\northeastmiter{%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@nowhere%
-        \pgf@x\pgf@yc
-        \pgf@y\pgf@yc%
-      \else
-        \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@from%
-          \pgfqpointpolar{\quarterpointerangle}{\fromcornermiter}
-        \else%
-          \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@to%
-            \pgfqpointpolar{\complementquarterpointerangle}{\tocornermiter}%
-          \fi%
-        \fi%
-      \fi%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@from%
-        \pgfqpointpolar{\complementquarterpointerangle}{\fromcornermiter}%
-      \else%
-        \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@to%
-          \pgfqpointpolar{\quarterpointerangle}{\tocornermiter}%
-        \fi%
-      \fi%
-    }%
-    \pgfextract@process\southeastmiter{%
-      \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@nowhere%
-        \pgf@x\pgf@yc%
-        \pgf@y\pgf@yc%
-      \else
-        \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@from%
-          \pgfqpointpolar{-\quarterpointerangle}{\fromcornermiter}
-        \else%
-          \ifx\pgf@lib@sh@signal@east\pgf@lib@sh@signal@to%
-            \pgfqpointpolar{-\complementquarterpointerangle}{\tocornermiter}%
-          \fi%
-        \fi%
-      \fi%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@from%
-        \pgfqpointpolar{-\complementquarterpointerangle}{\fromcornermiter}
-      \else%
-        \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@to%
-          \pgfqpointpolar{-\quarterpointerangle}{\tocornermiter}%
-        \fi%
-      \fi%
-    }%
-    \pgfextract@process\southwestmiter{%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@nowhere%
-        \pgf@x-\pgf@yc
-        \pgf@y-\pgf@yc%
-      \else
-        \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@from%
-          \pgfmathadd@{\quarterpointerangle}{180}%
-          \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\fromcornermiter}
-        \else%
-          \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@to%
-            \pgfmathadd@{\complementquarterpointerangle}{180}%
-            \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\tocornermiter}%
-          \fi%
-        \fi%
-      \fi%
-      \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@from%
-        \pgfmathadd@{\complementquarterpointerangle}{180}%
-        \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\fromcornermiter}%
-      \else%
-        \ifx\pgf@lib@sh@signal@south\pgf@lib@sh@signal@to%
-          \pgfmathadd@{\quarterpointerangle}{180}%
-          \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\tocornermiter}%
-        \fi%
-      \fi%
-    }%
-    \pgfextract@process\northwestmiter{%
-      \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@nowhere%
-        \pgf@x-\pgf@yc%
-        \pgf@y\pgf@yc%
-      \else
-        \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@from%
-          \pgfmathsubtract@{180}{\quarterpointerangle}%
-          \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\fromcornermiter}
-        \else%
-          \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@to%
-            \pgfmathsubtract@{180}{\complementquarterpointerangle}%
-            \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\tocornermiter}%
-          \fi%
-        \fi%
-      \fi%
-      \ifx\pgf@lib@sh@signal@north\pgf@lib@sh@signal@from%
-        \pgfmathsubtract@{180}{\complementquarterpointerangle}%
-        \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\fromcornermiter}%
-      \else%
-        \ifx\pgf@lib@sh@signal@west\pgf@lib@sh@signal@to%
-          \pgfmathsubtract@{180}{\quarterpointerangle}%
-          \expandafter\pgfqpointpolar\expandafter{\pgfmathresult}{\tocornermiter}%
-        \fi%
-      \fi%
-    }%
-    \addtosavedmacro{\northmiter}%
-    \addtosavedmacro{\southmiter}%
-    \addtosavedmacro{\eastmiter}%
-    \addtosavedmacro{\westmiter}%
-    \addtosavedmacro{\northeastmiter}%
-    \addtosavedmacro{\southeastmiter}%
-    \addtosavedmacro{\southwestmiter}%
-    \addtosavedmacro{\northwestmiter}%
-    %
-    % Now calculate the anchor points
-    %
-    \pgfextract@process\anchornorth{%
-      \pgfpointadd{\north}{\northmiter}%
-    }%
-    \pgfextract@process\anchorsouth{%
-      \pgfpointadd{\south}{\southmiter}%
-    }%
-    \pgfextract@process\anchoreast{%
-      \pgfpointadd{\east}{\eastmiter}%
-    }%
-    \pgfextract@process\anchorwest{%
-      \pgfpointadd{\west}{\westmiter}%
-    }%
-    \pgfextract@process\anchornortheast{%
-      \pgfpointadd{\northeast}{\northeastmiter}%
-    }%
-    \pgfextract@process\anchorsoutheast{%
-      \pgfpointadd{\southeast}{\southeastmiter}%
-    }%
-    \pgfextract@process\anchorsouthwest{%
-      \pgfpointadd{\southwest}{\southwestmiter}%
-    }%
-    \pgfextract@process\anchornorthwest{%
-      \pgfpointadd{\northwest}{\northwestmiter}%
-    }%
-    \addtosavedmacro{\anchornorth}%
-    \addtosavedmacro{\anchorsouth}%
-    \addtosavedmacro{\anchoreast}%
-    \addtosavedmacro{\anchorwest}%
-    \addtosavedmacro{\anchornortheast}%
-    \addtosavedmacro{\anchorsouthwest}%
-    \addtosavedmacro{\anchorsoutheast}%
-    \addtosavedmacro{\anchornorthwest}%
-  }%
-  \savedanchor\centerpoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y-.5\dp\pgfnodeparttextbox%
-  }%
-  \savedanchor\basepoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y0pt%
-  }%
-  \savedanchor\midpoint{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@y{+.5ex}%
-  }%
-  \anchor{center}{\centerpoint}%
-  \anchor{base}{\basepoint}%
-  \anchor{base east}{%
-    \installsignalparameters%
-    \anchoreast%
-    \pgf@xa\pgf@x%
-    \pgf@ya\pgf@y%
-    \anchorsoutheast%
-    \ifdim\pgf@xa>\pgf@x%
-      \pgfutil@tempdima\pgf@xa%
-    \else%
-      \pgfutil@tempdima\pgf@x%
-    \fi%
-    \pgfextract@process\externalpoint{%
-      \basepoint%
-      \pgf@x\pgfutil@tempdima%
-    }
-    \basepoint%
-    \let\firstpoint\anchoreast%
-    \ifdim\pgf@y<\pgf@ya%
-      \let\secondpoint\anchorsoutheast%
-    \else%
-      \let\secondpoint\anchornortheast%
-    \fi%
-    \pgfpointintersectionoflines{\basepoint}{\externalpoint}%
-      {\firstpoint}{\secondpoint}%
-  }%
-  \anchor{base west}{%
-    \installsignalparameters%
-    \anchorwest%
-    \pgf@xa\pgf@x%
-    \pgf@ya\pgf@y%
-    \anchorsouthwest%
-    \ifdim\pgf@xa<\pgf@x%
-      \pgfutil@tempdima\pgf@xa%
-    \else%
-      \pgfutil@tempdima\pgf@x%
-    \fi%
-    \pgfextract@process\externalpoint{%
-      \basepoint%
-      \pgf@x\pgfutil@tempdima%
-    }
-    \basepoint%
-    \let\firstpoint\anchorwest%
-    \ifdim\pgf@y<\pgf@ya%
-      \let\secondpoint\anchorsouthwest%
-    \else%
-      \let\secondpoint\anchornorthwest%
-    \fi%
-    \pgfpointintersectionoflines{\basepoint}{\externalpoint}%
-      {\firstpoint}{\secondpoint}%
-  }%
-  \anchor{mid}{\midpoint}%
-  \anchor{mid east}{%
-    \installsignalparameters%
-    \anchoreast%
-    \pgf@xa\pgf@x%
-    \pgf@ya\pgf@y%
-    \anchorsoutheast%
-    \ifdim\pgf@xa>\pgf@x%
-      \pgfutil@tempdima\pgf@xa%
-    \else%
-      \pgfutil@tempdima\pgf@x%
-    \fi%
-    \pgfextract@process\externalpoint{%
-      \midpoint%
-      \pgf@x\pgfutil@tempdima%
-    }
-    \midpoint%
-    \let\firstpoint\anchoreast%
-    \ifdim\pgf@y<\pgf@ya%
-      \let\secondpoint\anchorsoutheast%
-    \else%
-      \let\secondpoint\anchornortheast%
-    \fi%
-    \pgfpointintersectionoflines{\midpoint}{\externalpoint}%
-      {\firstpoint}{\secondpoint}%
-  }%
-  \anchor{mid west}{%
-    \installsignalparameters%
-    \anchorwest%
-    \pgf@xa\pgf@x%
-    \pgf@ya\pgf@y%
-    \anchorsouthwest%
-    \ifdim\pgf@xa<\pgf@x%
-      \pgfutil@tempdima\pgf@xa%
-    \else%
-      \pgfutil@tempdima\pgf@x%
-    \fi%
-    \pgfextract@process\externalpoint{%
-      \midpoint%
-      \pgf@x\pgfutil@tempdima%
-    }
-    \midpoint%
-    \let\firstpoint\anchorwest%
-    \ifdim\pgf@y<\pgf@ya%
-      \let\secondpoint\anchorsouthwest%
-    \else%
-      \let\secondpoint\anchornorthwest%
-    \fi%
-    \pgfpointintersectionoflines{\midpoint}{\externalpoint}%
-      {\firstpoint}{\secondpoint}%
-  }%
-  \anchor{north}{\installsignalparameters\anchornorth}%
-  \anchor{south}{\installsignalparameters\anchorsouth}%
-  \anchor{east}{\installsignalparameters\anchoreast}%
-  \anchor{west}{\installsignalparameters\anchorwest}%
-  \anchor{north east}{\installsignalparameters\anchornortheast}%
-  \anchor{south east}{\installsignalparameters\anchorsoutheast}%
-  \anchor{south west}{\installsignalparameters\anchorsouthwest}%
-  \anchor{north west}{\installsignalparameters\anchornorthwest}%
-  \backgroundpath{%
-    \installsignalparameters%
-    \pgfpathmoveto{\north}%
-    \pgfpathlineto{\northeast}%
-    \pgfpathlineto{\east}%
-    \pgfpathlineto{\southeast}%
-    \pgfpathlineto{\south}%
-    \pgfpathlineto{\southwest}%
-    \pgfpathlineto{\west}%
-    \pgfpathlineto{\northwest}%
-    \pgfpathclose%
-  }%
-  \anchorborder{%
-    %
-    % Save x and y.
-    %
-    \edef\externalx{\the\pgf@x}%
-    \edef\externaly{\the\pgf@y}%
-    %
-    % Adjust the location of the external
-    % point relative to \centerpoint.
-    %
-    \centerpoint%
-    \pgf@xa\externalx\relax%
-    \pgf@ya\externaly\relax%
-    \advance\pgf@xa\pgf@x%
-    \advance\pgf@ya\pgf@y%
-    \edef\externalx{\the\pgf@xa}%
-    \edef\externaly{\the\pgf@ya}%
-    %
-    % Get the shape parameters.
-    %
-    \installsignalparameters%
-    %
-    % Get the angle of the external point to the \centerpoint.
-    %
-    \pgfmathanglebetweenpoints{\centerpoint}{\pgfqpoint{\externalx}{\externaly}}%
-    \let\externalangle\pgfmathresult%
-    %
-    %
-    %
-    \pgfmathanglebetweenpoints{\centerpoint}{\anchorwest}%
-    \ifdim\externalangle pt<\pgfmathresult pt\relax%
-      \pgfmathanglebetweenpoints{\centerpoint}{\anchornorth}%
-      \ifdim\externalangle pt<\pgfmathresult pt\relax%
-        \pgfmathanglebetweenpoints{\centerpoint}{\anchornortheast}%
-        \ifdim\externalangle pt<\pgfmathresult pt\relax%
-          \let\firstpoint\anchoreast%
-          \let\secondpoint\anchornortheast%
-        \else%
-          \let\secondpoint\anchornortheast%
-          \let\firstpoint\anchornorth%
-        \fi%
-      \else%
-        \pgfmathanglebetweenpoints{\centerpoint}{\anchornorthwest}%
-        \ifdim\externalangle pt<\pgfmathresult pt\relax%
-          \let\firstpoint\anchornorth%
-          \let\secondpoint\anchornorthwest%
-        \else%
-          \let\secondpoint\anchornorthwest%
-          \let\firstpoint\anchorwest%
-        \fi%
-      \fi%
-    \else%
-      \pgfmathanglebetweenpoints{\centerpoint}{\anchorsouth}%
-      \ifdim\externalangle pt<\pgfmathresult pt\relax%
-        \pgfmathanglebetweenpoints{\centerpoint}{\anchorsouthwest}%
-        \ifdim\externalangle pt<\pgfmathresult pt\relax%
-          \let\firstpoint\anchorwest%
-          \let\secondpoint\anchorsouthwest%
-        \else%
-          \let\secondpoint\anchorsouthwest%
-          \let\firstpoint\anchorsouth%
-        \fi%
-      \else%
-        \pgfmathanglebetweenpoints{\centerpoint}{\anchorsoutheast}%
-        \ifdim\externalangle pt<\pgfmathresult pt\relax%
-          \let\firstpoint\anchorsouth%
-          \let\secondpoint\anchorsoutheast%
-        \else%
-          \let\secondpoint\anchorsoutheast%
-          \let\firstpoint\anchoreast%
-        \fi%
-      \fi%
-    \fi%
-    %
-    % Now locate the point.
-    %
-    \pgfpointintersectionoflines{\centerpoint}{\pgfqpoint{\externalx}{\externaly}}%
-      {\firstpoint}{\secondpoint}%
-  }%
-}%
-
-
-
-
-
-
-% Keys for shape tape
-%
-% /pgf/tape bend top : Type of bend for north side.
-% /pgf/tape bend bottom : Type of bend for south side.
-% /pgf/tape bend height : The height of the bends.
-\pgfkeys{/pgf/.cd,
-  tape bend top/.initial=in and out,
-  tape bend bottom/.initial=in and out,
-  tape bend/.style={/pgf/tape bend top={#1}, /pgf/tape bend bottom={#1}},
-  tape bend height/.initial=5pt,
-}%
-
-\def\pgf@lib@sh@inandouttext{in and out}%
-\def\pgf@lib@sh@outandintext{out and in}%
-\def\pgf@lib@sh@nonetext{none}%
-
-\pgfdeclareshape{tape}{%
-  \savedmacro\tapedimensions{%
-    \pgfmathsetlength\pgf@x{\pgfkeysvalueof{/pgf/inner xsep}}%
-    \advance\pgf@x.5\wd\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@y{\pgfkeysvalueof{/pgf/inner ysep}}%
-    \advance\pgf@y.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y.5\dp\pgfnodeparttextbox%
-    %
-    \pgfmathsetlengthmacro\outerxsep{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlengthmacro\outerysep{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \addtosavedmacro\outerxsep%
-    \addtosavedmacro\outerysep%
-    %
-    \pgfmathsetlength\pgfutil@tempdima{\pgfkeysvalueof{/pgf/tape bend height}}%
-    \pgfutil@tempdima.5\pgfutil@tempdima%
-    \edef\halfbendheight{\the\pgfutil@tempdima}%
-    \addtosavedmacro\halfbendheight%
-    %
-    \pgfkeysgetvalue{/pgf/tape bend top}{\topbendstyle}%
-    \pgfkeysgetvalue{/pgf/tape bend bottom}{\bottombendstyle}%
-    \addtosavedmacro\topbendstyle%
-    \addtosavedmacro\bottombendstyle%
-    %
-    \ifx\topbendstyle\pgf@lib@sh@nonetext%
-    \else%
-      \advance\pgf@y\pgfutil@tempdima%
-    \fi%
-    \ifx\bottombendstyle\pgf@lib@sh@none%
-    \else%
-      \advance\pgf@y\pgfutil@tempdima%
-    \fi%
-    %
-    \pgfmathsetlength\pgf@xa{\pgfkeysvalueof{/pgf/minimum width}}%
-    \pgfmathsetlength\pgf@ya{\pgfkeysvalueof{/pgf/minimum height}}%
-    \ifdim\pgf@x<.5\pgf@xa%
-      \pgf@x.5\pgf@xa%
-    \fi%
-    \ifdim\pgf@y<.5\pgf@ya%
-      \pgf@y.5\pgf@ya%
-    \fi%
-    \ifx\topbendstyle\pgf@lib@sh@nonetext%
-    \else%
-      \advance\pgf@y-\pgfutil@tempdima%
-    \fi%
-    \ifx\bottombendstyle\pgf@lib@sh@nonetext%
-    \else%
-      \advance\pgf@y-\pgfutil@tempdima%
-    \fi%
-    %
-    \pgfutil@tempdima3.414213\pgfutil@tempdima% 1 / (1-sin(45))
-    \edef\bendyradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\bendyradius%
-    \advance\pgfutil@tempdima\outerysep%
-    \edef\outerbendyradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\outerbendyradius%
-    \advance\pgfutil@tempdima-\outerysep%
-    \advance\pgfutil@tempdima-\outerysep%
-    \edef\innerbendyradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\innerbendyradius%
-    %
-    \pgfutil@tempdima0.707106\pgf@x% cos(45)
-    \edef\bendxradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\bendxradius%
-    \advance\pgfutil@tempdima\outerxsep%
-    \edef\outerbendxradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\outerbendxradius%
-    \advance\pgfutil@tempdima-\outerxsep%
-    \advance\pgfutil@tempdima-\outerxsep%
-    \edef\innerbendxradius{\the\pgfutil@tempdima}%
-    \addtosavedmacro\innerbendxradius%
-    %
-    \edef\halfwidth{\the\pgf@x}%
-    \edef\halfheight{\the\pgf@y}%
-    \addtosavedmacro\halfwidth%
-    \addtosavedmacro\halfheight%
-    %
-    \advance\pgf@x\outerxsep%
-    \edef\outerhalfwidth{\the\pgf@x}%
-    \addtosavedmacro\outerhalfwidth%
-    %
-    \pgf@xc\bendxradius%
-    \pgf@yc\bendyradius%
-    \pgfmathdivide@{\pgfmath@tonumber{\pgf@yc}}{\pgfmath@tonumber{\pgf@xc}}%
-    \pgfmathatan{\pgfmathresult}%
-    \pgf@xc\pgfmathresult pt\relax%
-    \pgf@xc.5\pgf@xc%
-    \edef\halfangle{\pgfmath@tonumber{\pgf@xc}}%
-    \addtosavedmacro\halfangle%
-    %
-    \pgf@xc45pt\relax%
-    \advance\pgf@xc-\halfangle pt%
-    \pgfmathcot@{\pgfmath@tonumber{\pgf@xc}}%
-    \let\cothalfanglein\pgfmathresult%
-    \addtosavedmacro\cothalfanglein%
-    %
-    \pgf@xc90pt\relax%
-    \advance\pgf@xc-\halfangle pt%
-    \pgfmathcot@{\pgfmath@tonumber{\pgf@xc}}%
-    \let\cothalfangleout\pgfmathresult%
-    \addtosavedmacro\cothalfangleout%
-    %
-  }%
-  \savedanchor{\centerpoint}{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y-.5\dp\pgfnodeparttextbox%
-  }%
-    \savedanchor{\midpoint}{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@y{+0.5ex}%
-  }%
-  \savedanchor{\basepoint}{%
-    \pgf@x.5\wd\pgfnodeparttextbox%
-    \pgf@y0pt%
-  }%
-  \anchor{center}{\centerpoint}%
-  \anchor{mid}{\midpoint}%
-  \anchor{mid east}{\tapedimensions\midpoint\advance\pgf@x\outerhalfwidth}%
-  \anchor{mid west}{\tapedimensions\midpoint\advance\pgf@x-\outerhalfwidth}%
-  \anchor{base}{\basepoint}%
-  \anchor{base east}{\tapedimensions\basepoint\advance\pgf@x\outerhalfwidth}%
-  \anchor{base west}{\tapedimensions\basepoint\advance\pgf@x-\outerhalfwidth}%
-  \anchor{north}{%
-    \csname pgf@anchor@tape@north east\endcsname%
-    \pgf@ya\pgf@y%
-    \csname pgf@anchor@tape@north west\endcsname%
-    \advance\pgf@ya\pgf@y%
-    \centerpoint%
-    \pgf@y.5\pgf@ya%
-  }%
-  \anchor{south}{%
-    \csname pgf@anchor@tape@south east\endcsname%
-    \pgf@ya\pgf@y%
-    \csname pgf@anchor@tape@south west\endcsname%
-    \advance\pgf@ya\pgf@y%
-    \centerpoint%
-    \pgf@y.5\pgf@ya%
-  }%
-  \anchor{east}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x\outerhalfwidth%
-  }%
-  \anchor{west}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x-\outerhalfwidth%
-  }%
-  \anchor{north east}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x\outerhalfwidth%
-    \advance\pgf@y\halfheight%
-    \pgf@yc\outerysep%
-    \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-      \advance\pgf@y\halfbendheight%
-      \advance\pgf@y\cothalfangleout\pgf@yc%
-    \else%
-      \ifx\topbendstyle\pgf@lib@sh@outandintext%
-        \advance\pgf@y\halfbendheight%
-        \advance\pgf@y\cothalfanglein\pgf@yc%
-      \else%
-        \advance\pgf@y\pgf@yc%
-      \fi%
-    \fi%
-  }%
-  \anchor{north west}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x-\outerhalfwidth%
-    \advance\pgf@y\halfheight%
-    \pgf@yc\outerysep%
-    \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-      \advance\pgf@y\halfbendheight%
-      \advance\pgf@y\cothalfanglein\pgf@yc%
-    \else%
-      \ifx\topbendstyle\pgf@lib@sh@outandintext%
-        \advance\pgf@y\halfbendheight%
-        \advance\pgf@y\cothalfangleout\pgf@yc%
-      \else%
-        \advance\pgf@y\pgf@yc%
-      \fi%
-    \fi%
-  }%
-  \anchor{south east}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x\outerhalfwidth%
-    \advance\pgf@y-\halfheight%
-    \pgf@yc\outerysep%
-    \ifx\topbendstyle\pgf@lib@sh@outandintext%
-      \advance\pgf@y-\halfbendheight%
-      \advance\pgf@y-\cothalfangleout\pgf@yc%
-    \else%
-      \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-        \advance\pgf@y-\halfbendheight%
-        \advance\pgf@y-\cothalfanglein\pgf@yc%
-      \else%
-        \advance\pgf@y-\pgf@yc%
-      \fi%
-    \fi%
-  }%
-  \anchor{south west}{%
-    \tapedimensions%
-    \centerpoint%
-    \advance\pgf@x-\outerhalfwidth%
-    \advance\pgf@y-\halfheight%
-    \pgf@yc\outerysep%
-    \ifx\topbendstyle\pgf@lib@sh@outandintext%
-      \advance\pgf@y-\halfbendheight%
-      \advance\pgf@y-\cothalfanglein\pgf@yc%
-    \else%
-      \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-        \advance\pgf@y-\halfbendheight%
-        \advance\pgf@y-\cothalfangleout\pgf@yc%
-      \else%
-        \advance\pgf@y-\pgf@yc%
-      \fi%
-    \fi%
-  }%
-  \backgroundpath{%
-    \tapedimensions%
-    %
-    \pgf@xc\halfwidth%
-    \pgf@yc\halfheight%
-    %
-    \pgf@xc\bendxradius%
-    \pgf@yc\bendyradius%
-    {%
-      \pgftransformshift{\centerpoint}%
-      \pgfpathmoveto{\pgfqpoint{-\halfwidth}{0pt}}%
-      \pgfpathlineto{\pgfqpoint{-\halfwidth}{\halfheight}}%
-      \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-        \pgfpathlineto{\pgf@x-\halfwidth\pgf@y\halfheight\advance\pgf@y\halfbendheight}%
-        \pgfpatharc{225}{315}{\bendxradius and \bendyradius}%
-        \pgfpatharc{135}{45}{\bendxradius and \bendyradius}%
-      \else%
-        \ifx\topbendstyle\pgf@lib@sh@outandintext%
-          \pgfpathlineto{\pgf@x-\halfwidth\pgf@y\halfheight\advance\pgf@y\halfbendheight}%
-          \pgfpatharc{135}{45}{\bendxradius and \bendyradius}%
-          \pgfpatharc{225}{315}{\bendxradius and \bendyradius}%
-        \else%
-          \pgfpathlineto{\pgfqpoint{\halfwidth}{\halfheight}}%
-        \fi%
-      \fi%
-      \pgfpathlineto{\pgfqpoint{\halfwidth}{-\halfheight}}%
-      \ifx\bottombendstyle\pgf@lib@sh@inandouttext%
-        \pgfpathlineto{\pgf@x\halfwidth\pgf@y-\halfheight\advance\pgf@y-\halfbendheight}%
-        \pgfpatharc{45}{135}{\bendxradius and \bendyradius}%
-        \pgfpatharc{315}{225}{\bendxradius and \bendyradius}%
-      \else%
-        \ifx\bottombendstyle\pgf@lib@sh@outandintext%
-          \pgfpathlineto{\pgf@x\halfwidth\pgf@y-\halfheight\advance\pgf@y-\halfbendheight}%
-          \pgfpatharc{315}{225}{\bendxradius and \bendyradius}%
-          \pgfpatharc{45}{135}{\bendxradius and \bendyradius}%
-        \else%
-          \pgfpathlineto{\pgfqpoint{-\halfwidth}{-\halfheight}}%
-        \fi%
-      \fi%
-      \pgfpathclose%
-    }%
-  }%
-  \anchorborder{%
-    \pgf@xa\pgf@x%
-    \pgf@ya\pgf@y%
-    \pgfextract@process\externalpoint{%
-      \centerpoint%
-      \advance\pgf@x\pgf@xa%
-      \advance\pgf@y\pgf@ya%
-    }%
-    \pgfmathanglebetweenpoints{\centerpoint}{\externalpoint}%
-    \let\externalangle\pgfmathresult%
-    \tapedimensions%
-    %
-    \pgfmathanglebetweenpoints{\centerpoint}{\csname pgf@anchor@tape@north west\endcsname}%
-    \ifdim\externalangle pt<\pgfmathresult pt%
-      \ifdim\externalangle pt<90pt%
-        \pgfmathanglebetweenpoints{\centerpoint}{\csname pgf@anchor@tape@north east\endcsname}%
-        \ifdim\externalangle pt<\pgfmathresult pt%
-          \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-            {\csname pgf@anchor@tape@north east\endcsname}%
-            {\csname pgf@anchor@tape@south east\endcsname}%
-        \else%
-          % Between north and north east.
-          \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-            % in and out.
-            \pgfmathpointintersectionoflineandarc{\externalpoint}{\centerpoint}%
-            {%
-              \centerpoint%
-              \pgf@xc\halfwidth%
-              \advance\pgf@x.5\pgf@xc%
-              \advance\pgf@y\halfheight%
-              \advance\pgf@y\halfbendheight%
-              \pgf@yc\bendyradius%
-              \advance\pgf@y-.707106\pgf@yc%
-            }%
-            {5}{175}{\outerbendxradius and \outerbendyradius}%
-          \else%
-            \ifx\topbendstyle\pgf@lib@sh@outandintext%
-              % out and in.
-              \pgfmathpointintersectionoflineandarc{\centerpoint}{\externalpoint}%
-              {%
-                \centerpoint%
-                \pgf@xc\halfwidth%
-                \advance\pgf@x.5\pgf@xc%
-                \advance\pgf@y\halfheight%
-                \advance\pgf@y\halfbendheight%
-                \pgf@yc\bendyradius%
-                \advance\pgf@y.707106\pgf@yc%
-              }%
-              {185}{355}{\innerbendxradius and \innerbendyradius}%
-            \else%
-              \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-                {\csname pgf@anchor@tape@north east\endcsname}%
-                {\csname pgf@anchor@tape@north west\endcsname}%
-            \fi%
-          \fi%
-        \fi%
-      \else%
-        % Between north and north west.
-        \ifx\topbendstyle\pgf@lib@sh@inandouttext%
-          % in and out.
-          \pgfmathpointintersectionoflineandarc{\centerpoint}{\externalpoint}%
-            {%
-              \centerpoint%
-              \pgf@xc\halfwidth%
-              \advance\pgf@x-.5\pgf@xc%
-              \advance\pgf@y\halfheight%
-              \advance\pgf@y\halfbendheight%
-              \pgf@yc\bendyradius%
-              \advance\pgf@y.707106\pgf@yc%
-            }%
-            {185}{355}{\innerbendxradius and \innerbendyradius}%
-        \else%
-          \ifx\topbendstyle\pgf@lib@sh@outandintext%
-            % out and in.
-            \pgfmathpointintersectionoflineandarc{\externalpoint}{\centerpoint}%
-            {%
-              \centerpoint%
-              \pgf@xc\halfwidth%
-              \advance\pgf@x-.5\pgf@xc%
-              \advance\pgf@y\halfheight%
-              \advance\pgf@y\halfbendheight%
-              \pgf@yc\bendyradius%
-              \advance\pgf@y-.707106\pgf@yc%
-            }%
-            {5}{175}{\outerbendxradius and \outerbendyradius}%
-          \else%
-            \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-              {\csname pgf@anchor@tape@north east\endcsname}%
-              {\csname pgf@anchor@tape@north west\endcsname}%
-          \fi%
-        \fi%
-      \fi%
-    \else%
-      \pgfmathanglebetweenpoints{\centerpoint}{\csname pgf@anchor@tape@south west\endcsname}%
-        \ifdim\externalangle pt>\pgfmathresult pt%
-        \ifdim\externalangle pt>270pt%
-          \pgfmathanglebetweenpoints{\centerpoint}{\csname pgf@anchor@tape@south east\endcsname}%
-          \ifdim\externalangle pt>\pgfmathresult pt%
-            \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-              {\csname pgf@anchor@tape@north east\endcsname}%
-              {\csname pgf@anchor@tape@south east\endcsname}%
-          \else%
-            % Between south and south east.
-            \ifx\bottombendstyle\pgf@lib@sh@inandouttext%
-              % in and out.
-              \pgfmathpointintersectionoflineandarc{\centerpoint}{\externalpoint}%
-              {%
-                \centerpoint%
-                \pgf@xc\halfwidth%
-                \advance\pgf@x.5\pgf@xc%
-                \advance\pgf@y-\halfheight%
-                \advance\pgf@y-\halfbendheight%
-                \pgf@yc\bendyradius%
-                \advance\pgf@y-.707106\pgf@yc%
-              }%
-              {5}{175}{\innerbendxradius and \innerbendyradius}%
-            \else%
-              \ifx\bottombendstyle\pgf@lib@sh@outandintext%
-                % out and in.
-                \pgfmathpointintersectionoflineandarc{\externalpoint}{\centerpoint}%
-              {%
-                \centerpoint%
-                \pgf@xc\halfwidth%
-                \advance\pgf@x.5\pgf@xc%
-                \advance\pgf@y-\halfheight%
-                \advance\pgf@y-\halfbendheight%
-                \pgf@yc\bendyradius%
-                \advance\pgf@y.707106\pgf@yc%
-              }%
-              {185}{355}{\outerbendxradius and \outerbendyradius}%
-              \else%
-                \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-                  {\csname pgf@anchor@tape@south east\endcsname}%
-                  {\csname pgf@anchor@tape@south west\endcsname}%
-              \fi%
-            \fi%
-          \fi%
-        \else%
-          % Between south and south west.
-          \ifx\bottombendstyle\pgf@lib@sh@inandouttext%
-            % in and out.
-            \pgfmathpointintersectionoflineandarc{\externalpoint}{\centerpoint}%
-              {%
-                \centerpoint%
-                \pgf@xc\halfwidth%
-                \advance\pgf@x-.5\pgf@xc%
-                \advance\pgf@y-\halfheight%
-                \advance\pgf@y-\halfbendheight%
-                \pgf@yc\bendyradius%
-                \advance\pgf@y.707106\pgf@yc%
-              }%
-              {185}{355}{\outerbendxradius and \outerbendyradius}%
-          \else%
-            \ifx\bottombendstyle\pgf@lib@sh@outandintext%
-              % out and in.
-              \pgfmathpointintersectionoflineandarc{\centerpoint}{\externalpoint}%
-              {%
-                \centerpoint%
-                \pgf@xc\halfwidth%
-                \advance\pgf@x-.5\pgf@xc%
-                \advance\pgf@y-\halfheight%
-                \advance\pgf@y-\halfbendheight%
-                \pgf@yc\bendyradius%
-                \advance\pgf@y-.707106\pgf@yc%
-              }%
-              {5}{175}{\innerbendxradius and \innerbendyradius}%
-            \else%
-              \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-                {\csname pgf@anchor@tape@south east\endcsname}%
-                {\csname pgf@anchor@tape@south west\endcsname}%
-            \fi%
-          \fi%
-        \fi%
-      \else%
-        \pgfpointintersectionoflines{\externalpoint}{\centerpoint}%
-          {\csname pgf@anchor@tape@north west\endcsname}%
-          {\csname pgf@anchor@tape@south west\endcsname}%
-      \fi%
-    \fi%
-  }%
-}%
-
-
-
-
-% Keys for magnifying glass shape
-%
-% /pgf/magnifying glass handle angle  : The angle of handle
-% /pgf/magnifying glass handle aspect : The length of the handle as a multiple
-%                               of the radius of the circle
-%
-
-\pgfkeys{/pgf/.cd,
-  magnifying glass handle angle/.initial=-45,
-  magnifying glass handle aspect/.initial=1.5,
-}%
-
-\pgfdeclareshape{magnifying glass}
-{%
-  \inheritsavedanchors[from=circle]% this is nearly a circle
-  \inheritanchorborder[from=circle]%
-  \inheritanchor[from=circle]{north}%
-  \inheritanchor[from=circle]{north west}%
-  \inheritanchor[from=circle]{north east}%
-  \inheritanchor[from=circle]{center}%
-  \inheritanchor[from=circle]{west}%
-  \inheritanchor[from=circle]{east}%
-  \inheritanchor[from=circle]{mid}%
-  \inheritanchor[from=circle]{mid west}%
-  \inheritanchor[from=circle]{mid east}%
-  \inheritanchor[from=circle]{base}%
-  \inheritanchor[from=circle]{base west}%
-  \inheritanchor[from=circle]{base east}%
-  \inheritanchor[from=circle]{south}%
-  \inheritanchor[from=circle]{south west}%
-  \inheritanchor[from=circle]{south east}%
-  \inheritbackgroundpath[from=circle]%
-  \foregroundpath{
-    \centerpoint%
-    \pgf@xc=\pgf@x%
-    \pgf@yc=\pgf@y%
-    \pgfutil@tempdima=\radius%
-    \pgfmathsetlength{\pgf@xb}{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength{\pgf@yb}{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@xb<\pgf@yb%
-      \advance\pgfutil@tempdima by-\pgf@yb%
-    \else%
-      \advance\pgfutil@tempdima by-\pgf@xb%
-    \fi%
-    \pgfpathmoveto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}
-      {\pgfpointpolar{\pgfkeysvalueof{/pgf/magnifying glass handle angle}}{\pgfutil@tempdima}}}
-    \pgfpathlineto{\pgfpointadd{\pgfqpoint{\pgf@xc}{\pgf@yc}}
-      {\pgfpointpolar{\pgfkeysvalueof{/pgf/magnifying glass handle angle}}{\pgfutil@tempdima+\pgfutil@tempdima*(\pgfkeysvalueof{/pgf/magnifying glass handle aspect})}}}
-    \pgfsetarrowsstart{}
-    \pgfsetarrowsend{}
-  }%
-}%
-
-
-\pgfkeys{%
-  /pgf/magnetic tape tail/.initial=0.15,
-  /pgf/magnetic tape tail extend/.initial=0cm,
-}%
-\pgfdeclareshape{magnetic tape}{%
-  \nodeparts{text}%
-  \savedmacro\installparameters{%
-    %
-    \pgf@x=0.5\wd\pgfnodeparttextbox%
-    \pgf@y=0.5\ht\pgfnodeparttextbox%
-    \advance\pgf@y by-0.5\dp\pgfnodeparttextbox%
-    \edef\centerpoint{\noexpand\pgfqpoint{\the\pgf@x}{\the\pgf@y}}%
-    %
-    \pgf@x=\wd\pgfnodeparttextbox%
-    \pgf@y=\ht\pgfnodeparttextbox%
-    \advance\pgf@y by\dp\pgfnodeparttextbox%
-    \pgfmathsetlength\pgf@xa{\pgfkeysvalueof{/pgf/inner xsep}}%
-    \pgfmathsetlength\pgf@ya{\pgfkeysvalueof{/pgf/inner ysep}}%
-    \advance\pgf@x by2.0\pgf@xa%
-    \advance\pgf@y by2.0\pgf@ya%
-    \ifdim\pgf@y>\pgf@x%
-      \pgf@x=\pgf@y%
-    \fi%
-    \pgf@x=1.414213\pgf@x%
-    \pgfmathsetlength\pgf@xa{\pgfkeysvalueof{/pgf/minimum width}}%
-    \pgfmathsetlength\pgf@ya{\pgfkeysvalueof{/pgf/minimum height}}%
-    \ifdim\pgf@x<\pgf@xa%
-      \pgf@x=\pgf@xa%
-    \fi%
-    \ifdim\pgf@x<\pgf@ya%
-      \pgf@x=\pgf@ya%
-    \fi%
-    \pgf@x=0.5\pgf@x%
-    \edef\radius{\the\pgf@x}%
-    %
-    \pgfmathparse{max(\pgfkeysvalueof{/pgf/magnetic tape tail extend},0)}%
-    \edef\tailextend{\pgfmathresult pt}%
-    %
-    \pgfmathparse{min(max(\pgfkeysvalueof{/pgf/magnetic tape tail},0),1)}%
-    \pgf@xa=\pgfmathresult\pgf@x%
-    \edef\tailheight{\the\pgf@xa}%
-    %
-    \pgfmathsetlength\pgf@xa{\pgfkeysvalueof{/pgf/outer xsep}}%
-    \pgfmathsetlength\pgf@ya{\pgfkeysvalueof{/pgf/outer ysep}}%
-    \ifdim\pgf@xa<\pgf@ya%
-      \pgf@xa=\pgf@ya%
-    \fi%
-    \edef\outersep{\the\pgf@xa}%
-    %
-    \pgfmathparse{\outersep+\radius}%
-    \edef\outerradius{\pgfmathresult pt}%
-    %
-    \pgfmathparse{(\radius-\tailheight)/\radius}%
-    \pgfmathasin@{\pgfmathresult}%
-    \pgfmathadd@{-\pgfmathresult}{360}%
-    \let\tailangle=\pgfmathresult%
-    %
-    \pgfmathparse{\outerradius/(\outerradius+\tailextend)}%
-    \pgfmathatan@{\pgfmathresult}%
-    \pgfmathadd@{-\pgfmathresult}{360}%
-    \let\tailbottomangle=\pgfmathresult%
-    %
-    \pgfmathparse{(\outerradius-\outersep-\tailheight-\outersep)/(\outerradius+\tailextend)}%
-    \pgfmathatan@{\pgfmathresult}%
-    \pgfmathadd@{-\pgfmathresult}{360}%
-    \let\tailtopangle=\pgfmathresult%
-    %
-    \addtosavedmacro\radius%
-    \addtosavedmacro\outerradius%
-    \addtosavedmacro\outersep%
-    \addtosavedmacro\tailheight%
-    \addtosavedmacro\tailextend
-    \addtosavedmacro\tailangle%
-    \addtosavedmacro\tailtopangle%
-    \addtosavedmacro\tailbottomangle%
-    \addtosavedmacro\centerpoint%
-  }%
-  \savedanchor{\base}{\pgfqpoint{0.5\wd\pgfnodeparttextbox}{0pt}}%
-  \savedanchor{\mid}{\pgfqpoint{0.5\wd\pgfnodeparttextbox}{0pt}\pgfmathsetlength\pgf@y{.5ex}}%
-  \anchor{center}{\installparameters\centerpoint}%  \addtosavedmacro\outerradius%
-  \anchor{base}{\base}%
-  \anchor{mid}{\mid}%
-  \anchor{base west}{\installparameters\pgfpointadd{\base}{\pgfqpoint{-\outerradius}{0pt}}}%
-  \anchor{base east}{\installparameters\pgfpointadd{\base}{\pgfqpoint{\outerradius}{0pt}}}%
-  \anchor{mid west}{\installparameters\pgfpointadd{\mid}{\pgfqpoint{-\outerradius}{0pt}}}%
-  \anchor{mid east}{\installparameters\pgfpointadd{\mid}{\pgfqpoint{\outerradius}{0pt}}}%
-  \anchor{north}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpoint{0pt}{\outerradius}}}%
-  \anchor{north east}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpointpolar{45}{\outerradius}}}%
-  \anchor{south}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpoint{0pt}{-\outerradius}}}%
-  \anchor{south east}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpoint{\outerradius}{-\outerradius}}}%
-  \anchor{east}{\installparameters%
-      \pgfpointadd{\centerpoint}{\pgfqpoint{\outerradius}{0pt}}}%
-  \anchor{south west}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpointpolar{225}{\outerradius}}}%
-  \anchor{west}{\installparameters%
-    \pgfpointadd{\centerpoint}{\pgfqpoint{-\outerradius}{0pt}}}%
-  \anchor{north west}{\installparameters%
-      \pgfpointadd{\centerpoint}{\pgfqpointpolar{135}{\outerradius}}}%
-  \anchor{tail east}{\installparameters%
-        \pgfpointadd{\centerpoint}{\pgfpoint{\radius+\tailextend+\outersep}{-\outerradius+\outersep+\tailheight/2}}}%
-  \anchor{tail south east}{\installparameters%
-          \pgfpointadd{\centerpoint}{\pgfpoint{\radius+\tailextend+\outersep}{-\outerradius}}}%
-  \anchor{tail north east}{\installparameters%
-            \pgfpointadd{\centerpoint}{\pgfpoint{\radius+\tailextend+\outersep}{-\outerradius+\outersep+\tailheight+\outersep}}}%
-  \backgroundpath{
-  %
-    \installparameters%
-    {%
-    \pgftransformshift{\centerpoint}%
-    \pgfpathmoveto{\pgfpointpolar{\tailangle}{\radius}}%
-    \pgfpatharc{\tailangle}{360}{\radius}%
-    \pgfpatharc{0}{270}{\radius}%
-    \pgfpathlineto{\pgfpoint{\radius+\tailextend}{-\radius}}%
-    \pgfpathlineto{\pgfpoint{\radius+\tailextend}{-\radius+\tailheight}}%
-    \pgfpathclose%
-    }%
-  }%
-  \anchorborder{%
-    \pgfextract@process\externalpoint{}%
-    \installparameters%
-    \pgfmathanglebetweenpoints{\pgfpointorigin}{\externalpoint}
-    \ifdim\pgfmathresult pt<270pt\relax%
-      \pgfpointadd{\centerpoint}{%
-        \pgfpointborderellipse%
-          {\externalpoint}%
-          {\pgfqpoint{\outerradius}{\outerradius}}%
-      }%
-    \else%
-      \ifdim\pgfmathresult pt<\tailbottomangle pt\relax%
-        \pgfpointadd{\centerpoint}{%
-          \pgfpointintersectionoflines%
-            {\externalpoint}{\pgfpointorigin}%
-            {\pgfqpoint{0pt}{-\outerradius}}{\pgfqpoint{\outerradius}{-\outerradius}}%
-        }%
-      \else%
-        \ifdim\pgfmathresult pt<\tailtopangle pt\relax%
-          \pgfpointadd{\centerpoint}{%
-            \pgfpointintersectionoflines%
-              {\externalpoint}{\pgfpointorigin}%
-              {\pgfqpoint{\outerradius}{\outerradius}}{\pgfqpoint{\outerradius}{-\outerradius}}%
-          }%
-        \else%
-          \pgfpointadd{\centerpoint}{%
-            \pgfpointborderellipse%
-              {\externalpoint}%
-              {\pgfqpoint{\outerradius}{\outerradius}}%
-            }%
-        \fi%
-      \fi%
-    \fi%
-  }%
-}%
-
-% Local Variables:
-% tab-width: 2
-% End: