texlive[59906] Master/texmf-dist: strands (12jul21)

commits+karl at tug.org commits+karl at tug.org
Mon Jul 12 22:14:47 CEST 2021


Revision: 59906
          http://tug.org/svn/texlive?view=revision&revision=59906
Author:   karl
Date:     2021-07-12 22:14:47 +0200 (Mon, 12 Jul 2021)
Log Message:
-----------
strands (12jul21)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/latex/strands/README.md
    trunk/Master/texmf-dist/doc/latex/strands/strands.pdf
    trunk/Master/texmf-dist/source/latex/strands/strands.dtx
    trunk/Master/texmf-dist/source/latex/strands/strands.ins
    trunk/Master/texmf-dist/tex/latex/strands/strands.sty

Modified: trunk/Master/texmf-dist/doc/latex/strands/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/strands/README.md	2021-07-12 20:14:34 UTC (rev 59905)
+++ trunk/Master/texmf-dist/doc/latex/strands/README.md	2021-07-12 20:14:47 UTC (rev 59906)
@@ -1,15 +1,17 @@
-%
 % Copyright (C) 2021 by Diego Arcis <arcisd at gmail.com>
-% ---------------------------------------------------------------------------
-% This work may be distributed and/or modified under the
-% conditions of the LaTeX Project Public License, either version 1.3
-% of this license or (at your option) any later version.
-% The latest version of this license is in
-%   http://www.latex-project.org/lppl.txt
-% and version 1.3 or later is part of all distributions of LaTeX
-% version 2005/12/01 or later.
+% --------------------------------------------------------------------
+% This work may be distributed and/or modified under the conditions of
+% the LaTeX Project Public License, either version 1.3 of this license
+% or (at your option) any later version.
 %
-% This work has the LPPL maintenance status `maintained'.
+% The latest version of this license is in:
+% 	http://www.latex-project.org/lppl.txt
 %
+% and version 1.3 or later is part of all distributions of LaTeX, that
+% is, version 2005/12/01 or later.
+%
 % The Current Maintainer of this work is Diego Arcis.
-%
\ No newline at end of file
+%
+% This work consists of the files strands.dtx and strands.ins and they
+% derive the filebase strands.sty.
+% --------------------------------------------------------------------
\ No newline at end of file

Modified: trunk/Master/texmf-dist/doc/latex/strands/strands.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/source/latex/strands/strands.dtx
===================================================================
--- trunk/Master/texmf-dist/source/latex/strands/strands.dtx	2021-07-12 20:14:34 UTC (rev 59905)
+++ trunk/Master/texmf-dist/source/latex/strands/strands.dtx	2021-07-12 20:14:47 UTC (rev 59906)
@@ -1,44 +1,37 @@
 % \iffalse meta-comment
 %
 % Copyright (C) 2021 by Diego Arcis <arcisd at gmail.com>
-% ---------------------------------------------------------------------------
-% This work may be distributed and/or modified under the
-% conditions of the LaTeX Project Public License, either version 1.3
-% of this license or (at your option) any later version.
-% The latest version of this license is in
-%   http://www.latex-project.org/lppl.txt
-% and version 1.3 or later is part of all distributions of LaTeX
-% version 2005/12/01 or later.
+% --------------------------------------------------------------------
+% This work may be distributed and/or modified under the conditions of
+% the LaTeX Project Public License, either version 1.3 of this license
+% or (at your option) any later version.
 %
-% This work has the LPPL maintenance status `maintained'.
+% The latest version of this license is in:
+% 	http://www.latex-project.org/lppl.txt
 %
+% and version 1.3 or later is part of all distributions of LaTeX, that
+% is, version 2005/12/01 or later.
+%
 % The Current Maintainer of this work is Diego Arcis.
 %
-% This work consists of the files strands.dtx and strands.ins
-% and the derived filebase strands.sty.
+% This work consists of the files strands.dtx and strands.ins and they
+% derive the filebase strands.sty.
+% --------------------------------------------------------------------
 %
 % \fi
 %
 % \iffalse
-%<*driver>
-\ProvidesFile{strands.dtx}
-%</driver>
-%<package>\NeedsTeXFormat{LaTeX2e}[1999/12/01]
-%<package>\ProvidesPackage{strands}
-%<*package>
-    [<+date+> <+version+> <+description+>]
-%</package>
+%<package>\NeedsTeXFormat{LaTeX2e}[2005/12/01]
+%<package>\ProvidesPackage{strands}[2021/07/11 v1.1 Strands]
 %
 %<*driver>
 \documentclass{ltxdoc}
-\usepackage{strands}[<+date+>]
+\usepackage{strands}
 \EnableCrossrefs
 \CodelineIndex
 \RecordChanges
 \begin{document}
-  \DocInput{strands.dtx}
-  \PrintChanges
-  \PrintIndex
+	\DocInput{strands.dtx}
 \end{document}
 %</driver>
 % \fi
@@ -62,93 +55,25 @@
 %   Right brace   \}     Tilde         \~}
 %
 %
-% \changes{<+version+>}{<+date+>}{Converted to DTX file}
+% \changes{v1.1}{2021/07/11}{Initial version}
 %
-% \DoNotIndex{\newcommand,\newenvironment}
+% \GetFileInfo{strands.sty}
 %
