From 04a585df0c1efc659651ea6535edbb43558c83ca Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Fri, 4 Feb 2022 22:19:22 +0000
Subject: sankey (4feb22)

git-svn-id: svn://tug.org/texlive/trunk@61874 c570f23f-e606-0410-a88d-b1316a301751
---
 .../tex/latex/sankey/tikzlibrarydubins.code.tex    | 24 ++--------------------
 1 file changed, 2 insertions(+), 22 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/sankey/tikzlibrarydubins.code.tex')

diff --git a/Master/texmf-dist/tex/latex/sankey/tikzlibrarydubins.code.tex b/Master/texmf-dist/tex/latex/sankey/tikzlibrarydubins.code.tex
index 291bcd771fe..4526f1b937d 100644
--- a/Master/texmf-dist/tex/latex/sankey/tikzlibrarydubins.code.tex
+++ b/Master/texmf-dist/tex/latex/sankey/tikzlibrarydubins.code.tex
@@ -30,32 +30,27 @@
 %% sankey-example3-variation.tex, sankey-example4.tex,
 %% sankey-example-energy.tex
 %% 
-\def\tikzlibrarydubins@version{v3.0}
-\def\tikzlibrarydubins@date{2021/03/14}
-
+\def\tikzlibrarydubins@version{v3.0.1}
+\def\tikzlibrarydubins@date{2022/02/04}
 \usetikzlibrary{calc}
 \RequirePackage{etoolbox}
 \RequirePackage{xfp}
 
 \newbool{dubinspathreverse}
-
 \def\ifpgfmathcond#1{%
   \pgfmathparse{(#1)?1:0}%
   \ifnumequal{\pgfmathresult}{1}%
 }
-
 \def\dbp@getxy#1#2#3{%
   \tikz@scan@one@point\pgfutil@firstofone(#3)\relax%
   \edef#1{\the\pgf@x}%
   \edef#2{\the\pgf@y}%
 }
-
 \def\dbp@anglebetween#1#2#3{%macro, s, t
   \dbp@getxy\dbp@ax\dbp@ay{#2}
   \dbp@getxy\dbp@bx\dbp@by{#3}
   \pgfmathsetmacro#1{atan2(\dbp@by-\dbp@ay,\dbp@bx-\dbp@ax)}
 }
-
 \def\dbp@distancebetween#1#2#3{%macro, s, t
   \dbp@getxy\dbp@ax\dbp@ay{#2}
   \dbp@getxy\dbp@bx\dbp@by{#3}
@@ -64,7 +59,6 @@
       +(\dbp@by-\dbp@ay)*(\dbp@by-\dbp@ay)%
       )}}%
 }
-
 \newcommand\dbp@rsr{% s, sa, t, ta, as, len, at, r
   let
   \p{tr}=([shift={(\dbp@angb-90:\dbp@radius pt)}]\dbp@b),
@@ -76,7 +70,6 @@
   -- ([shift={(\p{tr})}]\n3:\dbp@rradius pt)
   arc(\n3:\n2:\dbp@rradius pt)
 }
-
 \newcommand\dbp@lsl{% s, sa, t, ta, as, len, at, r
   let
   \p{tl}=([shift={(\dbp@angb+90:\dbp@radius pt)}]\dbp@b),
@@ -87,7 +80,6 @@
   -- ([shift={(\p{tl})}]\n4:\dbp@lradius pt)
   arc(\n4:\n3:\dbp@lradius pt)
 }
-
 \newcommand\dbp@rsl{% s, sa, t, ta, as, len, at, r
   let
   \p{tl}=([shift={(\dbp@angb+90:\dbp@radius pt)}]\dbp@b),
@@ -98,7 +90,6 @@
   -- ([shift={(\p{tl})}]\n4:\dbp@lradius pt)
   arc(\n4:\n3:\dbp@lradius pt)
 }
-
 \newcommand\dbp@lsr{% s, sa, t, ta, as, len, at, r
   let
   \p{tr}=([shift={(\dbp@angb-90:\dbp@radius pt)}]\dbp@b),
@@ -109,7 +100,6 @@
   -- ([shift={(\p{tr})}]\n4:\dbp@rradius pt)
   arc(\n4:\n3:\dbp@rradius pt)
 }
-
 \newcommand\dbp@lrl{% s, sa, t, ta, as, ai, at, r
   let
   \n1={\dbp@anga-90},\n2={\n1+\dbp@firstangle},
@@ -119,7 +109,6 @@
   arc(\n2+180:\n2+180-\dbp@midparam:\dbp@rradius pt)
   arc(\n4:\n3:\dbp@lradius pt)
 }
-
 \newcommand\dbp@rlr{% s, sa, t, ta, as, ai, at, r
   let
   \n1={\dbp@anga+90},\n2={\n1-\dbp@firstangle},
@@ -135,7 +124,6 @@
 \newcommand\dbp@rev@rsl{\dbp@rsl}
 \newcommand\dbp@rev@lrl{\dbp@rlr}
 \newcommand\dbp@rev@rlr{\dbp@lrl}
-
 \newcommand\dubinspath[1]{%
   \pgfextra{
     \dubinspathset{#1}
@@ -163,9 +151,6 @@
   }
   \csname dbp@\dbp@method\endcsname%
 }
-
-%% solution
-
 \def\dbp@store#1#2{%
   \expandafter\xdef\csname dbp@store@#1@#2\endcsname%
   {\csname dbp@#2\endcsname}%
@@ -173,7 +158,6 @@
 \def\dbp@get#1#2{%
   \csname dbp@store@#1@#2\endcsname%
 }
-
 \def\dbp@setparams#1#2#3#4#5{%
   % method, length, fisrt angle, middle param, last angle
   \edef\dbp@method{#1}
@@ -187,13 +171,11 @@
     }
   }{}
 }
-
 \def\dbp@updateparams#1#2#3#4#5{
   \ifpgfmathcond{#2<\dbp@length}{
     \dbp@setparams{#1}{#2}{#3}{#4}{#5}
   }{}
 }
-
 \tikzset{
   dubins path/.is family,
   dubins path,
@@ -224,9 +206,7 @@
   middle param/.store in=\dbp@midparam,
   reverse/.is if=dubinspathreverse,
 }
-
 \newcommand\dubinspathset[1]{\tikzset{dubins path,#1}}
-
 \newcommand\dubinspathcalc[1]{%
   \begingroup
   \dubinspathset{#1}
-- 
cgit v1.2.3

