summaryrefslogtreecommitdiff
path: root/graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-06-07 03:03:23 +0000
committerNorbert Preining <norbert@preining.info>2020-06-07 03:03:23 +0000
commit666248863665f4318b13e1c1b7a2b94ef90a8b9a (patch)
tree9e682f3dd1e75d918244c2e0d615e58850a0e1e4 /graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex
parent527cbc8280407d055d185ad11f79b81b032eec7e (diff)
CTAN sync 202006070303
Diffstat (limited to 'graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex')
-rw-r--r--graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex319
1 files changed, 319 insertions, 0 deletions
diff --git a/graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex b/graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex
new file mode 100644
index 0000000000..2d43ef5d55
--- /dev/null
+++ b/graphics/pgf/contrib/commutative-diagrams/tikzlibrarycommutative-diagrams.mandyas.code.tex
@@ -0,0 +1,319 @@
+%
+% CoDi: Commutative Diagrams for TeX
+% Copyright (c) 2015-2020 Paolo Brasolin <paolo.brasolin@gmail.com>
+% SPDX-License-Identifier: MIT
+%
+% This file is part of CoDi 1.0.0, released on 2020/06/06 under MIT license.
+%
+
+% μανδύας • (mandýas)
+% 1. cloak
+% 2. mantle
+% 3. dolman
+
+% Mandias defines the aesthetics aspect of the user level functionality,
+% together with some baseline configuration.
+
+\usetikzlibrary[calc]
+
+% \usetikzlibrary[decorations.pathreplacing]
+% \usetikzlibrary{decorations.pathmorphing}
+% \usetikzlibrary[decorations.markings]
+% \usetikzlibrary[arrows.meta]
+
+\pgfqkeys{/codi}{
+%==[ universal styles ]=========================================================
+ every diagram/.append style={},
+ every layout/.append style={
+ /codi/every object/.append style={shape=codi baseline centered rectangle},
+ square,
+ },
+ every object/.append style={},
+ every arrow/.append style={
+ >=stealth,
+ },
+ every label/.append style={
+ auto,
+ inner sep=0.5ex,
+ font=\everymath\expandafter{\the\everymath\scriptstyle}
+ },
+%==[ arrow styles ]=============================================================
+ /codi/arrows/.cd,
+ crossing over/clearance/.initial=0.5ex,
+ crossing over/color/.initial=white,
+ crossing over/.style={
+ /tikz/preaction={
+ -,
+ draw=\pgfkeysvalueof{/codi/arrows/crossing over/color},
+ line width=\pgfkeysvalueof{/codi/arrows/crossing over/clearance},
+ },
+ },
+ shove/.style={
+ /tikz/transform canvas={
+ /tikz/shift={($(\tikztostart)!#1!-90:(\tikztotarget)-(\tikztostart)$)}
+ }
+ },
+ slide/.style={
+ /tikz/transform canvas={
+ /tikz/shift={($(\tikztostart)!#1!0:(\tikztotarget)-(\tikztostart)$)}
+ }
+ },
+%==[ label styles ]=============================================================
+ /codi/labels/.cd,
+ mid/.style={
+ /tikz/fill=white,
+ /tikz/shape=circle,
+ /tikz/anchor=center,
+ /tikz/inner sep=.25ex
+ },
+%=[ objects styles ]============================================================
+ /codi/objects/.cd,
+ % TODO: reflect on these styles
+ % tetragonal/.style 2 args={
+ % /tikz/node distance=#2 and #1
+ % },
+ % square/.style={
+ % /codi/objects/rectangular={#1}{#1}
+ % },
+ % golden/.style={
+ % /codi/objects/rectangular={#1}{0.618*#1}
+ % },
+ % % comb/.style={
+ % % /codi/objects/rectangular={#1}{sqrt(3/4)*#1},
+ % % },
+ % % comb/.default=4em,
+ % square/.default=4em,
+ % golden/.default=4em,
+%=[ lattice styles ]============================================================
+ /codi/layouts/.cd,
+ hexagonal/.code args={#1side #2 angle #3}{
+ \pgfkeys{/codi/layouts/#1hexagonal=side {#2} angle {#3}},
+ },
+ horizontal hexagonal/.style args={side #1 angle #2}{
+ /codi/layouts/tetragonal=base {#1} height {tan(#2)*#1*0.5},
+ /tikz/every odd row/.append style={/tikz/xshift=(#1)*0.5},
+ },
+ vertical hexagonal/.style args={side #1 angle #2}{
+ /codi/layouts/tetragonal=base {tan(#2)*#1*0.5} height {#1},
+ /tikz/every odd column/.append style={/tikz/yshift=-1*(#1)*0.5},
+ },
+ hexagonal/.default=horizontal side 4.5em angle 60,
+ %
+ tetragonal/.style args={base #1 height #2}{
+ /tikz/column sep={{#1},between origins},
+ /tikz/row sep={{#2},between origins},
+ },
+ tetragonal/.default=base 4.5em height 2.8em,
+ %
+ square/.style={
+ /codi/layouts/tetragonal=base {#1} height {#1},
+ },
+ golden/.style={
+ /codi/layouts/tetragonal=base {#1} height {0.618*#1},
+ },
+ square/.default=4.5em,
+ golden/.default=4.5em,
+%=[ diagram styles ]============================================================
+ /codi/diagrams/.cd,
+ grid/.style 2 args={
+ /tikz/x={#1},
+ /tikz/y={#2},
+ /tikz/on grid,
+ },
+ metric/.style 2 args={
+ % NOTE: {1 and 1}{1} is infty-norm, unit circle is unit square
+ % NOTE: {2}{0.5} is 1-norm, circle of radius 2 is rhombus circumscribing base hexagon
+ /tikz/node distance={#1},
+ % TODO: implement control to allow for explicit units on single factor specs
+ /tikz/above left/.code={\tikz@lib@place@handle@{##1}{south east}{-1}{1}{north west}{#2}},
+ /tikz/above right/.code={\tikz@lib@place@handle@{##1}{south west}{1}{1}{north east}{#2}},
+ /tikz/below left/.code={\tikz@lib@place@handle@{##1}{north east}{-1}{-1}{south west}{#2}},
+ /tikz/below right/.code={\tikz@lib@place@handle@{##1}{north west}{1}{-1}{south east}{#2}},
+ },
+ %
+ hexagonal/.code args={#1side #2 angle #3}{
+ \pgfkeys{/codi/diagrams/#1hexagonal=side #2 angle #3}
+ },
+ horizontal hexagonal/.style args={side #1 angle #2}{
+ /codi/every layout/.append style={/codi/layouts/hexagonal=horizontal side {#1} angle {#2}},
+ /codi/diagrams/grid={#1*0.5}{#1*tan(#2)*0.5},
+ /codi/diagrams/metric={2}{0.5},
+ },
+ vertical hexagonal/.style args={side #1 angle #2}{
+ /codi/every layout/.append style={/codi/layouts/hexagonal=vertical side {#1} angle {#2}},
+ /codi/diagrams/grid={#1*tan(#2)*0.5}{#1*0.5},
+ /codi/diagrams/metric={2}{0.5},
+ },
+ hexagonal/.default=horizontal side 4.5em angle 60,
+ %
+ tetragonal/.style args={base #1 height #2}{
+ /codi/every layout/.append style={/codi/layouts/tetragonal=base {#1} height {#2}},
+ /codi/diagrams/grid={#1}{#2},
+ /codi/diagrams/metric={1 and 1}{1},
+ },
+ tetragonal/.default=base 4.5em height 2.8em,
+ %
+ square/.style={
+ /codi/every layout/.append style={/codi/layouts/square=#1},
+ /codi/diagrams/tetragonal=base {#1} height {#1},
+ },
+ golden/.style={
+ /codi/every layout/.append style={/codi/layouts/golden=#1},
+ /codi/diagrams/tetragonal=base {#1} height {0.618*#1},
+ },
+ square/.default=4.5em,
+ golden/.default=4.5em,
+}
+
+%==[ baseline centered rectangle shape ]========================================
+
+% The math formula axis height is recovered and stored as a pgf function.
+
+% NOTE: the LuaTeX version is needed just by ConTeXt
+\pgfutil@ifluatex
+ \directlua{tex.enableprimitives('kD', {'Umathaxis'})}
+ \pgfmathdeclarefunction{kD_math_formula_axis_height}{0}{%
+ \begingroup%
+ $\relax$% update fontdimens
+ % See TeX by Topic §23.5 for details.
+ \pgfmathreturn\the\kDUmathaxis\textstyle%
+ \endgroup}
+\else% if using (pdf)tex
+ \pgfmathdeclarefunction{kD_math_formula_axis_height}{0}{%
+ \begingroup%
+ $\relax$% update fontdimens
+ % See TeX by Topic §23.5 for details.
+ \pgfmathreturn\the\fontdimen22\textfont2%
+ \endgroup}
+\fi
+
+\pgfqkeys{/codi/baseline centered rectangle}{
+ center raise/.initial=kD_math_formula_axis_height
+}
+
+% Then the shape is defined by inheritance.
+
+\pgfdeclareshape{codi baseline centered rectangle} {
+ % Inherit the rectangle shape.
+ \inheritsavedanchors[from={rectangle}]
+ \inheritanchor[from={rectangle}]{base}
+ \inheritanchor[from={rectangle}]{north}
+ \inheritanchor[from={rectangle}]{south}
+ \inheritanchor[from={rectangle}]{base west}
+ \inheritanchor[from={rectangle}]{north west}
+ \inheritanchor[from={rectangle}]{south west}
+ \inheritanchor[from={rectangle}]{base east}
+ \inheritanchor[from={rectangle}]{north east}
+ \inheritanchor[from={rectangle}]{south east}
+ \inheritanchor[from={rectangle}]{mid}
+ \inheritanchor[from={rectangle}]{mid west}
+ \inheritanchor[from={rectangle}]{mid east}
+ \inheritbackgroundpath[from={rectangle}]
+ % Redefine west, center and east anchors
+ % setting their y coordinates to center raise.
+ \anchor{center}{\pgf@anchor@rectangle@center\pgfmathsetlength\pgf@y%
+ {\pgfkeysvalueof{/codi/baseline centered rectangle/center raise}}}
+ \anchor{west}{\pgf@anchor@rectangle@west\pgfmathsetlength\pgf@y%
+ {\pgfkeysvalueof{/codi/baseline centered rectangle/center raise}}}
+ \anchor{east}{\pgf@anchor@rectangle@east\pgfmathsetlength\pgf@y%
+ {\pgfkeysvalueof{/codi/baseline centered rectangle/center raise}}}
+ % Save the original anchors as alternate "real" versions.
+ \anchor{real center}{\pgf@anchor@rectangle@center}
+ \anchor{real west}{\pgf@anchor@rectangle@west}
+ \anchor{real east}{\pgf@anchor@rectangle@east}
+ % Redefine the border anchor calculation.
+ \anchorborder{%
+ % (x,y) = target
+ % let tempdima = center raise
+ \pgfmathsetlength\pgfutil@tempdima%
+ {\pgfkeysvalueof{/codi/baseline centered rectangle/center raise}}%
+ % let b = (x,y) = target
+ \pgf@xb=\pgf@x%
+ \pgf@yb=\pgf@y%
+ % let (x,y) = south west
+ \southwest%
+ % let a = (x,y) = south west
+ \pgf@xa=\pgf@x%
+ \pgf@ya=\pgf@y%
+ % let (x,y) = north east
+ \northeast%
+ % let (x,y) = (x,y) - a = north east - south west = (width, height)
+ \advance\pgf@x by-\pgf@xa%
+ \advance\pgf@y by-\pgf@ya%
+ % let c = (x,y)/2 = (width, height)/2 = (width/2, height/2)
+ \pgf@xc=.5\pgf@x%
+ \pgf@yc=.5\pgf@y%
+ % let a = a + c = south west + (width/2, height/2) = center
+ \advance\pgf@xa by\pgf@xc%
+ \advance\pgf@ya by\pgf@yc%
+ % if by = target y > 0
+ \ifdim\pgf@yb>0pt%
+ % let (x,y) = north east
+ \northeast%
+ % let cy = y = north east y
+ \pgf@yc=\pgf@y%
+ % let cy = cy - center raise = north east y - center raise
+ \advance\pgf@yc by-\pgfutil@tempdima%
+ \else%
+ % let (x,y) = south west
+ \southwest%
+ % let cy = y = - south west y
+ \pgf@yc=-\pgf@y%
+ % let cy = cy + center raise = - south west y + center raise
+ \advance\pgf@yc by\pgfutil@tempdima%
+ \fi
+ \edef\pgf@marshal{%
+ % calculate the intersection of the half line from the origin
+ \noexpand\pgfpointborderrectangle
+ % passing through target
+ {\noexpand\pgfqpoint{\the\pgf@xb}{\the\pgf@yb}}
+ % and the rectangle centered on the origin
+ % whose upper right corner is
+ % (width/2, +north east y - center raise) if target y > 0
+ % (width/2, -south west y + center raise) if target y < 0
+ {\noexpand\pgfqpoint{\the\pgf@xc}{\the\pgf@yc}}%
+ }%
+ % let (x,y) = the intersection
+ \pgf@process{\pgf@marshal}%
+ % let x = x + ax = width/2 + center x
+ \advance\pgf@x by\pgf@xa%
+ % let y = y + tempdima = ±(ne/sw y - center raise) + center raise
+ \advance\pgf@y by\pgfutil@tempdima%
+ % that is, y = + north east y if target y > 0
+ % y = - south west y + 2 * center raise if target y < 0
+ %
+ % NOTE: in essence, we're just compensating for the redefinition
+ % of ne/sw anchors that shifted them by cr below the real center.
+ % ┏━━━━━━┯━━━━━━┓ ╮╮
+ % ┃ │ ┃ ││ + ney - cr
+ % ╭╭ ┠──────┼──────┨ ╮│╯ y > 0
+ % - swy + cr │╰╭ ┣━━━━━━┿━━━━━━┫ ╯╯ ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
+ % ╰ ╰ ┗━━━━━━┷━━━━━━┛ y < 0
+ }%
+}%
+
+%==[ prompter ]=================================================================
+
+% This key is meant for visual assistance with the node labeling automation.
+
+\pgfqkeys{/codi}{
+ prompter label/.style={
+ /tikz/.cd,
+ inner sep=0sp,
+ font=\ttfamily\bfseries\tiny,
+ line width=1pt,
+ draw=violet,
+ fill=violet,
+ text=white,
+ overlay,
+ label anchor/.style={tikz@label@post/.append style={anchor=##1}},
+ label anchor=north east,
+ label position=south east
+ },
+ prompter pinner/.style={
+ /tikz/draw=violet,
+ /tikz/line width=1sp,
+ /tikz/label={[/codi/prompter label]:#1},
+ },
+ prompter/.style={/bapto/output/.forward to=/codi/prompter pinner}
+}