-% \providecommand*{\url}{\texttt}
-% \GetFileInfo{strands.dtx}
-% \title{The \textsf{strands} package}
-% \author{Diego Arcis \\ \url{arcisd at gmail.com}}
-% \date{\fileversion~from \filedate}
+% \DoNotIndex{\#,\$,\%,\&,\@,\\,\{,\},\^,\_,\~,\}
+% \DoNotIndex{\@ne}
+% \DoNotIndex{\advance,\begingroup,\catcode,\closein}
+% \DoNotIndex{\closeout,\day,\def,\edef,\else,\empty,\endgroup}
 %
+% \title{The \textsf{strands} package
+%   \thanks{This document corresponds to \textsf{strands}~\fileversion, dated~\filedate.}
+% }
+% \author{Diego Arcis \\ \texttt{arcisd at gmail.com}}
+%
 % \maketitle
 %
-% \section{Introduction}
-%
-% Put text here.
-%
-% \section{Usage}
-%
-% Put text here.
-%
-%
-% \DescribeMacro{\getelem}
-%
-%
-% \DescribeMacro{\decoratestrands}
-%
-%
-% \DescribeMacro{\vvpartition}
-%
-%
-% \DescribeMacro{\vpartition}
-%
-%
-% \DescribeMacro{\arcpartition}
-%
-%
-% \DescribeMacro{\permutation}
-%
-%
-% \DescribeMacro{\tiedpair}
-%
-%
-% \DescribeMacro{\tie}
-%
-%
-% \DescribeMacro{\bbackstrands}
-%
-%
-% \DescribeMacro{\lleftstrand}
-%
-%
-% \DescribeMacro{\rrightstrand}
-%
-%
-% \DescribeMacro{\ccrossback}
-%
-%
-% \DescribeMacro{\bbraidgen}
-%
-%
-% \DescribeMacro{\ttanglegen}
-%
-%
-% \DescribeMacro{\aaddgen}
-%
-%
-% \DescribeMacro{\sstrands}
-%
-%
-% \DescribeMacro{\strands}
-%
+% \StopEventually{\PrintIndex}
 
-%
-% \StopEventually{}
-%
-% \section{Implementation}
-%
-% \iffalse
-%<*package>
-% \fi
-%
-%    \begin{macrocode}
-\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{strands}[Diego Arcis 2021/07/05 Strands v1.0]
-%    \end{macrocode}
 % packages:
-%    \begin{macrocode}
 \RequirePackage{forarray}
 \RequirePackage{ifthen}
 \RequirePackage{tikz}
@@ -155,19 +80,14 @@
 \RequirePackage{xfp}
 \RequirePackage{xstring}
 \RequirePackage{xkeyval}
+
 \usetikzlibrary{snakes}
-%    \end{macrocode}
-%
-% \begin{macro}{\getelem}
-%    \begin{macrocode}
+
 \newcommand{\getelem}[3]{ % \getelem{list}{index}{\name}
 	\StrBetween[#2,\fpeval{#2+1}]{,#1,}{,}{,}[#3]
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % global variables:
-%    \begin{macrocode}
 \makeatletter
 \define at cmdkey[str]{strands}{backcolor}{}
 \define at cmdkey[str]{strands}{bend}{}
@@ -215,9 +135,8 @@
 \define at cmdkey[str]{strands}{timeswidth}{}
 \define at cmdkey[str]{strands}{tkzpic}{}
 \define at cmdkey[str]{strands}{width}{}
-%    \end{macrocode}
+
 % default options:
-%    \begin{macrocode}
 \presetkeys[str]{strands}{
 	backcolor=white, % color of the paper.
 	bend=45, % bend of partitions.
@@ -266,10 +185,10 @@
 	tkzpic=1,
 	width=0.6, % to set the width between strands.
 }{}
+
 \setkeys[str]{strands}{}
-%    \end{macrocode}
+
 % declare custom options:
-%    \begin{macrocode}
 \DeclareOptionX{backcolor}{\renewcommand{\cmdstr at strands@backcolor}{#1}}
 \DeclareOptionX{bend}{\renewcommand{\cmdstr at strands@bend}{#1}}
 \DeclareOptionX{bendbraid}{\renewcommand{\cmdstr at strands@bendbraid}{#1}}
@@ -312,14 +231,14 @@
 \DeclareOptionX{width}{\renewcommand{\cmdstr at strands@width}{#1}}
 \DeclareOptionX*{\PackageWarning{strands}{`\CurrentOption' ignored}} % ignore unknown options.
 \ProcessOptionsX\relax
+
 \ifnum\cmdstr at strands@externalize=1
 	\usetikzlibrary{external}
 	\tikzexternalize[optimize=false,prefix=strpack]
 \fi
-%    \end{macrocode}
+
 % \decoratestrands - macro to add bullets and labels to picture.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{decor}{bulla}{}
 \define at cmdkey[str]{decor}{bullb}{}
@@ -332,6 +251,7 @@
 \define at cmdkey[str]{decor}{nstr}{}
 \define at cmdkey[str]{decor}{type}{}
 \define at cmdkey[str]{decor}{width}{}
+
 \presetkeys[str]{decor}{
 	bulla=1,
 	bullb=1,
@@ -345,10 +265,7 @@
 	type=3,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\decoratestrands}
-%    \begin{macrocode}
+
 \newcommand{\decoratestrands}[1][]{
 	\setkeys[str]{decor}{#1} % set variables.
 	\foreach\ind in{0,...,\fpeval{\cmdstr at decor@nstr-1}}{
@@ -360,9 +277,7 @@
 			\filldraw(\fpeval{\ind*\cmdstr at decor@width},
 			\fpeval{\cmdstr at decor@floor*\cmdstr at decor@height})circle(\cmdstr at decor@bulletends);
 		\fi
-%    \end{macrocode}
-% classic labels.
-%    \begin{macrocode}
+		% classic labels.
 		\ifnum \cmdstr at decor@type<5;
 			\ifnum \cmdstr at decor@type>0 % labels above from 1 to n.
 				\node[scale=\cmdstr at decor@font]at
@@ -381,9 +296,7 @@
 					\fpeval{\ind+1}'
 				}\fi}\fi}\fi$};
 		\fi
-%    \end{macrocode}
-% signed labels (n must be even).
-%    \begin{macrocode}
+		% signed labels (n must be even).
 		\ifnum \cmdstr at decor@type=5
 			\ifnum\ind<\fpeval{\cmdstr at decor@nstr/2} % labels from -2n to 2n.
 				\node[scale=\cmdstr at decor@font]at
@@ -406,15 +319,13 @@
 		\fi
 	}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \vpartition  - macro to draw set partitions in the partition monoid.
-%
+
 % Example: the set partition {1,2}{3,-4}{4,-3} of [2*4] is drawn as follows: 
-%
+
 % \vpartition[<options>]{{1,2},{3,-4},{4,-3}}
-%
+
 %  1   2   3   4
 %  |   |   |   |
 %  -----    - -
@@ -422,8 +333,7 @@
 %           - -
 %          |   |
 %  5   6   7   8
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{vvpart}{bend}{}
 \define at cmdkey[str]{vvpart}{bulla}{}
@@ -442,6 +352,7 @@
 \define at cmdkey[str]{vvpart}{strwidth}{}
 \define at cmdkey[str]{vvpart}{type}{}
 \define at cmdkey[str]{vvpart}{width}{}
+
 \presetkeys[str]{vvpart}{
 	bend=\cmdstr at strands@bend,
 	bulla=1,
@@ -461,27 +372,18 @@
 	type=3,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\vvpartition}
-%    \begin{macrocode}
+
 \newcommand{\vvpartition}[2][]{
 	\setkeys[str]{vvpart}{#1} % set variables.
-%    \end{macrocode}
-% normalize vertical size.
-%    \begin{macrocode}
+	% normalize vertical size.
 	\node[\cmdstr at strands@normcolor]at(0,\cmdstr at vvpart@norma){\cmdstr at strands@normsymbol};
 	\node[\cmdstr at strands@normcolor]at(0,\cmdstr at vvpart@normb){\cmdstr at strands@normsymbol};
-%    \end{macrocode}
-% number of strands.
-%    \begin{macrocode}
+	% number of strands.
 	\StrRemoveBraces{#2}[\nobracespart]
 	\let\oldnumstrands\cmdstr at vvpart@nstr
 	\renewcommand{\cmdstr at vvpart@nstr}
 	{\fpeval{max(abs(min(\nobracespart)),abs(max(\nobracespart)),\fpeval{abs(\oldnumstrands)})}}
-%    \end{macrocode}
-% bullets and labels.
-%    \begin{macrocode}
+	% bullets and labels.
 	\decoratestrands[
 		bulla=\cmdstr at vvpart@bulla,
 		bullb=\cmdstr at vvpart@bullb,
@@ -495,9 +397,7 @@
 		type=\cmdstr at vvpart@type,
 		width=\cmdstr at vvpart@width
 	]
-%    \end{macrocode}
-% connections: permutation case.
-%    \begin{macrocode}
+	% connections: permutation case.
 	\foreach\ind in{0,...,\fpeval{\cmdstr at vvpart@nstr-1}}{
 		\ifnum\cmdstr at vvpart@permut=1
 			\getelem{#2}{\fpeval{\ind+1}}{\index} 
@@ -507,9 +407,7 @@
 				\cmdstr at vvpart@width},\cmdstr at vvpart@floor*\cmdstr at vvpart@height);
 		\fi
 	}
-%    \end{macrocode}
-% connections: general case.
-%    \begin{macrocode}
+	% connections: general case.
 	\ifnum\cmdstr at vvpart@permut=0 \foreach\block in{#2}{
 		\StrCount{\block}{,}[\numcom]
 		\ifnum\numcom>0\foreach\ind in {2,...,\fpeval{\numcom+1}}{
@@ -522,9 +420,7 @@
 				\renewcommand{\secbul}{-\oldsecbul}
 			\fi
 			\draw[line width=\cmdstr at vvpart@strwidth]
-%    \end{macrocode}
-% from.
-%    \begin{macrocode}
+				% from.
 				(\fpeval{(abs(\firbul)-1)*\cmdstr at vvpart@width},
 					\ifnum\firbul>0 
 						\fpeval{(\cmdstr at vvpart@floor+1)*\cmdstr at vvpart@height}
@@ -532,9 +428,7 @@
 						\fpeval{\cmdstr at vvpart@floor*\cmdstr at vvpart@height}
 					\fi
 				)
-%    \end{macrocode}
-% bending.
-%    \begin{macrocode}
+					% bending.
 					to[bend right=\ifnum \fpeval{\firbul*\secbul}>0
 						\fpeval{(\firbul/abs(\firbul))*((abs(\secbul)-abs(\firbul))/
 						abs(abs(\secbul)-abs(\firbul)))*\cmdstr at vvpart@bend}
@@ -541,9 +435,7 @@
 					\else
 						0
 					\fi]
-%    \end{macrocode}
-% to.
-%    \begin{macrocode}
+				% to.
 				(\fpeval{(abs(\secbul)-1)*\cmdstr at vvpart@width},
 					\ifnum\secbul>0
 						\fpeval{(\cmdstr at vvpart@floor+1)*\cmdstr at vvpart@height}
@@ -554,10 +446,7 @@
 		}\fi
 	}\fi
 }
-%    \end{macrocode}
-% \end{macro}
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{vpart}{bend}{}
 \define at cmdkey[str]{vpart}{bulla}{}
@@ -579,6 +468,7 @@
 \define at cmdkey[str]{vpart}{tkzpic}{}
 \define at cmdkey[str]{vpart}{type}{}
 \define at cmdkey[str]{vpart}{width}{}
+
 \presetkeys[str]{vpart}{
 	bend=\cmdstr at strands@bend,
 	bulla=1,
@@ -601,10 +491,7 @@
 	type=3,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\vpartition}
-%    \begin{macrocode}
+
 \newcommand{\vpartition}[2][]{
 	\setkeys[str]{vpart}{#1} % set variables.
 	\ifthenelse{\equal{\cmdstr at vpart@tkzpic}{1}}{
@@ -651,15 +538,14 @@
 		]{#2}
 	}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
+
 % \arcpartition  - macro to draw set partitions via arcs.
-%
+
 % Example: the set partition {1,4}{2,3,7} of [7] is drawn as follows: 
-%
+
 % \arcpartition[<options>]{{1,4},{2,3,7}}
-%
+
 %          -----------------
 %          |               |
 %  -------------           |
@@ -667,8 +553,7 @@
 %  |   -----   |           |
 %  |   |   |   |           |
 %  1   2   3   4   5   6   7
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{apart}{bend}{}
 \define at cmdkey[str]{apart}{bull}{}
@@ -686,6 +571,7 @@
 \define at cmdkey[str]{apart}{tkzpic}{}
 \define at cmdkey[str]{apart}{type}{}
 \define at cmdkey[str]{apart}{width}{}
+
 \presetkeys[str]{apart}{
 	bend=\cmdstr at strands@bend,
 	bull=1,
@@ -704,10 +590,7 @@
 	type=1,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\arcpartition}
-%    \begin{macrocode}
+
 \newcommand{\arcpartition}[2][]{
 	\setkeys[str]{apart}{#1}
 	\vpartition[
@@ -731,15 +614,13 @@
 		width=\cmdstr at apart@width
 	]{#2}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \permutation  - macro to draw permutations by lines.
-%
+
 % Example: the permutation 2134 of [4] is drawn as follows: 
-%
+
 % \permutation[<options>]{2,1,3,4}
-%
+
 %  1   2   3   4
 %  |   |   |   |
 %   - -    |   |
@@ -747,8 +628,7 @@
 %   - -    |   |
 %  |   |   |   |
 %  1   2   3   4
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{perm}{bulla}{}
 \define at cmdkey[str]{perm}{bullb}{}
@@ -767,6 +647,7 @@
 \define at cmdkey[str]{perm}{tkzpic}{}
 \define at cmdkey[str]{perm}{type}{}
 \define at cmdkey[str]{perm}{width}{}
+
 \presetkeys[str]{perm}{
 	bulla=1,
 	bullb=1,
@@ -786,10 +667,7 @@
 	type=2,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\permutation}
-%    \begin{macrocode}
+
 \newcommand{\permutation}[2][]{
 	\setkeys[str]{perm}{#1}
 	\vpartition[
@@ -813,15 +691,13 @@
 		width=\cmdstr at perm@width
 	]{#2}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \tiedpair - macro to draw a tied permutation as a pair.
-%
+
 % Example: the permutation ({2,4},2134) of [4] is drawn as follows:
-%
+
 % \tiedpair[<options>]{{2,4}}{2,1,3,4}
-%
+
 %      2       4
 %      ---------
 %  1   |   3   |
@@ -831,8 +707,7 @@
 %   - -    |   |
 %  |   |   |   |
 %  1   2   3   4
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{tpair}{above}{}
 \define at cmdkey[str]{tpair}{bend}{}
@@ -853,6 +728,7 @@
 \define at cmdkey[str]{tpair}{tkzpic}{}
 \define at cmdkey[str]{tpair}{type}{}
 \define at cmdkey[str]{tpair}{width}{}
+
 \presetkeys[str]{tpair}{
 	above=1,
 	bend=\cmdstr at strands@bend,
@@ -874,10 +750,7 @@
 	type=-1,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\tiedpair}
-%    \begin{macrocode}
+
 \newcommand{\tiedpair}[3][]{
 	\setkeys[str]{tpair}{#1}
 	\ifthenelse{\equal{\cmdstr at tpair@tkzpic}{1}}{
@@ -939,15 +812,12 @@
 		]{#3}
 	}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \tie  - macro to draw a tie.
-%
+
 % \begin{tikzpicture} \tie[height=1.5]{{1,0.8},{3,0.7},{4,0.8}} \end{tikzpicture}
 % \begin{tikzpicture} \tie[height=1.5]{1,2,5} \end{tikzpicture}
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{tie}{bend}{}
 \define at cmdkey[str]{tie}{bull}{}
@@ -963,6 +833,7 @@
 \define at cmdkey[str]{tie}{tieheight}{}
 \define at cmdkey[str]{tie}{tiewidth}{}
 \define at cmdkey[str]{tie}{width}{}
+
 \presetkeys[str]{tie}{
 	bend=\cmdstr at strands@tiebend, % bend of the ties.
 	bull=1, % use 1 to use bullets, 0 otherwise.
@@ -979,10 +850,7 @@
 	tiewidth=\cmdstr at strands@tiewidth, % width of the tie line.
 	width=\cmdstr at strands@width % width between strands.
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\tie}
-%    \begin{macrocode}
+
 \newcommand{\tie}[2][]{
 	\setkeys[str]{tie}{#1}
 	\foreach\elem[count=\ind]in{#2}{
@@ -1024,12 +892,9 @@
 		\fi
 	}
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \bbackstrands - macro to draws a trivial two-strands-braid of double strand width.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{bbackstr}{cdnx}{}
 \define at cmdkey[str]{bbackstr}{cdny}{}
@@ -1038,6 +903,7 @@
 \define at cmdkey[str]{bbackstr}{strwidth}{}
 \define at cmdkey[str]{bbackstr}{timeswidth}{}
 \define at cmdkey[str]{bbackstr}{width}{}
+
 \presetkeys[str]{bbackstr}{
 	cdnx=nothing,
 	cdny=nothing,
@@ -1046,10 +912,7 @@
 	timeswidth=\cmdstr at strands@timeswidth, % times the width of the back line is bigger.
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\bbackstrands}
-%    \begin{macrocode}
+
 \newcommand{\bbackstrands}[1][]{ % 
 	\setkeys[str]{bbackstr}{#1}
 	\draw[
@@ -1064,12 +927,9 @@
 	to(\fpeval{\cmdstr at bbackstr@cdnx+\cmdstr at bbackstr@width},
 		\fpeval{\cmdstr at bbackstr@cdny-\cmdstr at bbackstr@height});
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \lleftstrand - macro to draws a strand starting from the left.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{lleftstr}{bend}{}
 \define at cmdkey[str]{lleftstr}{cdnx}{}
@@ -1078,6 +938,7 @@
 \define at cmdkey[str]{lleftstr}{height}{}
 \define at cmdkey[str]{lleftstr}{strwidth}{}
 \define at cmdkey[str]{lleftstr}{width}{}
+
 \presetkeys[str]{lleftstr}{
 	bend=\cmdstr at strands@bendbraid,
 	cdnx=nothing,
@@ -1087,10 +948,7 @@
 	strwidth=\cmdstr at strands@strwidth,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\lleftstrand}
-%    \begin{macrocode}
+
 \newcommand{\lleftstrand}[1][]{
 	\setkeys[str]{lleftstr}{#1}
 	\draw[
@@ -1104,12 +962,9 @@
 		(\fpeval{\cmdstr at lleftstr@cdnx+\cmdstr at lleftstr@width},
 		\fpeval{\cmdstr at lleftstr@cdny-\cmdstr at lleftstr@height-\cmdstr at strands@coverunion});
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \rrightstrand - macro to draw a strand starting from the right.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{rrightstr}{bend}{}
 \define at cmdkey[str]{rrightstr}{cdnx}{}
@@ -1119,6 +974,7 @@
 \define at cmdkey[str]{rrightstr}{height}{}
 \define at cmdkey[str]{rrightstr}{strwidth}{}
 \define at cmdkey[str]{rrightstr}{width}{}
+
 \presetkeys[str]{rrightstr}{
 	bend=\cmdstr at strands@bendbraid,
 	cdnx=nothing,
@@ -1129,10 +985,7 @@
 	strwidth=\cmdstr at strands@strwidth,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\rrightstrand}
-%    \begin{macrocode}
+
 \newcommand{\rrightstrand}[1][]{ % color / init-x-coordinate / init-y-coordinate.
 	\setkeys[str]{rrightstr}{#1}
 	\draw[
@@ -1147,17 +1000,15 @@
 		(\cmdstr at rrightstr@cdnx,
 		\fpeval{\cmdstr at rrightstr@cdny-\cmdstr at rrightstr@height-\cmdstr at strands@coverunion});
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \ccrossback - macro to draw a \backcolor filled circle to create an over-under / under-over crossing.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{ccrossback}{cdnx}{}
 \define at cmdkey[str]{ccrossback}{cdny}{}
 \define at cmdkey[str]{ccrossback}{height}{}
 \define at cmdkey[str]{ccrossback}{width}{}
+
 \presetkeys[str]{ccrossback}{
 	cdnx=nothing,
 	cdny=nothing,
@@ -1164,10 +1015,7 @@
 	height=\cmdstr at strands@height,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\ccrossback}
-%    \begin{macrocode}
+
 \newcommand{\ccrossback}[1][]{
 	\setkeys[str]{ccrossback}{#1}
 	\filldraw[\cmdstr at strands@backcolor]
@@ -1175,12 +1023,9 @@
 		\fpeval{\cmdstr at ccrossback@cdny-\cmdstr at ccrossback@height/2})
 		circle(\cmdstr at strands@braidcross pt);
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \bbraidgen - macro to draw a braid crossing (classic, virtual or singular).
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{bbraidgen}{bend}{}
 \define at cmdkey[str]{bbraidgen}{cdnx}{}
@@ -1193,6 +1038,7 @@
 \define at cmdkey[str]{bbraidgen}{strwidth}{}
 \define at cmdkey[str]{bbraidgen}{type}{}
 \define at cmdkey[str]{bbraidgen}{width}{}
+
 \presetkeys[str]{bbraidgen}{
 	bend=\cmdstr at strands@bendbraid,
 	cdnx=0,
@@ -1206,6 +1052,7 @@
 	type=1, % negative-braid=-1 | positive-braid=1 | virtual-braid=2 | singular-braid=3
 	width=\cmdstr at strands@width
 }{}
+
 \tikzset{
 	cross/.style={ % node style to draw x--crosses inside nodes.
 		path picture={
@@ -1217,10 +1064,7 @@
 		}
 	}
 }
-%    \end{macrocode}
-%
-% \begin{macro}{\bbraidgen}
-%    \begin{macrocode}
+
 \newcommand{\bbraidgen}[1][]{
 	\setkeys[str]{bbraidgen}{#1}
 	\bbackstrands[ % trivial two-strands-braid.
@@ -1305,12 +1149,9 @@
 		\fi
 	\fi
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \ttanglegen - macro to draw a tangle generator.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{ttanglegen}{bend}{}
 \define at cmdkey[str]{ttanglegen}{cdnx}{}
@@ -1327,6 +1168,7 @@
 \define at cmdkey[str]{ttanglegen}{tiestyle}{}
 \define at cmdkey[str]{ttanglegen}{tiewidth}{}
 \define at cmdkey[str]{ttanglegen}{width}{}
+
 \presetkeys[str]{ttanglegen}{
 	bend=\cmdstr at strands@bendtangle,
 	cdnx=0,
@@ -1344,10 +1186,7 @@
 	tiewidth=\cmdstr at strands@tiewidth,
 	width=\cmdstr at strands@width		
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\ttanglegen}
-%    \begin{macrocode}
+
 \newcommand{\ttanglegen}[1][]{
 	\setkeys[str]{ttanglegen}{#1}
 	\bbackstrands[ % trivial two-strands-braid.
@@ -1395,12 +1234,9 @@
 				\fpeval{\cmdstr at ttanglegen@cdny-(2*\cmdstr at ttanglegen@height)/3-0.03});
 	\fi
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \aaddgen - macro to add a generator on a strand level.
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{aaddgen}{bendbraid}{}
 \define at cmdkey[str]{aaddgen}{bendtangle}{}
@@ -1424,6 +1260,7 @@
 \define at cmdkey[str]{aaddgen}{tiestyle}{}
 \define at cmdkey[str]{aaddgen}{tiewidth}{}
 \define at cmdkey[str]{aaddgen}{width}{}
+
 \presetkeys[str]{aaddgen}{
 	bendbraid=\cmdstr at strands@bendbraid,
 	bendtangle=\cmdstr at strands@bendtangle,
@@ -1448,10 +1285,7 @@
 	tiewidth=\cmdstr at strands@tiewidth,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\aaddgen}
-%    \begin{macrocode}
+
 \newcommand{\aaddgen}[1][]{
 	\setkeys[str]{aaddgen}{#1}
 	\StrChar{\cmdstr at aaddgen@generator}{1}[\firstchar]
@@ -1516,7 +1350,7 @@
 	}{\ifthenelse{\equal{\firstchar}{\cmdstr at strands@genchartie}}{
 		\tie[
 			bull=\cmdstr at aaddgen@tiebull,
-			bulletie=\cmdstr at aaddgen@tiebullsize, %%%%%%%%%%%%%%%%%%%%%
+			bulletie=\cmdstr at aaddgen@tiebullsize,
 			color=\cmdstr at aaddgen@tiecolor,
 			height=\cmdstr at aaddgen@height,
 			floor=\fpeval{\cmdstr at aaddgen@posy-1},
@@ -1548,12 +1382,9 @@
 		]
 	}{DO NOTHING!}}}}}}} % \ifthenelse always use "else", so it will do nothing if other letter.
 }
-%    \end{macrocode}
-% \end{macro}
-%
+
 % \strands  - macro to draw braid-like element via generators (with tikz environment).
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{ggens}{bendbraid}{}
 \define at cmdkey[str]{ggens}{bendtangle}{}
@@ -1581,6 +1412,7 @@
 \define at cmdkey[str]{ggens}{tiewidth}{}
 \define at cmdkey[str]{ggens}{type}{}
 \define at cmdkey[str]{ggens}{width}{}
+
 \presetkeys[str]{ggens}{
 	bendbraid=\cmdstr at strands@bendbraid,
 	bendtangle=\cmdstr at strands@bendtangle,
@@ -1609,16 +1441,12 @@
 	type=3,
 	width=\cmdstr at strands@width
 }{}
+
 \newcounter{levelscounter} % count levels.
-%    \end{macrocode}
-%
-% \begin{macro}{\sstrands}
-%    \begin{macrocode}
+
 \newcommand{\sstrands}[2][]{
 	\setkeys[str]{ggens}{#1}
-%    \end{macrocode}
-% number of strands.
-%    \begin{macrocode}
+	% number of strands.
 	\StrSubstitute{#2}{ }{}[\cmdstr at ggens@nstrsave] % remove whitespaces.
 	\StrSubstitute{\cmdstr at ggens@nstrsave}{\cmdstr at strands@gencharposbraid}{}[\cmdstr at ggens@nstrsave]
 	\StrSubstitute{\cmdstr at ggens@nstrsave}{\cmdstr at strands@gencharnegbraid}{}[\cmdstr at ggens@nstrsave]
@@ -1632,9 +1460,7 @@
 	\StrSubstitute{\cmdstr at ggens@nstrsave}{-}{,}[\cmdstr at ggens@nstrsave]
 	\let\oldnstr\cmdstr at ggens@nstr
 	\renewcommand{\cmdstr at ggens@nstr}{\fpeval{max(max(\cmdstr at ggens@nstrsave)+1,\oldnstr)}}
-%    \end{macrocode}
-% backstrands.
-%    \begin{macrocode}
+	% backstrands.
 	\StrCount{#2}{*}[\numlevs]
 	\permutation[ % backstrands.
 		bulla=0,
@@ -1645,9 +1471,7 @@
 		tkzpic=0,
 		type=0
 	]{1}
-%    \end{macrocode}
-% generators.
-%    \begin{macrocode}
+	% generators.
 	\setcounter{levelscounter}{0}
 	\ForEach{*}{ % for each level.
 		\stepcounter{levelscounter}
@@ -1690,10 +1514,7 @@
 		width=\cmdstr at ggens@width
 	]
 }
-%    \end{macrocode}
-% \end{macro}
-%
-%    \begin{macrocode}
+
 \makeatletter
 \define at cmdkey[str]{gens}{bendbraid}{}
 \define at cmdkey[str]{gens}{bendtangle}{}
@@ -1724,6 +1545,7 @@
 \define at cmdkey[str]{gens}{tkzpic}{}
 \define at cmdkey[str]{gens}{type}{}
 \define at cmdkey[str]{gens}{width}{}
+
 \presetkeys[str]{gens}{
 	bendbraid=\cmdstr at strands@bendbraid,
 	bendtangle=\cmdstr at strands@bendtangle,
@@ -1755,10 +1577,7 @@
 	type=3,
 	width=\cmdstr at strands@width
 }{}
-%    \end{macrocode}
-%
-% \begin{macro}{\strands}
-%    \begin{macrocode}
+
 \newcommand{\strands}[2][]{
 	\setkeys[str]{gens}{#1}
 	\ifthenelse{\equal{\cmdstr at gens@tkzpic}{1}}{
@@ -1822,14 +1641,7 @@
 			width=\cmdstr at gens@width
 		]{#2}
 	}
-}%    \end{macrocode}
-% \end{macro}
-%
+}
 
-%
-% \iffalse
-%</package>
-% \fi
-%
 % \Finale
-\endinput
+\endinput
\ No newline at end of file

Modified: trunk/Master/texmf-dist/source/latex/strands/strands.ins
===================================================================
--- trunk/Master/texmf-dist/source/latex/strands/strands.ins	2021-07-12 20:14:34 UTC (rev 59905)
+++ trunk/Master/texmf-dist/source/latex/strands/strands.ins	2021-07-12 20:14:47 UTC (rev 59906)
@@ -1,19 +1,21 @@
+%%
 %% Copyright (C) 2021 by Diego Arcis <arcisd at gmail.com>
-%% --------------------------------------------------------------------------
-%% This work may be distributed and/or modified under the
-%% conditions of the LaTeX Project Public License, either version 1.3
-%% of this license or (at your option) any later version.
-%% The latest version of this license is in
-%%   http://www.latex-project.org/lppl.txt
-%% and version 1.3 or later is part of all distributions of LaTeX
-%% version 2005/12/01 or later.
+%% --------------------------------------------------------------------
+%% This work may be distributed and/or modified under the conditions of 
+%% the LaTeX Project Public License, either version 1.3 of this license
+%% or (at your option) any later version.
 %%
-%% This work has the LPPL maintenance status `maintained'.
+%% The latest version of this license is in:
+%% 	 http://www.latex-project.org/lppl.txt
 %%
+%% and version 1.3 or later is part of all distributions of LaTeX, that
+%% is, version 2005/12/01 or later.
+%%
 %% The Current Maintainer of this work is Diego Arcis.
 %%
-%% This work consists of the files strands.dtx and strands.ins
-%% and the derived filebase strands.sty.
+%% This work consists of the files strands.dtx and strands.ins and they
+%% derive the filebase strands.sty.
+%% --------------------------------------------------------------------
 %%
 
 \input docstrip.tex
@@ -26,32 +28,38 @@
 This is a generated file.
 
 Copyright (C) 2021 by Diego Arcis <arcisd at gmail.com>
---------------------------------------------------------------------------
-This work may be distributed and/or modified under the
-conditions of the LaTeX Project Public License, either version 1.3
-of this license or (at your option) any later version.
-The latest version of this license is in
+--------------------------------------------------------------------
+This work may be distributed and/or modified under the conditions of 
+the LaTeX Project Public License, either version 1.3 of this license
+or (at your option) any later version.
+
+The latest version of this license is in:
   http://www.latex-project.org/lppl.txt
-and version 1.3 or later is part of all distributions of LaTeX
-version 2005/12/01 or later.
 
+and version 1.3 or later is part of all distributions of LaTeX, that
+is, version 2005/12/01 or later.
+
+The Current Maintainer of this work is Diego Arcis.
+
+This work consists of the files strands.dtx and strands.ins and they
+derive the filebase strands.sty.
+--------------------------------------------------------------------
+
 \endpreamble
 
 \generate{\file{strands.sty}{\from{strands.dtx}{package}}}
 
 \obeyspaces
-\Msg{*************************************************************}
-\Msg{*                                                           *}
-\Msg{* To finish the installation you have to move the following *}
-\Msg{* file into a directory searched by TeX:                    *}
-\Msg{*                                                           *}
-\Msg{*     strands.sty                                          *}
-\Msg{*                                                           *}
-\Msg{* To produce the documentation run the file strands.dtx    *}
-\Msg{* through LaTeX.                                            *}
-\Msg{*                                                           *}
-\Msg{* Happy TeXing!                                             *}
-\Msg{*                                                           *}
-\Msg{*************************************************************}
 
-\endbatchfile
+\Msg{****************************************************}
+\Msg{*                                                  *}
+\Msg{* To finish the installation you have to move the  *}
+\Msg{* following file into a directory searched by TeX: *}
+\Msg{*                                                  *}
+\Msg{*     strands.sty                                  *}
+\Msg{*                                                  *}
+\Msg{* URL: https://github.com/arcisd/Strands-Package   *}
+\Msg{*                                                  *}
+\Msg{****************************************************}
+
+\endbatchfile
\ No newline at end of file

Modified: trunk/Master/texmf-dist/tex/latex/strands/strands.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/strands/strands.sty	2021-07-12 20:14:34 UTC (rev 59905)
+++ trunk/Master/texmf-dist/tex/latex/strands/strands.sty	2021-07-12 20:14:47 UTC (rev 59906)
@@ -9,21 +9,26 @@
 %% This is a generated file.
 %% 
 %% Copyright (C) 2021 by Diego Arcis <arcisd at gmail.com>
-%% --------------------------------------------------------------------------
-%% This work may be distributed and/or modified under the
-%% conditions of the LaTeX Project Public License, either version 1.3
-%% of this license or (at your option) any later version.
-%% The latest version of this license is in
+%% --------------------------------------------------------------------
+%% This work may be distributed and/or modified under the conditions of
+%% the LaTeX Project Public License, either version 1.3 of this license
+%% or (at your option) any later version.
+%% 
+%% The latest version of this license is in:
 %%   http://www.latex-project.org/lppl.txt
-%% and version 1.3 or later is part of all distributions of LaTeX
-%% version 2005/12/01 or later.
 %% 
-\NeedsTeXFormat{LaTeX2e}[1999/12/01]
-\ProvidesPackage{strands}
-    [<+date+> <+version+> <+description+>]
+%% and version 1.3 or later is part of all distributions of LaTeX, that
+%% is, version 2005/12/01 or later.
+%% 
+%% The Current Maintainer of this work is Diego Arcis.
+%% 
+%% This work consists of the files strands.dtx and strands.ins and they
+%% derive the filebase strands.sty.
+%% --------------------------------------------------------------------
+%% 
+\NeedsTeXFormat{LaTeX2e}[2005/12/01]
+\ProvidesPackage{strands}[2021/07/11 v1.1 Strands]
 
-\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{strands}[Diego Arcis 2021/07/05 Strands v1.0]
 \RequirePackage{forarray}
 \RequirePackage{ifthen}
 \RequirePackage{tikz}
@@ -30,10 +35,13 @@
 \RequirePackage{xfp}
 \RequirePackage{xstring}
 \RequirePackage{xkeyval}
+
 \usetikzlibrary{snakes}
+
 \newcommand{\getelem}[3]{ % \getelem{list}{index}{\name}
 \StrBetween[#2,\fpeval{#2+1}]{,#1,}{,}{,}[#3]
 }
+
 \makeatletter
 \define at cmdkey[str]{strands}{backcolor}{}
 \define at cmdkey[str]{strands}{bend}{}
@@ -81,6 +89,7 @@
 \define at cmdkey[str]{strands}{timeswidth}{}
 \define at cmdkey[str]{strands}{tkzpic}{}
 \define at cmdkey[str]{strands}{width}{}
+
 \presetkeys[str]{strands}{
 backcolor=white, % color of the paper.
 bend=45, % bend of partitions.
@@ -129,7 +138,9 @@
 tkzpic=1,
 width=0.6, % to set the width between strands.
 }{}
+
 \setkeys[str]{strands}{}
+
 \DeclareOptionX{backcolor}{\renewcommand{\cmdstr at strands@backcolor}{#1}}
 \DeclareOptionX{bend}{\renewcommand{\cmdstr at strands@bend}{#1}}
 \DeclareOptionX{bendbraid}{\renewcommand{\cmdstr at strands@bendbraid}{#1}}
@@ -172,10 +183,13 @@
 \DeclareOptionX{width}{\renewcommand{\cmdstr at strands@width}{#1}}
 \DeclareOptionX*{\PackageWarning{strands}{`\CurrentOption' ignored}} % ignore unknown options.
 \ProcessOptionsX\relax
+
 \ifnum\cmdstr at strands@externalize=1
 \usetikzlibrary{external}
 \tikzexternalize[optimize=false,prefix=strpack]
 \fi
+
+
 \makeatletter
 \define at cmdkey[str]{decor}{bulla}{}
 \define at cmdkey[str]{decor}{bullb}{}
@@ -188,6 +202,7 @@
 \define at cmdkey[str]{decor}{nstr}{}
 \define at cmdkey[str]{decor}{type}{}
 \define at cmdkey[str]{decor}{width}{}
+
 \presetkeys[str]{decor}{
 bulla=1,
 bullb=1,
@@ -201,6 +216,7 @@
 type=3,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\decoratestrands}[1][]{
 \setkeys[str]{decor}{#1} % set variables.
 \foreach\ind in{0,...,\fpeval{\cmdstr at decor@nstr-1}}{
@@ -252,6 +268,11 @@
 \fi
 }
 }
+
+
+
+
+
 \makeatletter
 \define at cmdkey[str]{vvpart}{bend}{}
 \define at cmdkey[str]{vvpart}{bulla}{}
@@ -270,6 +291,7 @@
 \define at cmdkey[str]{vvpart}{strwidth}{}
 \define at cmdkey[str]{vvpart}{type}{}
 \define at cmdkey[str]{vvpart}{width}{}
+
 \presetkeys[str]{vvpart}{
 bend=\cmdstr at strands@bend,
 bulla=1,
@@ -289,6 +311,7 @@
 type=3,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\vvpartition}[2][]{
 \setkeys[str]{vvpart}{#1} % set variables.
 \node[\cmdstr at strands@normcolor]at(0,\cmdstr at vvpart@norma){\cmdstr at strands@normsymbol};
@@ -354,6 +377,7 @@
 }\fi
 }\fi
 }
+
 \makeatletter
 \define at cmdkey[str]{vpart}{bend}{}
 \define at cmdkey[str]{vpart}{bulla}{}
@@ -375,6 +399,7 @@
 \define at cmdkey[str]{vpart}{tkzpic}{}
 \define at cmdkey[str]{vpart}{type}{}
 \define at cmdkey[str]{vpart}{width}{}
+
 \presetkeys[str]{vpart}{
 bend=\cmdstr at strands@bend,
 bulla=1,
@@ -397,6 +422,7 @@
 type=3,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\vpartition}[2][]{
 \setkeys[str]{vpart}{#1} % set variables.
 \ifthenelse{\equal{\cmdstr at vpart@tkzpic}{1}}{
@@ -443,6 +469,11 @@
 ]{#2}
 }
 }
+
+
+
+
+
 \makeatletter
 \define at cmdkey[str]{apart}{bend}{}
 \define at cmdkey[str]{apart}{bull}{}
@@ -460,6 +491,7 @@
 \define at cmdkey[str]{apart}{tkzpic}{}
 \define at cmdkey[str]{apart}{type}{}
 \define at cmdkey[str]{apart}{width}{}
+
 \presetkeys[str]{apart}{
 bend=\cmdstr at strands@bend,
 bull=1,
@@ -478,6 +510,7 @@
 type=1,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\arcpartition}[2][]{
 \setkeys[str]{apart}{#1}
 \vpartition[
@@ -501,6 +534,11 @@
 width=\cmdstr at apart@width
 ]{#2}
 }
+
+
+
+
+
 \makeatletter
 \define at cmdkey[str]{perm}{bulla}{}
 \define at cmdkey[str]{perm}{bullb}{}
@@ -519,6 +557,7 @@
 \define at cmdkey[str]{perm}{tkzpic}{}
 \define at cmdkey[str]{perm}{type}{}
 \define at cmdkey[str]{perm}{width}{}
+
 \presetkeys[str]{perm}{
 bulla=1,
 bullb=1,
@@ -538,6 +577,7 @@
 type=2,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\permutation}[2][]{
 \setkeys[str]{perm}{#1}
 \vpartition[
@@ -561,6 +601,11 @@
 width=\cmdstr at perm@width
 ]{#2}
 }
+
+
+
+
+
 \makeatletter
 \define at cmdkey[str]{tpair}{above}{}
 \define at cmdkey[str]{tpair}{bend}{}
@@ -581,6 +626,7 @@
 \define at cmdkey[str]{tpair}{tkzpic}{}
 \define at cmdkey[str]{tpair}{type}{}
 \define at cmdkey[str]{tpair}{width}{}
+
 \presetkeys[str]{tpair}{
 above=1,
 bend=\cmdstr at strands@bend,
@@ -602,6 +648,7 @@
 type=-1,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\tiedpair}[3][]{
 \setkeys[str]{tpair}{#1}
 \ifthenelse{\equal{\cmdstr at tpair@tkzpic}{1}}{
@@ -663,6 +710,9 @@
 ]{#3}
 }
 }
+
+
+
 \makeatletter
 \define at cmdkey[str]{tie}{bend}{}
 \define at cmdkey[str]{tie}{bull}{}
@@ -678,6 +728,7 @@
 \define at cmdkey[str]{tie}{tieheight}{}
 \define at cmdkey[str]{tie}{tiewidth}{}
 \define at cmdkey[str]{tie}{width}{}
+
 \presetkeys[str]{tie}{
 bend=\cmdstr at strands@tiebend, % bend of the ties.
 bull=1, % use 1 to use bullets, 0 otherwise.
@@ -694,6 +745,7 @@
 tiewidth=\cmdstr at strands@tiewidth, % width of the tie line.
 width=\cmdstr at strands@width % width between strands.
 }{}
+
 \newcommand{\tie}[2][]{
 \setkeys[str]{tie}{#1}
 \foreach\elem[count=\ind]in{#2}{
@@ -735,6 +787,8 @@
 \fi
 }
 }
+
+
 \makeatletter
 \define at cmdkey[str]{bbackstr}{cdnx}{}
 \define at cmdkey[str]{bbackstr}{cdny}{}
@@ -743,6 +797,7 @@
 \define at cmdkey[str]{bbackstr}{strwidth}{}
 \define at cmdkey[str]{bbackstr}{timeswidth}{}
 \define at cmdkey[str]{bbackstr}{width}{}
+
 \presetkeys[str]{bbackstr}{
 cdnx=nothing,
 cdny=nothing,
@@ -751,6 +806,7 @@
 timeswidth=\cmdstr at strands@timeswidth, % times the width of the back line is bigger.
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\bbackstrands}[1][]{ %
 \setkeys[str]{bbackstr}{#1}
 \draw[
@@ -765,6 +821,8 @@
 to(\fpeval{\cmdstr at bbackstr@cdnx+\cmdstr at bbackstr@width},
 \fpeval{\cmdstr at bbackstr@cdny-\cmdstr at bbackstr@height});
 }
+
+
 \makeatletter
 \define at cmdkey[str]{lleftstr}{bend}{}
 \define at cmdkey[str]{lleftstr}{cdnx}{}
@@ -773,6 +831,7 @@
 \define at cmdkey[str]{lleftstr}{height}{}
 \define at cmdkey[str]{lleftstr}{strwidth}{}
 \define at cmdkey[str]{lleftstr}{width}{}
+
 \presetkeys[str]{lleftstr}{
 bend=\cmdstr at strands@bendbraid,
 cdnx=nothing,
@@ -782,6 +841,7 @@
 strwidth=\cmdstr at strands@strwidth,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\lleftstrand}[1][]{
 \setkeys[str]{lleftstr}{#1}
 \draw[
@@ -795,6 +855,8 @@
 (\fpeval{\cmdstr at lleftstr@cdnx+\cmdstr at lleftstr@width},
 \fpeval{\cmdstr at lleftstr@cdny-\cmdstr at lleftstr@height-\cmdstr at strands@coverunion});
 }
+
+
 \makeatletter
 \define at cmdkey[str]{rrightstr}{bend}{}
 \define at cmdkey[str]{rrightstr}{cdnx}{}
@@ -804,6 +866,7 @@
 \define at cmdkey[str]{rrightstr}{height}{}
 \define at cmdkey[str]{rrightstr}{strwidth}{}
 \define at cmdkey[str]{rrightstr}{width}{}
+
 \presetkeys[str]{rrightstr}{
 bend=\cmdstr at strands@bendbraid,
 cdnx=nothing,
@@ -814,6 +877,7 @@
 strwidth=\cmdstr at strands@strwidth,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\rrightstrand}[1][]{ % color / init-x-coordinate / init-y-coordinate.
 \setkeys[str]{rrightstr}{#1}
 \draw[
@@ -828,11 +892,14 @@
 (\cmdstr at rrightstr@cdnx,
 \fpeval{\cmdstr at rrightstr@cdny-\cmdstr at rrightstr@height-\cmdstr at strands@coverunion});
 }
+
+
 \makeatletter
 \define at cmdkey[str]{ccrossback}{cdnx}{}
 \define at cmdkey[str]{ccrossback}{cdny}{}
 \define at cmdkey[str]{ccrossback}{height}{}
 \define at cmdkey[str]{ccrossback}{width}{}
+
 \presetkeys[str]{ccrossback}{
 cdnx=nothing,
 cdny=nothing,
@@ -839,6 +906,7 @@
 height=\cmdstr at strands@height,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\ccrossback}[1][]{
 \setkeys[str]{ccrossback}{#1}
 \filldraw[\cmdstr at strands@backcolor]
@@ -846,6 +914,8 @@
 \fpeval{\cmdstr at ccrossback@cdny-\cmdstr at ccrossback@height/2})
 circle(\cmdstr at strands@braidcross pt);
 }
+
+
 \makeatletter
 \define at cmdkey[str]{bbraidgen}{bend}{}
 \define at cmdkey[str]{bbraidgen}{cdnx}{}
@@ -858,6 +928,7 @@
 \define at cmdkey[str]{bbraidgen}{strwidth}{}
 \define at cmdkey[str]{bbraidgen}{type}{}
 \define at cmdkey[str]{bbraidgen}{width}{}
+
 \presetkeys[str]{bbraidgen}{
 bend=\cmdstr at strands@bendbraid,
 cdnx=0,
@@ -871,6 +942,7 @@
 type=1, % negative-braid=-1 | positive-braid=1 | virtual-braid=2 | singular-braid=3
 width=\cmdstr at strands@width
 }{}
+
 \tikzset{
 cross/.style={ % node style to draw x--crosses inside nodes.
 path picture={
@@ -882,6 +954,7 @@
 }
 }
 }
+
 \newcommand{\bbraidgen}[1][]{
 \setkeys[str]{bbraidgen}{#1}
 \bbackstrands[ % trivial two-strands-braid.
@@ -966,6 +1039,8 @@
 \fi
 \fi
 }
+
+
 \makeatletter
 \define at cmdkey[str]{ttanglegen}{bend}{}
 \define at cmdkey[str]{ttanglegen}{cdnx}{}
@@ -982,6 +1057,7 @@
 \define at cmdkey[str]{ttanglegen}{tiestyle}{}
 \define at cmdkey[str]{ttanglegen}{tiewidth}{}
 \define at cmdkey[str]{ttanglegen}{width}{}
+
 \presetkeys[str]{ttanglegen}{
 bend=\cmdstr at strands@bendtangle,
 cdnx=0,
@@ -999,6 +1075,7 @@
 tiewidth=\cmdstr at strands@tiewidth,
 width=\cmdstr at strands@width 
 }{}
+
 \newcommand{\ttanglegen}[1][]{
 \setkeys[str]{ttanglegen}{#1}
 \bbackstrands[ % trivial two-strands-braid.
@@ -1046,6 +1123,8 @@
 \fpeval{\cmdstr at ttanglegen@cdny-(2*\cmdstr at ttanglegen@height)/3-0.03});
 \fi
 }
+
+
 \makeatletter
 \define at cmdkey[str]{aaddgen}{bendbraid}{}
 \define at cmdkey[str]{aaddgen}{bendtangle}{}
@@ -1069,6 +1148,7 @@
 \define at cmdkey[str]{aaddgen}{tiestyle}{}
 \define at cmdkey[str]{aaddgen}{tiewidth}{}
 \define at cmdkey[str]{aaddgen}{width}{}
+
 \presetkeys[str]{aaddgen}{
 bendbraid=\cmdstr at strands@bendbraid,
 bendtangle=\cmdstr at strands@bendtangle,
@@ -1093,6 +1173,7 @@
 tiewidth=\cmdstr at strands@tiewidth,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\aaddgen}[1][]{
 \setkeys[str]{aaddgen}{#1}
 \StrChar{\cmdstr at aaddgen@generator}{1}[\firstchar]
@@ -1157,7 +1238,7 @@
 }{\ifthenelse{\equal{\firstchar}{\cmdstr at strands@genchartie}}{
 \tie[
 bull=\cmdstr at aaddgen@tiebull,
-bulletie=\cmdstr at aaddgen@tiebullsize, %%%%%%%%%%%%%%%%%%%%%
+bulletie=\cmdstr at aaddgen@tiebullsize,
 color=\cmdstr at aaddgen@tiecolor,
 height=\cmdstr at aaddgen@height,
 floor=\fpeval{\cmdstr at aaddgen@posy-1},
@@ -1189,6 +1270,8 @@
 ]
 }{DO NOTHING!}}}}}}} % \ifthenelse always use "else", so it will do nothing if other letter.
 }
+
+
 \makeatletter
 \define at cmdkey[str]{ggens}{bendbraid}{}
 \define at cmdkey[str]{ggens}{bendtangle}{}
@@ -1216,6 +1299,7 @@
 \define at cmdkey[str]{ggens}{tiewidth}{}
 \define at cmdkey[str]{ggens}{type}{}
 \define at cmdkey[str]{ggens}{width}{}
+
 \presetkeys[str]{ggens}{
 bendbraid=\cmdstr at strands@bendbraid,
 bendtangle=\cmdstr at strands@bendtangle,
@@ -1244,7 +1328,9 @@
 type=3,
 width=\cmdstr at strands@width
 }{}
+
 \newcounter{levelscounter} % count levels.
+
 \newcommand{\sstrands}[2][]{
 \setkeys[str]{ggens}{#1}
 \StrSubstitute{#2}{ }{}[\cmdstr at ggens@nstrsave] % remove whitespaces.
@@ -1312,6 +1398,7 @@
 width=\cmdstr at ggens@width
 ]
 }
+
 \makeatletter
 \define at cmdkey[str]{gens}{bendbraid}{}
 \define at cmdkey[str]{gens}{bendtangle}{}
@@ -1342,6 +1429,7 @@
 \define at cmdkey[str]{gens}{tkzpic}{}
 \define at cmdkey[str]{gens}{type}{}
 \define at cmdkey[str]{gens}{width}{}
+
 \presetkeys[str]{gens}{
 bendbraid=\cmdstr at strands@bendbraid,
 bendtangle=\cmdstr at strands@bendtangle,
@@ -1373,6 +1461,7 @@
 type=3,
 width=\cmdstr at strands@width
 }{}
+
 \newcommand{\strands}[2][]{
 \setkeys[str]{gens}{#1}
 \ifthenelse{\equal{\cmdstr at gens@tkzpic}{1}}{
@@ -1436,7 +1525,7 @@
 width=\cmdstr at gens@width
 ]{#2}
 }
-}%    \end{macrocode}
+}
 
 \endinput
 %%



More information about the tex-live-commits mailing list.