summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex')
-rw-r--r--Master/texmf-dist/tex/latex/tilings/tikzlibrarypenrose.code.tex88
-rw-r--r--Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.code.tex1139
-rw-r--r--Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.penrose.code.tex699
-rw-r--r--Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.polykite.code.tex859
4 files changed, 2785 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/tilings/tikzlibrarypenrose.code.tex b/Master/texmf-dist/tex/latex/tilings/tikzlibrarypenrose.code.tex
new file mode 100644
index 00000000000..af61ed1d0ea
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tilings/tikzlibrarypenrose.code.tex
@@ -0,0 +1,88 @@
+%%
+%% This is file `tikzlibrarypenrose.code.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% tilings_code.dtx (with options: `penrosedep')
+%% ----------------------------------------------------------------
+%% tilings --- TikZ library for producing tilings
+%% E-mail: loopspace@mathforge.org
+%% Released under the LaTeX Project Public License v1.3c or later
+%% See http://www.latex-project.org/lppl.txt
+%% ----------------------------------------------------------------
+%%
+\ProvidesFile {tikzlibrarypenrose.code.tex}
+ [2023/06/01 v2.0 TikZ pics for Penrose tiles]
+\usetikzlibrary{tilings.penrose}
+\ExplSyntaxOn
+\NewDocumentCommand \SetPenrosePath { m }
+{
+ \__tilings_set_tiling_path:n {#1}
+}
+\NewDocumentCommand \BakePenroseTile {m}
+{
+ \__tilings_bake_tile:n {#1}
+}
+\NewDocumentCommand \MakePenroseTile {m}
+{
+ \__tilings_bake_tile:n {#1}
+}
+\NewDocumentCommand \UsePenroseTile {O{} m}
+{
+ \__tilings_use_tile:nn {#1}{#2}
+}
+\NewDocumentCommand \PenroseDecomposition { O{} m m m }
+{
+ \__tilings_tiling_decomposition:nnnn {#1}{#2}{#3}{#4}
+}
+\ExplSyntaxOff
+\tikzset{
+ save Penrose path/.forward to=/tikz/save tiling path,
+ clone Penrose side path/.forward to=/tikz/clone tiling side path,
+ spath/prefix/Penrose side/.forward to=/tikz/spath/prefix/tiling side,
+ spath/suffix/Penrose side/.forward to=/tikz/spath/suffix/tiling side,
+ clone Penrose tile path/.forward to=/tikz/clone tiling tile path,
+ spath/prefix/Penrose tile/.forward to=/tikz/spath/prefix/tiling tile,
+ spath/suffix/Penrose tile/.forward to=/tikz/spath/suffix/tiling tile,
+ Penrose step/.forward to=/tikz/tiling step,
+ every tile/.append style={
+ every Penrose tile/.try
+ },
+ every tile clip/.append style={
+ every Penrose tile clip/.try
+ },
+ every tile pic/.append style={
+ every Penrose pic/.try
+ },
+ tile/.append style={
+ Penrose tile #1/.try,
+ Penrose tile/.try=#1
+ }
+}
+%%
+%% Copyright (C) 2014-2023 by Andrew Stacey <loopspace@mathforge.org>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License (LPPL), either
+%% version 1.3c of this license or (at your option) any later
+%% version. The latest version of this license is in the file:
+%%
+%% http://www.latex-project.org/lppl.txt
+%%
+%% This work is "maintained" (as per LPPL maintenance status) by
+%% Andrew Stacey.
+%%
+%% This work consists of the files penrose_code.dtx
+%% penrose.tex
+%% and the derived files penrose.ins
+%% penrose_code.pdf
+%% penrose.pdf
+%% tikzlibrarytilings.code.tex
+%% tikzlibrarytilings.penrose.code.tex
+%% tikzlibrarytilings.polykite.code.tex
+%% tikzlibrarypenrose.code.tex
+%% README.txt
+%%
+%%
+%% End of file `tikzlibrarypenrose.code.tex'.
diff --git a/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.code.tex b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.code.tex
new file mode 100644
index 00000000000..d79e42d965a
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.code.tex
@@ -0,0 +1,1139 @@
+%%
+%% This is file `tikzlibrarytilings.code.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% tilings_code.dtx (with options: `tilings')
+%% ----------------------------------------------------------------
+%% tilings --- TikZ library for producing tilings
+%% E-mail: loopspace@mathforge.org
+%% Released under the LaTeX Project Public License v1.3c or later
+%% See http://www.latex-project.org/lppl.txt
+%% ----------------------------------------------------------------
+%%
+\ProvidesExplFile
+ {tikzlibrarytilings.code.tex}
+ {2023/06/01}
+ {2.0}
+ {TikZ pics for tilings such as Penrose tiles}
+\RequirePackage{tikz}
+\usetikzlibrary{spath3}
+\ExplSyntaxOn
+\tl_new:N \g__tilings_side_a_tl
+\tl_new:N \g__tilings_side_b_tl
+\tl_new:N \g__tilings_side_c_tl
+\tl_new:N \g__tilings_side_d_tl
+\tl_new:N \g__tilings_side_e_tl
+\tl_new:N \g__tilings_side_A_tl
+\tl_new:N \g__tilings_side_B_tl
+\tl_new:N \g__tilings_side_C_tl
+\tl_new:N \g__tilings_side_D_tl
+\tl_new:N \g__tilings_side_E_tl
+\tl_new:c {g__tilings_side_1_tl}
+\tl_new:c {g__tilings_side_2_tl}
+\tl_new:c {g__tilings_side_3_tl}
+\tl_gset:Nn \g__tilings_side_a_tl
+{
+ \pgfsyssoftpath@movetotoken{0pt}{0pt}
+ \pgfsyssoftpath@linetotoken{1pt}{0pt}
+}
+\tl_gset_eq:NN \g__tilings_side_b_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_c_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_d_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_e_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_A_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_B_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_C_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_D_tl \g__tilings_side_a_tl
+\tl_gset_eq:NN \g__tilings_side_E_tl \g__tilings_side_a_tl
+\tl_gset_eq:cN {g__tilings_side_1_tl} \g__tilings_side_a_tl
+\tl_gset_eq:cN {g__tilings_side_2_tl} \g__tilings_side_a_tl
+\tl_gset_eq:cN {g__tilings_side_3_tl} \g__tilings_side_a_tl
+\fp_new:N \l__tilings_tmpa_fp
+\fp_new:N \l__tilings_tmpb_fp
+\fp_new:N \l__tilings_tmpc_fp
+\fp_new:N \l__tilings_saved_x_fp
+\fp_new:N \l__tilings_saved_y_fp
+\str_new:N \l__tilings_tmpa_str
+\str_new:N \l__tilings_tmpb_str
+\seq_new:N \l__tilings_tmpa_seq
+\tl_new:N \l__tilings_tmpa_tl
+\tl_new:N \l__tilings_tmpb_tl
+\tl_new:N \l__tilings_tmpc_tl
+\tl_new:N \l__tilings_tmpd_tl
+\tl_new:N \l__tilings_tmp_tile_path_tl
+\tl_new:N \l__tilings_action_lms_tl
+\tl_new:N \l__tilings_parameters_lms_tl
+\int_new:N \l__tilings_tmpa_int
+\int_new:N \l__tilings_tmpb_int
+\fp_new:N \l__tilings_xa_fp
+\fp_new:N \l__tilings_ya_fp
+\fp_new:N \l__tilings_xb_fp
+\fp_new:N \l__tilings_yb_fp
+\dim_new:N \l__tilings_xa_dim
+\dim_new:N \l__tilings_ya_dim
+\dim_new:N \l__tilings_xb_dim
+\dim_new:N \l__tilings_yb_dim
+\dim_new:N \g__tilings_xa_dim
+\dim_new:N \g__tilings_ya_dim
+\dim_new:N \g__tilings_xb_dim
+\dim_new:N \g__tilings_yb_dim
+\prop_new:N \l__tilings_tmpa_prop
+\bool_new:N \l__tilings_cw_bool
+\bool_new:N \l__tilings_update_saved_bool
+\bool_new:N \l__tilings_relative_bool
+\bool_new:N \l__tilings_edge_bool
+\str_const:Nn \c__tilings_colon_str {:}
+\str_const:Nn \c__tilings_comma_str {,}
+\fp_const:Nn \c__tilings_cm_fp {\dim_to_fp:n {1cm}}
+\tl_new:N \g__tilings_output_tl
+\fp_new:N \g__tilings_output_a_fp
+\fp_new:N \g__tilings_output_b_fp
+\prop_new:N \g__tilings_tilenames_prop
+\regex_const:Nn \c__tilings_anchor_regex {\s\w+\Z}
+\cs_generate_variant:Nn \seq_set_split:Nnn {NVV}
+\cs_generate_variant:Nn \regex_extract_once:NnNTF {NVNTF}
+\cs_generate_variant:Nn \tl_if_eq:nnT {nVT}
+\cs_generate_variant:Nn \tl_if_in:NnT {NVT}
+\cs_generate_variant:Nn \prop_item:Nn {cV}
+\cs_generate_variant:Nn \tl_if_head_is_group_p:n {V}
+\msg_new:nnn { tilings }{ not baked }
+{ Tile~ #1~ has~ not~ been~ baked. }
+\msg_new:nnn { tilings }{ no tile }
+{ Tile~ #1~ has~ not~ been~ defined. }
+\msg_new:nnn { tilings }{ no side }
+{ Tile~ side~ #1~ has~ not~ been~ defined,~ using~ default. }
+\msg_new:nnn { tilings }{ tile no edge }
+{ Tile~ #1~ doesn't~ have~ an~ edge~ labelled~ #2;
+ ~ available~ edges~ are~ #3.}
+\msg_new:nnn { tilings }{ no edge }
+{ Either~ tile~ #1~ doesn't~ exist
+ ~ or~ it~ doesn't~ have~ an~ edge~ labelled~ #2.}
+\cs_new_nopar:Npn \__tilings_normalise_path:Nn #1#2
+{
+ \group_begin:
+ \spath_initialpoint:Nn \l__tilings_tmpa_tl {#2}
+ \fp_set:Nn \l__tilings_tmpa_fp {\tl_head:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \fp_set:Nn \l__tilings_tmpb_fp {\tl_head:N \l__tilings_tmpa_tl}
+ \spath_finalpoint:Nn \l__tilings_tmpa_tl {#2}
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {\tl_head:N \l__tilings_tmpa_tl - \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \fp_set:Nn \l__tilings_tmpb_fp
+ {\tl_head:N \l__tilings_tmpa_tl - \l__tilings_tmpb_fp}
+ \fp_set:Nn \l__tilings_tmpc_fp
+ {\l__tilings_tmpa_fp^2 + \l__tilings_tmpb_fp^2}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_tmpa_fp/\l__tilings_tmpc_fp}
+ \fp_set:Nn \l__tilings_tmpb_fp {\l__tilings_tmpb_fp/\l__tilings_tmpc_fp}
+ \fp_set:Nn \l__tilings_tmpc_fp {-\l__tilings_tmpb_fp}
+ \tl_set:Nx \l__tilings_tmpb_tl
+ {
+ {\fp_use:N \l__tilings_tmpa_fp}
+ {\fp_use:N \l__tilings_tmpc_fp} % swapped
+ {\fp_use:N \l__tilings_tmpb_fp} % swapped
+ {\fp_use:N \l__tilings_tmpa_fp}
+ }
+ \spath_initialpoint:Nn \l__tilings_tmpa_tl {#2}
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {
+ (-1) * \l__tilings_tmpa_fp * \tl_head:N \l__tilings_tmpa_tl
+ + (-1) * \l__tilings_tmpb_fp * \tl_tail:N \l__tilings_tmpa_tl
+ }
+ \fp_set:Nn \l__tilings_tmpb_fp
+ {
+ (-1) * \l__tilings_tmpa_fp * \tl_tail:N \l__tilings_tmpa_tl
+ + \l__tilings_tmpb_fp * \tl_head:N \l__tilings_tmpa_tl
+ }
+ \tl_put_right:Nx \l__tilings_tmpb_tl {
+ {\fp_to_dim:N \l__tilings_tmpa_fp}
+ {\fp_to_dim:N \l__tilings_tmpb_fp}
+ }
+ \spath_transform:NnV \l__tilings_tmpa_tl {#2} \l__tilings_tmpb_tl
+ \tl_gset_eq:NN \g__tilings_output_tl \l__tilings_tmpa_tl
+ \group_end:
+ \tl_set_eq:NN #1 \g__tilings_output_tl
+ \tl_gclear:N \g__tilings_output_tl
+}
+\cs_generate_variant:Nn \__tilings_normalise_path:Nn {NV, cn, cV}
+\cs_new_protected_nopar:Npn \__tilings_normalise_path:N #1
+{
+ \__tilings_normalise_path:NV #1#1
+}
+\cs_generate_variant:Nn \__tilings_normalise_path:N {c}
+\cs_new_protected_nopar:Npn \__tilings_set_tiling_path:n #1
+{
+ \group_begin:
+ \pgfsyssoftpath@getcurrentpath\l__tilings_tmpa_tl
+ \__tilings_normalise_path:N \l__tilings_tmpa_tl
+ \tl_gset_eq:cN {g__tilings_side_#1_tl} \l__tilings_tmpa_tl
+ \group_end:
+}
+
+\NewDocumentCommand \SetTilingPath { m }
+{
+ \__tilings_set_tiling_path:n {#1}
+}
+\cs_new_nopar:Npn \tikz_scan_point:n #1
+{
+ \tikz@scan@one@point\pgfutil@firstofone#1\relax
+}
+\cs_generate_variant:Nn \tikz_scan_point:n {V}
+\prg_new_conditional:Npnn \tikz_node_if_defined:n #1 {p,T,F,TF}
+{
+ \tl_if_exist:cTF {pgf@sh@ns@\use:c{tikz@pp@name}{#1}}
+ {
+ \prg_return_true:
+ }{
+ \tl_if_exist:cTF
+ {pgf@sh@ns@not yet positionedPGFINTERNAL\use:c{tikz@pp@name}{#1}}
+ {
+ \pgf_return_true:
+ }
+ {
+ \prg_return_false:
+ }
+ }
+}
+\cs_new_nopar:Npn \__tilings_keys_get:Nn #1#2
+{
+ \pgfkeysgetvalue{/tikz/tiling/#2}{#1}
+}
+\cs_new_nopar:Npn \__tilings_keys_get:n #1
+{
+ \pgfkeysvalueof{/tikz/tiling/#1}
+}
+\cs_new_nopar:Npn \__tilings_tikz_keys_get:Nn #1#2
+{
+ \pgfkeysgetvalue{/tikz/#2}{#1}
+}
+\cs_new_nopar:Npn \__tilings_tikz_keys_get:n #1
+{
+ \pgfkeysvalueof{/tikz/#1}
+}
+\cs_new_nopar:Npn \__tilings_pgf_keys_get:Nn #1#2
+{
+ \pgfkeysgetvalue{#2}{#1}
+}
+\cs_new_nopar:Npn \__tilings_pgf_keys_get:n #1
+{
+ \pgfkeysvalueof{#1}
+}
+\cs_new_nopar:Npn \__tilings_make_tile:nnn #1#2#3
+{
+ \group_begin:
+ \tl_set:Nn \l__tilings_tmpa_tl {#3}
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \tl_set:Nn \l__tilings_tmpa_tl {\pgfsyssoftpath@movetotoken}
+ \tl_put_right:Nx \l__tilings_tmpa_tl
+ {
+ {
+ \fp_to_dim:n
+ {(\tl_item:Nn \l__tilings_tmpb_tl {1}) * \c__tilings_cm_fp}
+ }
+ {
+ \fp_to_dim:n
+ {(\tl_item:Nn \l__tilings_tmpb_tl {2}) * \c__tilings_cm_fp}
+ }
+ }
+ \tl_set_eq:NN \l__tilings_tmp_tile_path_tl \l__tilings_tmpa_tl
+ \tl_set:Nn \l__tilings_tmpa_tl {#3}
+ \tl_put_right:Nx \l__tilings_tmpa_tl {{\tl_head:N \l__tilings_tmpa_tl}}
+ \tl_map_inline:nn {#2} {
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_head:n {##1}}
+ \tl_if_exist:cF {g__tilings_side_ \tl_use:N \l__tilings_tmpc_tl _tl}
+ {
+ \msg_error:nnx { tilings }{ no side } { \tl_use:N \l__tilings_tmpc_tl }
+ \tl_gset_eq:cc
+ {g__tilings_side_ \tl_use:N \l__tilings_tmpc_tl _tl}
+ {g__tilings_side_a_tl}
+ }
+ \tl_set_eq:Nc \l__tilings_tmpd_tl
+ {g__tilings_side_ \tl_use:N \l__tilings_tmpc_tl _tl}
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \fp_set:Nn \l__tilings_tmpa_fp
+ { \tl_item:Nn \l__tilings_tmpb_tl {1} }
+ \fp_set:Nn \l__tilings_tmpb_fp
+ { \tl_item:Nn \l__tilings_tmpb_tl {2} }
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {\tl_item:Nn \l__tilings_tmpb_tl {1} - \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpb_fp
+ {\tl_item:Nn \l__tilings_tmpb_tl {2} - \l__tilings_tmpb_fp}
+ \fp_set:Nn \l__tilings_tmpc_fp {-\l__tilings_tmpb_fp}
+ \tl_set:Nx \l__tilings_tmpb_tl
+ {
+ {\fp_to_dim:n { \l__tilings_tmpa_fp * \c__tilings_cm_fp }}
+ {\fp_to_dim:n { \l__tilings_tmpb_fp * \c__tilings_cm_fp }}% not swapped
+ {\fp_to_dim:n { \l__tilings_tmpc_fp * \c__tilings_cm_fp }}% not swapped
+ {\fp_to_dim:n { \l__tilings_tmpa_fp * \c__tilings_cm_fp }}
+ {0}
+ {0}
+ }
+ \spath_transform:NV \l__tilings_tmpd_tl \l__tilings_tmpb_tl
+ \spath_weld:NV \l__tilings_tmp_tile_path_tl \l__tilings_tmpd_tl
+ }
+ \spath_close:N \l__tilings_tmp_tile_path_tl
+ \tl_gset_eq:NN \g__tilings_output_tl \l__tilings_tmp_tile_path_tl
+ \group_end:
+ \tl_gclear_new:c {g__tilings_tile_#1_tl}
+ \tl_gset_eq:cN {g__tilings_tile_#1_tl} \g__tilings_output_tl
+ \tl_gclear:N \g__tilings_output_tl
+}
+\cs_new_nopar:Npn \__tilings_make_tile:nn #1#2
+{
+ \__tilings_make_tile:nnn {#1} #2
+}
+\cs_generate_variant:Nn \__tilings_make_tile:nn {nV}
+\prop_new:N \g__tilings_tiles_prop
+\cs_new_nopar:Npn \__tilings_add_coordinate:Nnn #1#2#3 {
+ \group_begin:
+ \fp_set:Nn \l__tilings_tmpa_fp {#2}
+ \fp_set:Nn \l__tilings_tmpb_fp {#3}
+ \bool_if:NT \l__tilings_relative_bool
+ {
+ \fp_add:Nn \l__tilings_tmpa_fp {\l__tilings_saved_x_fp}
+ \fp_add:Nn \l__tilings_tmpb_fp {\l__tilings_saved_y_fp}
+ }
+ \fp_gset_eq:NN \g__tilings_output_a_fp \l__tilings_tmpa_fp
+ \fp_gset_eq:NN \g__tilings_output_b_fp \l__tilings_tmpb_fp
+ \group_end:
+ \tl_put_right:Nx #1
+ {
+ {{\fp_use:N \g__tilings_output_a_fp}{\fp_use:N \g__tilings_output_b_fp}}
+ }
+ \bool_if:NT \l__tilings_update_saved_bool
+ {
+ \fp_set_eq:NN \l__tilings_saved_x_fp \g__tilings_output_a_fp
+ \fp_set_eq:NN \l__tilings_saved_y_fp \g__tilings_output_b_fp
+ }
+ \fp_gzero:N \g__tilings_output_a_fp
+ \fp_gzero:N \g__tilings_output_b_fp
+}
+\cs_new_nopar:Npn \__tilings_add_xy_coordinate:w #1#2,#3 \q_stop
+{
+ \__tilings_add_coordinate:Nnn #1 {#2}{#3}
+}
+\cs_new_nopar:Npn \__tilings_add_rth_coordinate:w #1#2:#3 \q_stop
+{
+ \__tilings_add_coordinate:Nnn #1 {(#3) * cosd(#2)}{(#3) * sind(#2)}
+}
+\cs_new_nopar:Npn \__tilings_transform_side_to_axis:Nnn #1#2#3
+{
+ \group_begin:
+ \prop_get:NnNTF \g__tilings_tiles_prop {#2} \l__tilings_tmpa_tl
+ {
+ \int_zero:N \l__tilings_tmpb_int
+ \int_incr:N \l__tilings_tmpb_int
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \bool_set_false:N \l__tilings_edge_bool
+ \tl_map_inline:Nn \l__tilings_tmpc_tl {
+ \str_if_eq:nnT {##1} {#3} {
+ \bool_set_true:N \l__tilings_edge_bool
+ \tl_map_break:
+ }
+ \int_incr:N \l__tilings_tmpb_int
+ }
+ \bool_if:NTF \l__tilings_edge_bool
+ {
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_item:Nn \l__tilings_tmpc_tl {1}}
+ \tl_put_right:Nx \l__tilings_tmpc_tl
+ {{\tl_item:Nn \l__tilings_tmpc_tl {1}}}
+ \tl_set:Nx \l__tilings_tmpa_tl
+ {\tl_item:Nn \l__tilings_tmpc_tl {\int_use:N \l__tilings_tmpb_int}}
+ \tl_set:Nx \l__tilings_tmpb_tl
+ {\tl_item:Nn \l__tilings_tmpc_tl {\int_use:N \l__tilings_tmpb_int + 1}}
+ \bool_if:NT #1
+ {
+ \tl_set:NV \l__tilings_tmpc_tl \l__tilings_tmpa_tl
+ \tl_set:NV \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ \tl_set:NV \l__tilings_tmpb_tl \l__tilings_tmpc_tl
+ }
+ \fp_set:Nn \l__tilings_xa_fp {\tl_item:Nn \l__tilings_tmpb_tl {1}}
+ \fp_set:Nn \l__tilings_ya_fp {\tl_item:Nn \l__tilings_tmpb_tl {2}}
+ \fp_set:Nn \l__tilings_xb_fp
+ {\tl_item:Nn \l__tilings_tmpa_tl {1} - \l__tilings_xa_fp}
+ \fp_set:Nn \l__tilings_yb_fp
+ {\tl_item:Nn \l__tilings_tmpa_tl {2} - \l__tilings_ya_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {(\l__tilings_xb_fp)^2 + (\l__tilings_yb_fp)^2}
+ \fp_set:Nn \l__tilings_xb_fp { \l__tilings_xb_fp / \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_yb_fp { \l__tilings_yb_fp / \l__tilings_tmpa_fp}
+ \tl_gset:Nx \g__tilings_output_tl
+ {
+ \exp_not:N \pgftransformtriangle
+ {
+ \exp_not:N \pgfpoint{0pt}{0pt}
+ }
+ {
+ \exp_not:N \pgfpoint
+ {\fp_to_dim:N \l__tilings_xb_fp}{\fp_to_dim:n {-\l__tilings_yb_fp}}
+ }
+ {
+ \exp_not:N \pgfpoint
+ {\fp_to_dim:N \l__tilings_yb_fp}{\fp_to_dim:N \l__tilings_xb_fp}
+ }
+ \exp_not:N \pgftransformshift
+ {
+ \exp_not:N \pgfpoint
+ {
+ \fp_to_dim:n {-\l__tilings_xa_fp * \c__tilings_cm_fp}
+ }
+ {
+ \fp_to_dim:n {-\l__tilings_ya_fp * \c__tilings_cm_fp}
+ }
+ }
+ }
+ }
+ {
+ \msg_error:nnxxx {tilings} {tile no edge} {#2} {#3}
+ {\tl_use:N \l__tilings_tmpc_tl }
+ \tl_gclear:N \g__tilings_output_tl
+ }
+ }
+ {
+ \msg_error:nnn {tilings} {no tile} {#2}
+ \tl_gclear:N \g__tilings_output_tl
+ }
+ \group_end:
+ \tl_use:N \g__tilings_output_tl
+ \tl_gclear:N \g__tilings_output_tl
+}
+\cs_generate_variant:Nn
+\__tilings_transform_side_to_axis:Nnn {Nnx,NnV,NVV}
+\cs_new_nopar:Npn \__tilings_translate_vertex_to_origin:Nnn #1#2#3
+{
+ \group_begin:
+ \prop_get:NnNTF \g__tilings_tiles_prop {#2} \l__tilings_tmpa_tl
+ {
+ \int_zero:N \l__tilings_tmpb_int
+ \int_incr:N \l__tilings_tmpb_int
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \bool_set_false:N \l__tilings_edge_bool
+ \tl_map_inline:Nn \l__tilings_tmpc_tl {
+ \str_if_eq:nnT {##1} {#3} {
+ \bool_set_true:N \l__tilings_edge_bool
+ \tl_map_break:
+ }
+ \int_incr:N \l__tilings_tmpb_int
+ }
+ \bool_if:NTF \l__tilings_edge_bool
+ {
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_item:Nn \l__tilings_tmpc_tl {1}}
+ \tl_put_right:Nx \l__tilings_tmpc_tl
+ {{\tl_item:Nn \l__tilings_tmpc_tl {1}}}
+ \tl_set:Nx \l__tilings_tmpa_tl
+ {\tl_item:Nn \l__tilings_tmpc_tl {\int_use:N \l__tilings_tmpb_int}}
+ \tl_set:Nx \l__tilings_tmpb_tl
+ {\tl_item:Nn \l__tilings_tmpc_tl {\int_use:N \l__tilings_tmpb_int + 1}}
+ \bool_if:NT #1
+ {
+ \tl_set:NV \l__tilings_tmpc_tl \l__tilings_tmpa_tl
+ \tl_set:NV \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ \tl_set:NV \l__tilings_tmpb_tl \l__tilings_tmpc_tl
+ }
+ \fp_set:Nn \l__tilings_xa_fp {\tl_item:Nn \l__tilings_tmpb_tl {1}}
+ \fp_set:Nn \l__tilings_ya_fp {\tl_item:Nn \l__tilings_tmpb_tl {2}}
+ \tl_gset:Nx \g__tilings_output_tl
+ {
+ \exp_not:N \pgftransformshift
+ {
+ \exp_not:N \pgfpoint
+ {
+ \fp_to_dim:n {-\l__tilings_xa_fp * \c__tilings_cm_fp}
+ }
+ {
+ \fp_to_dim:n {-\l__tilings_ya_fp * \c__tilings_cm_fp}
+ }
+ }
+ }
+ }
+ {
+ \msg_error:nnxxx {tilings} {tile no edge} {#2} {#3}
+ {\tl_use:N \l__tilings_tmpc_tl }
+ \tl_gclear:N \g__tilings_output_tl
+ }
+ }
+ {
+ \msg_error:nnn {tilings} {no tile} {#2}
+ \tl_gclear:N \g__tilings_output_tl
+ }
+ \group_end:
+ \tl_use:N \g__tilings_output_tl
+ \tl_gclear:N \g__tilings_output_tl
+}
+\cs_generate_variant:Nn
+\__tilings_translate_vertex_to_origin:Nnn {Nnx,NnV,NVV}
+\DeclareDocumentCommand \TransformAlongSide {s m m}
+{
+ \IfBooleanTF {#1}
+ {
+ \bool_set_true:N \l__tilings_cw_bool
+ }
+ {
+ \bool_set_false:N \l__tilings_cw_bool
+ }
+ \__tilings_transform_side_to_axis:Nnx \l__tilings_cw_bool {#2}{#3}
+}
+\cs_new_nopar:Npn \__tilings_coordinates_at_vertices:n #1
+{
+ \group_begin:
+ \prop_get:NnN \g__tilings_tiles_prop {#1} \l__tilings_tmpa_tl
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_tail:N \l__tilings_tmpa_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {\tl_item:Nn \l__tilings_tmpc_tl {1}}
+ \tl_put_right:Nx \l__tilings_tmpc_tl
+ {{\tl_item:Nn \l__tilings_tmpc_tl {1}}}
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_head:N \l__tilings_tmpc_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_tail:N \l__tilings_tmpc_tl}
+ \tl_map_inline:Nn \l__tilings_tmpb_tl {
+ \tl_set:Nx \l__tilings_tmpd_tl {
+ \exp_not:N \coordinate
+ (-edge~ ##1~ start)~
+ at (
+ \tl_item:Nn \l__tilings_tmpa_tl {1},
+ \tl_item:Nn \l__tilings_tmpa_tl {2}
+ );
+ }
+ \tl_use:N \l__tilings_tmpd_tl
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_head:N \l__tilings_tmpc_tl}
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_tail:N \l__tilings_tmpc_tl}
+ \tl_set:Nx \l__tilings_tmpd_tl {
+ \exp_not:N \coordinate
+ (-edge~ ##1~ end)~
+ at (
+ \tl_item:Nn \l__tilings_tmpa_tl {1},
+ \tl_item:Nn \l__tilings_tmpa_tl {2}
+ );
+ }
+ \tl_use:N \l__tilings_tmpd_tl
+ }
+ \group_end:
+}
+\DeclareDocumentCommand \CoordinatesAtVertices {m}
+{
+ \__tilings_coordinates_at_vertices:n {#1}
+}
+\tikzset{
+ transform~ to~ tile/.code~ args={#1~ along~ #2}{%
+ \group_begin:
+ \tl_if_in:nnTF {#1} {back}
+ {
+ \tikzset{
+ tiling/alignment~ set~ location=#1,
+ tiling/alignment~ direction={backwards}
+ }
+ }
+ {
+ \tikzset{
+ tiling/alignment~ location=#1,
+ tiling/alignment~ direction={forewards}
+ }
+ }
+ \tl_if_in:nnTF {#2} {using}
+ {
+ \tikzset{
+ tiling/alignment~ set~ edges=#2,
+ }
+ }
+ {
+ \tikzset{
+ tiling/alignment~ edge=#2,
+ }
+ }
+ \tikz_scan_point:n {
+ (\__tilings_keys_get:n {alignment~ location}
+ -edge~ \__tilings_keys_get:n {alignment~ edge}~ start)
+ }
+ \dim_set_eq:Nc \l__tilings_xa_dim {pgf@x}
+ \dim_set_eq:Nc \l__tilings_ya_dim {pgf@y}
+ \tikz_scan_point:n {
+ (\__tilings_keys_get:n {alignment~ location}
+ -edge~ \__tilings_keys_get:n {alignment~ edge}~ end)
+ }
+ \dim_set_eq:Nc \l__tilings_xb_dim {pgf@x}
+ \dim_set_eq:Nc \l__tilings_yb_dim {pgf@y}
+ \__tilings_keys_get:Nn \l__tilings_tmpb_tl {alignment~ direction}
+ \tl_if_eq:NnTF \l__tilings_tmpb_tl {forewards}
+ {
+ \dim_gset_eq:NN \g__tilings_xa_dim \l__tilings_xa_dim
+ \dim_gset_eq:NN \g__tilings_ya_dim \l__tilings_ya_dim
+ \dim_gset_eq:NN \g__tilings_xb_dim \l__tilings_xb_dim
+ \dim_gset_eq:NN \g__tilings_yb_dim \l__tilings_yb_dim
+ }
+ {
+ \dim_gset_eq:NN \g__tilings_xa_dim \l__tilings_xb_dim
+ \dim_gset_eq:NN \g__tilings_ya_dim \l__tilings_yb_dim
+ \dim_gset_eq:NN \g__tilings_xb_dim \l__tilings_xa_dim
+ \dim_gset_eq:NN \g__tilings_yb_dim \l__tilings_ya_dim
+ }
+ \dim_gsub:Nn \g__tilings_xb_dim {\g__tilings_xa_dim}
+ \dim_gsub:Nn \g__tilings_yb_dim {\g__tilings_ya_dim}
+ \dim_gset:Nn \g__tilings_xb_dim
+ {\g__tilings_xb_dim * \dim_ratio:nn {1pt}{1cm}}
+ \dim_gset:Nn \g__tilings_yb_dim
+ {\g__tilings_yb_dim * \dim_ratio:nn {1pt}{1cm}}
+ \group_end:
+ \pgftransformshift{\pgfpoint{\g__tilings_xa_dim}{\g__tilings_ya_dim}}
+ \pgftransformtriangle
+ {\pgfpoint{0pt}{0pt}}
+ {\pgfpoint{\g__tilings_xb_dim}{\g__tilings_yb_dim}}
+ {\pgfpoint{-\g__tilings_yb_dim}{\g__tilings_xb_dim}}
+ },
+ align~ with/.code~ args={#1~ along~ #2}{%
+ \tl_if_in:nnTF {#1} {back}
+ {
+ \tikzset{
+ tiling/alignment~ set~ location=#1,
+ tiling/alignment~ direction={backwards}
+ }
+ }
+ {
+ \tikzset{
+ tiling/alignment~ location=#1,
+ tiling/alignment~ direction={forewards}
+ }
+ }
+ \tl_if_in:nnTF {#2} {using}
+ {
+ \tikzset{
+ tiling/alignment~ set~ edges=#2,
+ }
+ }
+ {
+ \tikzset{
+ tiling/alignment~ edge=#2,
+ }
+ }
+ \tikz_node_if_defined:nTF
+ {
+ \__tilings_keys_get:n {alignment~ location}
+ -edge~ \__tilings_keys_get:n {alignment~ edge}~ start
+ }
+ {
+ \tikzset{
+ tiling/alignment~ start/.expanded={
+ (\__tilings_keys_get:n {alignment~ location}
+ -edge~ \__tilings_keys_get:n {alignment~ edge}~ start)
+ },
+ tiling/alignment~ end/.expanded={
+ (\__tilings_keys_get:n {alignment~ location}
+ -edge~ \__tilings_keys_get:n {alignment~ edge}~ end)
+ },
+ }
+ }
+ {
+ \__tilings_keys_get:Nn \l__tilings_tmpa_tl {alignment~ location}
+ \tl_set:Nx \l__tilings_tmpa_tl {\tl_use:N \l__tilings_tmpa_tl}
+ \prop_get:NVNTF \g__tilings_tilenames_prop
+ \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ {
+ \prop_get:NVN \g__tilings_tiles_prop
+ \l__tilings_tmpb_tl \l__tilings_tmpc_tl
+ \msg_error:nnxxx { tilings }{ tile no edge }
+ {
+ \tl_use:N \l__tilings_tmpa_tl \c_space_tl
+ (type~ \tl_use:N \l__tilings_tmpb_tl)
+ }
+ {\__tilings_keys_get:n {alignment~ edge} }
+ { \tl_item:Nn \l__tilings_tmpc_tl {1} }
+ }
+ {
+ \msg_error:nnx { tilings }{ no tile }
+ {\__tilings_keys_get:n {alignment~ location} }
+ }
+ }
+ },
+ tiling/.is~ family,
+ tiling/alignment~ set~ location/.code~ args={#1~ back}{
+ \tikzset{
+ tiling/alignment~ location=#1,
+ }
+ },
+ tiling/alignment~ set~ edges/.code~ args={#1~ using~ #2}{
+ \tikzset{
+ tiling/alignment~ edge=#1,
+ tiling/alignment~ new~ edge=#2
+ }
+ },
+ align~ between/.code~ args={#1~ and~ #2~ using~ #3}{
+ \tikzset{
+ tiling/alignment~ start={#1},
+ tiling/alignment~ end={#2},
+ }
+ \str_set:Nn \l__tilings_tmpa_str {#3}
+ \str_set:Nx \l__tilings_tmpb_str {\str_tail:N \l__tilings_tmpa_str}
+ \tikzset{
+ tiling/alignment~ new~ edge/.expanded={\str_use:N \l__tilings_tmpb_str}
+ }
+ \str_set:Nx \l__tilings_tmpa_str {\str_head:N \l__tilings_tmpa_str}
+ \str_set:Nx \l__tilings_tmpb_str {\str_lowercase:f { \l__tilings_tmpa_str}}
+ \str_if_eq:NNT \l__tilings_tmpa_str \l__tilings_tmpb_str
+ {
+ \str_set:Nx \l__tilings_tmpb_str
+ {\str_uppercase:f { \l__tilings_tmpa_str}}
+ }
+ \tikzset{
+ tiling/alignment~ edge/.expanded={\str_use:N \l__tilings_tmpb_str},
+ }
+ },
+ tiling/alignment~ location/.initial={},
+ tiling/alignment~ edge/.initial=a,
+ tiling/alignment~ new~ edge/.initial={},
+ tiling/alignment~ direction/.initial={forewards},
+ tiling/alignment~ start/.initial={},
+ tiling/alignment~ end/.initial={},
+ tiling/anchor/.initial={},
+ every~ tile~ clip/.style={clip}
+}
+\DeclareDocumentCommand \DefineTile { s m m m }
+{
+ \tl_clear:N \l__tilings_tmpa_tl
+ \int_zero:N \l__tilings_tmpa_int
+ \fp_zero:N \l__tilings_saved_x_fp
+ \fp_zero:N \l__tilings_saved_y_fp
+ \tl_map_inline:nn {#4} {
+ \str_set:Nn \l__tilings_tmpa_str {##1}
+ \str_if_eq:VnTF \l__tilings_tmpa_str {+}
+ {
+ \int_incr:N \l__tilings_tmpa_int
+ }
+ {
+ \int_case:nn {\l__tilings_tmpa_int}
+ {
+ {0} {
+ \bool_set_false:N \l__tilings_relative_bool
+ \bool_set_true:N \l__tilings_update_saved_bool
+ }
+ {1} {
+ \bool_set_true:N \l__tilings_relative_bool
+ \bool_set_false:N \l__tilings_update_saved_bool
+ }
+ {2} {
+ \bool_set_true:N \l__tilings_relative_bool
+ \bool_set_true:N \l__tilings_update_saved_bool
+ }
+
+ }
+ \str_if_in:NnTF \l__tilings_tmpa_str {:}
+ {
+ \seq_set_split:NVV \l__tilings_tmpa_seq \c__tilings_colon_str \l__tilings_tmpa_str
+ \__tilings_add_coordinate:Nnn \l__tilings_tmpa_tl
+ {
+ (\seq_item:Nn \l__tilings_tmpa_seq {2}) * cosd (\seq_item:Nn \l__tilings_tmpa_seq {1})
+ }
+ {
+ (\seq_item:Nn \l__tilings_tmpa_seq {2}) * sind (\seq_item:Nn \l__tilings_tmpa_seq {1})
+ }
+ }
+ {
+ \seq_set_split:NVV \l__tilings_tmpa_seq \c__tilings_comma_str \l__tilings_tmpa_str
+ \__tilings_add_coordinate:Nnn \l__tilings_tmpa_tl
+ {
+ (\seq_item:Nn \l__tilings_tmpa_seq {1})
+ }
+ {
+ (\seq_item:Nn \l__tilings_tmpa_seq {2})
+ }
+ }
+ \int_zero:N \l__tilings_tmpa_int
+ }
+ }
+ \prop_clear:N \l__tilings_tmpa_prop
+ \tl_map_inline:nn {#3} {
+ \prop_if_in:NnTF \l__tilings_tmpa_prop {##1}
+ {
+ \prop_put:Nnn \l__tilings_tmpa_prop {##1} {1}
+ }
+ {
+ \prop_put:Nnn \l__tilings_tmpa_prop {##1} {0}
+ }
+ }
+ \tl_clear:N \l__tilings_tmpb_tl
+ \tl_map_inline:nn {#3}
+ {
+ \tl_clear:N \l__tilings_tmpc_tl
+ \tl_put_right:Nn \l__tilings_tmpc_tl {##1}
+ \int_compare:nF {\prop_item:Nn \l__tilings_tmpa_prop {##1} == 0} {
+ \tl_put_right:Nx \l__tilings_tmpc_tl
+ {\prop_item:Nn \l__tilings_tmpa_prop {##1}}
+ \prop_put:Nnx \l__tilings_tmpa_prop {##1}
+ {\int_eval:n {\prop_item:Nn \l__tilings_tmpa_prop {##1} + 1}}
+ }
+ \tl_put_right:Nx \l__tilings_tmpb_tl {{ \l__tilings_tmpc_tl }}
+ }
+ \prop_gput:Nnx \g__tilings_tiles_prop {#2}
+ {{\tl_use:N \l__tilings_tmpb_tl} {\tl_use:N \l__tilings_tmpa_tl}}
+ \tikzset{
+ #2/.pic={
+ \begin{scope}[
+ every~ tile~ scope/.try,
+ every~ #2~ scope/.try,
+ this~ tile~ scope/.try
+ ]
+ \tikz@fig@mustbenamed
+ \prop_gput:NVn \g__tilings_tilenames_prop \tikz@fig@name {#2}
+ \__tilings_keys_get:Nn \l__tilings_tmpa_tl {alignment~ start}
+ \tl_if_empty:NTF \l__tilings_tmpa_tl
+ {
+ \prop_get:NnN \g__tilings_tiles_prop {#2} \l__tilings_tmpa_tl
+ \tl_set:Nx \l__tilings_tmpc_tl {\tl_head:N \l__tilings_tmpa_tl}
+ \__tilings_keys_get:Nn \l__tilings_tmpa_tl {anchor}
+ \tl_if_empty:NTF \l__tilings_tmpa_tl
+ {
+ \bool_if:NT \l__tilings_cw_bool
+ {
+ \pgftransformxscale {-1}
+ }
+ }
+ {
+ \regex_extract_once:NVNTF
+ \c__tilings_anchor_regex \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ {
+ \regex_replace_once:NnN \c__tilings_anchor_regex {} \l__tilings_tmpa_tl
+ \tl_if_eq:NnTF \l__tilings_tmpb_tl {~end}
+ {
+ \bool_set_true:N \l__tilings_cw_bool
+ }
+ {
+ \bool_set_false:N \l__tilings_cw_bool
+ }
+ }
+ {
+ \bool_set_false:N \l__tilings_cw_bool
+ }
+ \tl_set:Nx \l__tilings_tmpb_tl {{\tl_use:N \l__tilings_tmpa_tl}}
+ \tl_if_in:NVT \l__tilings_tmpc_tl \l__tilings_tmpb_tl
+ {
+ \__tilings_translate_vertex_to_origin:NnV
+ \l__tilings_cw_bool {#2} \l__tilings_tmpa_tl
+ }
+ }
+ }
+ {
+ \group_begin:
+ \tikzset{
+ name~ prefix~ ..
+ }
+ \tikz_scan_point:n {
+ \__tilings_keys_get:n {alignment~ start}
+ }
+ \dim_set_eq:Nc \l__tilings_xa_dim {pgf@x}
+ \dim_set_eq:Nc \l__tilings_ya_dim {pgf@y}
+ \tikz_scan_point:n {
+ \__tilings_keys_get:n {alignment~ end}
+ }
+ \dim_set_eq:Nc \l__tilings_xb_dim {pgf@x}
+ \dim_set_eq:Nc \l__tilings_yb_dim {pgf@y}
+ \__tilings_keys_get:Nn \l__tilings_tmpb_tl {alignment~ direction}
+ \tl_if_eq:NnTF \l__tilings_tmpb_tl {forewards}
+ {
+ \dim_gset_eq:NN \g__tilings_xa_dim \l__tilings_xa_dim
+ \dim_gset_eq:NN \g__tilings_ya_dim \l__tilings_ya_dim
+ \dim_gset_eq:NN \g__tilings_xb_dim \l__tilings_xb_dim
+ \dim_gset_eq:NN \g__tilings_yb_dim \l__tilings_yb_dim
+ }
+ {
+ \dim_gset_eq:NN \g__tilings_xa_dim \l__tilings_xb_dim
+ \dim_gset_eq:NN \g__tilings_ya_dim \l__tilings_yb_dim
+ \dim_gset_eq:NN \g__tilings_xb_dim \l__tilings_xa_dim
+ \dim_gset_eq:NN \g__tilings_yb_dim \l__tilings_ya_dim
+ }
+ \dim_gsub:Nn \g__tilings_xb_dim {\g__tilings_xa_dim}
+ \dim_gsub:Nn \g__tilings_yb_dim {\g__tilings_ya_dim}
+ \dim_gset:Nn \g__tilings_xb_dim {\g__tilings_xb_dim * \dim_ratio:nn {1pt}{1cm}}
+ \dim_gset:Nn \g__tilings_yb_dim {\g__tilings_yb_dim * \dim_ratio:nn {1pt}{1cm}}
+ \group_end:
+ \pgftransformshift{\pgfpoint{\g__tilings_xa_dim}{\g__tilings_ya_dim}}
+ \pgftransformtriangle
+ {\pgfpoint{0pt}{0pt}}
+ {\pgfpoint{\g__tilings_xb_dim}{\g__tilings_yb_dim}}
+ {\pgfpoint{-\g__tilings_yb_dim}{\g__tilings_xb_dim}}
+ \str_set:Nx \l__tilings_tmpa_str
+ {\__tilings_keys_get:n {alignment~ edge}}
+ \str_set:Nx \l__tilings_tmpa_str {\str_head:N \l__tilings_tmpa_str}
+ \str_put_right:Nx \l__tilings_tmpa_str
+ {\__tilings_keys_get:n {alignment~ new~ edge}}
+ \str_set:Nx \l__tilings_tmpb_str {\str_lowercase:f { \l__tilings_tmpa_str}}
+ \str_if_eq:NNT \l__tilings_tmpa_str \l__tilings_tmpb_str
+ {
+ \str_set:Nx \l__tilings_tmpb_str
+ {\str_uppercase:f { \l__tilings_tmpa_str}}
+ }
+
+ \IfBooleanT {#1}
+ {
+ \bool_set:Nn \l__tilings_cw_bool {!\l__tilings_cw_bool}
+ }
+ \bool_if:NT \l__tilings_cw_bool
+ {
+ \pgftransformyscale {-1}
+ }
+ \__tilings_transform_side_to_axis:NnV \l__tilings_cw_bool {#2} \l__tilings_tmpb_str
+ }
+ \__tilings_coordinates_at_vertices:n {#2}
+ \coordinate[alias=-center] (-centre) at (0,0);
+ \UseTile[
+ every~ tile~ clip/.try,
+ every~ #2~ clip/.try,
+ this~ tile~ clip/.try
+ ]{#2}
+ \tikzset{
+ every~ tile~ before~ path/.try,
+ every~ #2~ before~ path/.try,
+ this~ tile~ before~ path/.try
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ #2/.try,
+ this~ tile/.try,
+ pic~ actions
+ ]{#2}
+ \tikzset{
+ every~ tile~ after~ path/.try,
+ every~ #2~ after~ path/.try,
+ this~ tile~ after~ path/.try
+ }
+ \end{scope}
+ },
+ #2/.style={
+ every~ tile~ pic/.try,
+ every~ #2~ pic/.try,
+ pic~ type=#2,
+ }
+ }
+}
+\cs_new_protected_nopar:Npn \__tilings_bake_tile:n #1
+{
+ \prop_get:NnN \g__tilings_tiles_prop {#1} \l__tilings_tmpa_tl
+ \__tilings_make_tile:nV {#1} \l__tilings_tmpa_tl
+}
+
+\NewDocumentCommand \BakeTile {m}
+{
+ \__tilings_bake_tile:n {#1}
+}
+\cs_new_protected_nopar:Npn \__tilings_use_tile:nn #1#2
+{
+ \tl_if_exist:cTF {g__tilings_tile_#2_tl}
+ {
+ \tl_set_eq:Nc \l__tilings_tmp_tile_path_tl {g__tilings_tile_#2_tl}
+ \pgfgettransform \l__tilings_tmpa_tl
+ \spath_transform:NV \l__tilings_tmp_tile_path_tl \l__tilings_tmpa_tl
+ \spath_tikz_path:nV {#1} \l__tilings_tmp_tile_path_tl
+ }
+ {
+ \msg_error:nnn { tilings }{ not baked }{#2}
+ }
+}
+
+\NewDocumentCommand \UseTile {O{} m}
+{
+ \__tilings_use_tile:nn {#1}{#2}
+}
+\tikzset{
+ save~ tiling~ path/.code={
+ \tikz@addmode{
+ \pgfsyssoftpath@getcurrentpath\l__tilings_tmpa_tl
+ \__tilings_normalise_path:N \l__tilings_tmpa_tl
+ \tl_gclear_new:c {g__tilings_side_#1_tl}
+ \tl_gset_eq:cN {g__tilings_side_#1_tl} \l__tilings_tmpa_tl
+ \tl_set:Nx \l__tilings_tmpb_tl {\str_uppercase:n {#1}}
+ \spath_reverse:N \l__tilings_tmpa_tl
+ \spath_transform:Nnnnnnn \l__tilings_tmpa_tl {-1} {0} {0} {-1} {1} {0}
+ \tl_gclear_new:c {g__tilings_side_ \tl_use:N \l__tilings_tmpb_tl _tl}
+ \tl_gset_eq:cN {g__tilings_side_ \tl_use:N \l__tilings_tmpb_tl _tl} \l__tilings_tmpa_tl
+ }
+ },
+ clone~ tiling~ side~ path/.style~ 2~ args={
+ spath/set~ name=tiling~ side,
+ spath/clone~ global={#1}{#2}
+ },
+ flip~ tile/.code={
+ \tl_set:Nn \l__tilings_tmpa_tl {#1}
+ \tl_set:Nn \l__tilings_tmpb_tl {true}
+ \bool_set:Nn \l__tilings_cw_bool {\tl_if_eq_p:NN \l__tilings_tmpa_tl \l__tilings_tmpb_tl}
+ },
+ flip~ tile/.default={true},
+ spath/prefix/tiling~side/.style={
+ spath/set~ prefix=g__tilings_side_,
+ },
+ spath/suffix/tiling~side/.style={
+ spath/set~ suffix=_tl,
+ },
+ clone~ tile~ path/.style~ 2~ args={
+ spath/set~ name=tiling~tile,
+ spath/clone~ global={#1}{#2}
+ },
+ spath/prefix/tiling~tile/.style={
+ spath/set~ prefix=g__tilings_tile_,
+ },
+ spath/suffix/tiling~tile/.style={
+ spath/set~ suffix=_tl,
+ },
+ expand~ key/.code={
+ \exp_args:NV \pgfkeysalso #1
+ }
+}
+\cs_new_nopar:Npn \__tilings_make_lms:Nnnn #1#2#3#4
+{
+ \group_begin:
+ \tl_set:Nn \l__tilings_tmpb_tl {#4}
+ \prg_replicate:nn {#3} {
+ \tl_set_eq:NN \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ \tl_clear:N \l__tilings_tmpb_tl
+ \tl_map_inline:Nn \l__tilings_tmpa_tl
+ {
+ \tl_set:Nx \l__tilings_action_lms_tl {\tl_head:n {##1}}
+ \tl_set:Nx \l__tilings_parameters_lms_tl {\tl_tail:n {##1}}
+ \prop_if_in:cVTF {g__tilings_#2_lms_rule_prop} \l__tilings_action_lms_tl
+ {
+ \prop_get:cVN {g__tilings_#2_lms_rule_prop} \l__tilings_action_lms_tl \l__tilings_tmpc_tl
+ \tl_put_right:Nx \l__tilings_tmpb_tl {\tl_use:N \l__tilings_tmpc_tl}
+ }
+ {
+ \tl_if_single:nTF {##1}
+ {
+ \tl_put_right:Nn \l__tilings_tmpb_tl {##1}
+ }
+ {
+ \tl_put_right:Nn \l__tilings_tmpb_tl {{##1}}
+ }
+ }
+ }
+ }
+ \tl_set:Nn \l__tilings_tmpa_tl {
+ \group_end:
+ \tl_set:Nn #1
+ }
+ \tl_put_right:Nx \l__tilings_tmpa_tl {{\tl_use:N \l__tilings_tmpb_tl}}
+ \tl_use:N \l__tilings_tmpa_tl
+}
+\cs_generate_variant:Nn \__tilings_make_lms:Nnnn {Nnnx}
+\cs_new_nopar:Npn \__tilings_invoke_lms:nn #1#2
+{
+ \group_begin:
+ \tl_map_inline:nn {#1} {
+ \tl_set:Nx \l__tilings_action_lms_tl {\tl_head:n {##1}}
+ \tl_set:Nx \l__tilings_parameters_lms_tl {\tl_tail:n {##1}}
+ \prop_if_in:cVTF {g__tilings_#2_lms_action_prop} \l__tilings_action_lms_tl
+ {
+ \prop_item:cV {g__tilings_#2_lms_action_prop} \l__tilings_action_lms_tl
+ }
+ {
+ \prop_if_in:cVT {g__tilings_default_lms_action_prop} \l__tilings_action_lms_tl
+ {
+ \prop_item:cV {g__tilings_default_lms_action_prop} \l__tilings_action_lms_tl
+ }
+ }
+ }
+ \group_end:
+}
+\cs_generate_variant:Nn \__tilings_invoke_lms:nn {Vn}
+\dim_new:N \l__tilings_step_dim
+\dim_set:Nn \l__tilings_step_dim {1cm}
+\prop_new:N \g__tilings_default_lms_action_prop
+\prop_gput:Nnn \g__tilings_default_lms_action_prop {[} {\group_begin:}
+\prop_gput:Nnn \g__tilings_default_lms_action_prop {]} {\group_end:}
+\prop_gput:Nnn \g__tilings_default_lms_action_prop {f}
+{\pgftransformxshift{\l__tilings_step_dim}}
+\prop_gput:Nnn \g__tilings_default_lms_action_prop {b}
+{\pgftransformxshift{-\l__tilings_step_dim}}
+\prop_new:N \g__tilings_drawables_lms_prop
+\int_new:N \g__tilings_tile_int
+\int_new:N \g__tilings_tiles_int
+\cs_new_protected_nopar:Npn \__tilings_tiling_decomposition:nnnn #1#2#3#4
+{
+ \group_begin:
+ \tikzset{
+ every~ #2~ decomposition/.try,
+ #1
+ }
+ \__tilings_make_lms:Nnnx \l__tilings_tmpa_tl {#2} {#3} {#4}
+ \__tilings_count_lms:Vn \l__tilings_tmpa_tl {#2}
+ \int_gzero:N \g__tilings_tile_int
+ \__tilings_invoke_lms:Vn \l__tilings_tmpa_tl {#2}
+ \group_end:
+}
+\cs_new_protected_nopar:Npn \__tilings_tiling_decomposition:nnn #1#2#3
+{
+ \__tilings_tiling_decomposition:nnnn {}{#1}{#2}{#3}
+}
+\cs_generate_variant:Nn \__tilings_tiling_decomposition:nnn {VVV}
+
+\NewDocumentCommand \TilingDecomposition { O{} m m m }
+{
+ \__tilings_tiling_decomposition:nnnn {#1}{#2}{#3}{#4}
+}
+
+\tikzset{
+ pics/decomposition/.style~ n~ args={3}{
+ code={
+ \__tilings_tiling_decomposition:nnn {#1}{#2}{#3}
+ }
+ }
+}
+\cs_new_nopar:Npn \__tilings_count_lms:nn #1#2
+{
+ \group_begin:
+ \int_gzero:N \g__tilings_tiles_int
+ \prop_get:NnNT \g__tilings_drawables_lms_prop {#2} \l__tilings_tmpa_tl
+ {
+ \tl_map_variable:nNn {#1} \l__tilings_tmpb_tl
+ {
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpb_tl}
+ \bool_do_while:nn
+ {
+ !\tl_if_empty_p:N \l__tilings_tmpb_tl
+ &&
+ \tl_if_head_is_group_p:V \l__tilings_tmpb_tl
+ }
+ {
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_head:N \l__tilings_tmpb_tl}
+ }
+ \tl_if_in:NVT \l__tilings_tmpa_tl \l__tilings_tmpb_tl
+ {
+ \int_gincr:N \g__tilings_tiles_int
+ }
+ }
+ }
+ \group_end:
+}
+\cs_generate_variant:Nn \__tilings_count_lms:nn {Vn}
+\tikzset{
+ tiling~ step/.code={
+ \dim_set:Nn \l__tilings_step_dim {#1}
+ }
+}
+\ExplSyntaxOff
+%%
+%% Copyright (C) 2014-2023 by Andrew Stacey <loopspace@mathforge.org>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License (LPPL), either
+%% version 1.3c of this license or (at your option) any later
+%% version. The latest version of this license is in the file:
+%%
+%% http://www.latex-project.org/lppl.txt
+%%
+%% This work is "maintained" (as per LPPL maintenance status) by
+%% Andrew Stacey.
+%%
+%% This work consists of the files penrose_code.dtx
+%% penrose.tex
+%% and the derived files penrose.ins
+%% penrose_code.pdf
+%% penrose.pdf
+%% tikzlibrarytilings.code.tex
+%% tikzlibrarytilings.penrose.code.tex
+%% tikzlibrarytilings.polykite.code.tex
+%% tikzlibrarypenrose.code.tex
+%% README.txt
+%%
+%%
+%% End of file `tikzlibrarytilings.code.tex'.
diff --git a/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.penrose.code.tex b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.penrose.code.tex
new file mode 100644
index 00000000000..0dbf14e5185
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.penrose.code.tex
@@ -0,0 +1,699 @@
+%%
+%% This is file `tikzlibrarytilings.penrose.code.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% tilings_code.dtx (with options: `penrose')
+%% ----------------------------------------------------------------
+%% tilings --- TikZ library for producing tilings
+%% E-mail: loopspace@mathforge.org
+%% Released under the LaTeX Project Public License v1.3c or later
+%% See http://www.latex-project.org/lppl.txt
+%% ----------------------------------------------------------------
+%%
+\RequirePackage{tikz}
+\usetikzlibrary{tilings}
+\ProvidesFile {tikzlibrarytilings.penrose.code.tex}
+[2023/06/01 v2.0 TikZ pics for Penrose tiles]
+\DefineTile{thin rhombus}{a A B b}
+{
+ {0 , 0}
+ {cosd(18) , sind(18)}
+ {2*cosd(18) , 0}
+ {cosd(18) , -sind(18)}
+}
+\DefineTile{thick rhombus}{B a A b}
+{
+ {0 , 0}
+ {cosd(36) , sind(36)}
+ {2*cosd(36) , 0}
+ {cosd(36) , -sind(36)}
+}
+\DefineTile{dart}{c a A C}
+{
+ {0 , 0}
+ {2*sind(18)*cosd(108) , 2*sind(18)*sind(108)}
+ {2*sind(18) , 0}
+ {2*sind(18)*cosd(108) , -2*sind(18)*sind(108)}
+}
+\DefineTile{kite}{a c C A}
+{
+ {0 , 0}
+ {cosd(36) , sind(36)}
+ {1 , 0}
+ {cosd(36) , -sind(36)}
+}
+\DefineTile{golden triangle}{a c b}
+{
+ {0 , 0}
+ {cosd(18) , sind(18)}
+ {cosd(18) , -sind(18)}
+}
+\DefineTile {reverse golden triangle}{B C A}
+{
+ {0 , 0}
+ {cosd(18) , sind(18)}
+ {cosd(18) , -sind(18)}
+}
+\DefineTile {golden gnomon}{C b A}
+{
+ {0 , 0}
+ {cosd(36) , sind(36)}
+ {2*cosd(36) , 0}
+}
+\DefineTile {reverse golden gnomon}{a B c}
+{
+ {0 , 0}
+ {2*cosd(36) , 0}
+ {cosd(36) , -sind(36)}
+}
+\DefineTile {pentagon 5}{a a a a a}
+{
+ {0 , 0}
+ {cosd(108) , sind(108)}
+ {1+cosd(72)+cosd(144) , sind(72)+sind(144)}
+ {1+cosd(72) , sind(72)}
+ {1 , 0}
+}
+\DefineTile {pentagon 3}{A b a a b}
+{
+ {0 , 0}
+ {cosd(108) , sind(108)}
+ {1+cosd(72)+cosd(144) , sind(72)+sind(144)}
+ {1+cosd(72) , sind(72)}
+ {1 , 0}
+}
+\DefineTile {pentagon 2}{d A e c A}
+{
+ {0 , 0}
+ {cosd(108) , sind(108)}
+ {1+cosd(72)+cosd(144) , sind(72)+sind(144)}
+ {1+cosd(72) , sind(72)}
+ {1 , 0}
+}
+\DefineTile {pentagram}{C E C E C E C E C E}
+{
+ {1 , 0}
+ {1-cosd(36) , -sind(36)}
+ {1-cosd(36)-cosd(108) , -sind(36)-sind(108)}
+ {cosd(108) , -sind(108)}
+ {-1+3*cosd(108)+cosd(36) , -sind(36)-sind(108)}
+ {-1+2*cosd(108)+cosd(36) , -sind(36)}
+ {-1+2*cosd(108) , 0}
+ {2*cosd(108) , 0}
+ {cosd(108) , sind(108)}
+ {0 , 0}
+}
+\DefineTile {boat}{C E C E B D B}
+{
+ {-1+2*cosd(108) , 0}
+ {2*cosd(108) , 0}
+ {cosd(108) , sind(108)}
+ {0 , 0}
+ {1 , 0}
+ {1-cosd(36) , -sind(36)}
+ {-1+2*cosd(108)+cosd(36) , -sind(36)}
+}
+\DefineTile {diamond}{D B B D}
+{
+ {0 , 0}
+ {cosd(18) , sind(18)}
+ {2*cosd(18) , 0}
+ {cosd(18) , -sind(18)}
+}
+\tikzset{
+ every thin rhombus before path/.code={
+ \path[every circle arc/.try] (-edge a end) circle[radius=1/4];
+ \path[every long arc/.try] (-edge b start) circle[radius=1/4];
+ },
+ every thick rhombus before path/.code={
+ \path[every circle arc/.try] (-edge a end) circle[radius=1/4];
+ \path[every long arc/.try] (-edge B start) circle[radius=3/4];
+ },
+ every kite before path/.code={
+ \path[every circle arc/.try] (-edge a start) circle[radius=2/(sqrt(5)+1)];
+ \path[every long arc/.try] (-edge c end) circle[radius=2/(3+sqrt(5))];
+ },
+ every dart before path/.code={
+ \path[every circle arc/.try] (-edge a end) circle[radius=1 - 2/(sqrt(5)+1)];
+ \path[every long arc/.try] (-edge c start) circle[radius=2/(sqrt(5)+1) - 2/(3+sqrt(5))];
+ }
+}
+\BakeTile {thin rhombus}
+\BakeTile {thick rhombus}
+\BakeTile {dart}
+\BakeTile {kite}
+\BakeTile {golden triangle}
+\BakeTile {reverse golden triangle}
+\BakeTile {golden gnomon}
+\BakeTile {reverse golden gnomon}
+\BakeTile {pentagon 5}
+\BakeTile {pentagon 3}
+\BakeTile {pentagon 2}
+\BakeTile {pentagram}
+\BakeTile {boat}
+\BakeTile {diamond}
+\ExplSyntaxOn
+\prop_new:N \g__tilings_rhombus_lms_rule_prop
+\prop_gput:Nnn \g__tilings_rhombus_lms_rule_prop {T} {[f*sT][f>g]}
+\prop_gput:Nnn \g__tilings_rhombus_lms_rule_prop {t} {[f_st][f>G]}
+\prop_gput:Nnn \g__tilings_rhombus_lms_rule_prop {G} {[f+sG][sf>g][sf*sT]}
+\prop_gput:Nnn \g__tilings_rhombus_lms_rule_prop {g} {[f-sg][sf>G][sf_st]}
+\prop_new:N \g__tilings_kite_lms_rule_prop
+\prop_gput:Nnn \g__tilings_kite_lms_rule_prop {T} {[f*sT][f>st][+sg]}
+\prop_gput:Nnn \g__tilings_kite_lms_rule_prop {t} {[f_st][f>sT][-sG]}
+\prop_gput:Nnn \g__tilings_kite_lms_rule_prop {G} {[f*+sG][sT]}
+\prop_gput:Nnn \g__tilings_kite_lms_rule_prop {g} {[f-_sg][st]}
+\prop_new:N \g__tilings_pentagon_lms_rule_prop
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {P}
+{[s>P][1sF+Q][1+sF+Q][1*sF+Q][1-sF+Q][1_sF+Q]} % pentagon 5
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {Q}
+{[s>P][1+sFR][1*sF*R][1-sF+Q][1_sF+Q][1sF+Q][->fsD]} % pentagon 3
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {R}
+{[s>P][1-sF+Q][1+sF*R][1*sFR][1_sF*R][1sFR][_>fsD][>fsD]} % pentagon 2
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {G}
+{
+ [s>G]
+ [se[>d+R][e1B]]
+ [+se[>d+R][e1B]]
+ [-se[>d+R][e1B]]
+ [*se[>d+R][e1B]]
+ [_se[>d+R][e1B]]
+} % pentagram
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {B}
+{
+ [s>G]
+ [se[>d+R][e1B]]
+ [+se[>d+R][e1B]]
+ [-se[>d+R][e1B]]
+} % boat
+\prop_gput:Nnn \g__tilings_pentagon_lms_rule_prop {D}
+{[s>d+R][s>eG][se1B]} % diamond
+\prop_gset_eq:NN \g__tilings_rtriangle_lms_rule_prop
+\g__tilings_rhombus_lms_rule_prop
+\prop_gset_eq:NN \g__tilings_ktriangle_lms_rule_prop
+\g__tilings_kite_lms_rule_prop
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {rhombus} {TG}
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {kite} {Tg}
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {rtriangle} {TtGg}
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {ktriangle} {TtGg}
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {pentagon} {PQRGBD}
+\prop_new:N \g__tilings_rhombus_lms_action_prop
+\prop_new:N \g__tilings_kite_lms_action_prop
+\prop_new:N \g__tilings_rtriangle_lms_action_prop
+\prop_new:N \g__tilings_ktriangle_lms_action_prop
+\prop_new:N \g__tilings_pentagon_lms_action_prop
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {+}
+{\pgftransformrotate{144}}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {*}
+{\pgftransformrotate{108}}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {-}
+{\pgftransformrotate{216}}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {_}
+{\pgftransformrotate{252}}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {>}
+{\pgftransformrotate{180}}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {s} {
+ \fp_set:Nn \l__tilings_tmpa_fp { 2 * sind(18) * \l__tilings_step_dim }
+ \dim_set:Nn \l__tilings_step_dim {\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gset_eq:NN \g__tilings_rtriangle_lms_action_prop
+\g__tilings_rhombus_lms_action_prop
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {T} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{198}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*2*cosd(18)}
+ \pgftransformxshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ thin~ rhombus/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{thin~rhombus}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_rhombus_lms_action_prop {G} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)/(2*cosd(36))}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ thick~ rhombus/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{thick~rhombus}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {+} {\pgftransformrotate{36}}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {*} {\pgftransformrotate{108}}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {-} {\pgftransformrotate{-36}}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {_}
+{\pgftransformrotate{-108}}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {>} {\pgftransformrotate{180}}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {s} {
+ \fp_set:Nn \l__tilings_tmpa_fp { 2 * sind(18) * \l__tilings_step_dim }
+ \dim_set:Nn \l__tilings_step_dim {\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gset_eq:NN \g__tilings_ktriangle_lms_action_prop
+\g__tilings_kite_lms_action_prop
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {T} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{36}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ kite/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{kite}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_kite_lms_action_prop {g} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{144}
+ \pgftransformxshift{-\l__tilings_step_dim * 2 * sin(18)}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ dart/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{dart}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_rtriangle_lms_action_prop {T} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{18}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ reverse~ golden~ triangle/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{reverse~ golden~ triangle}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_rtriangle_lms_action_prop {t} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{-18}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ golden~ triangle/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{golden~ triangle}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_rtriangle_lms_action_prop {G} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{180}
+ \pgftransformxshift{-\l__tilings_step_dim}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)/(2*cosd(36))}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ reverse~ golden~ gnomon/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{reverse~ golden~ gnomon}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_rtriangle_lms_action_prop {g} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{180}
+ \pgftransformxshift{-\l__tilings_step_dim}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)/(2*cosd(36))}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ golden~ gnomon/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{golden~ gnomon}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_ktriangle_lms_action_prop {T} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{18}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ reverse~ golden~ triangle/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{reverse~ golden~ triangle}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_ktriangle_lms_action_prop {t} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{-18}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ golden~ triangle/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{golden~ triangle}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_ktriangle_lms_action_prop {G} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{180}
+ \pgftransformxshift{-\l__tilings_step_dim}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)/(2*cosd(36))}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ reverse~ golden~ gnomon/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{reverse~ golden~ gnomon}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_ktriangle_lms_action_prop {g} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{180}
+ \pgftransformxshift{-\l__tilings_step_dim}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)/(2*cosd(36))}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ golden~ gnomon/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{golden~ gnomon}
+ \group_end:
+}
+\int_new:N \l__tilings_pentagon_parity_int
+\seq_new:N \l__tilings_pentagon_parity_seq
+\seq_set_from_clist:Nn \l__tilings_pentagon_parity_seq {odd,even}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {1} {
+ \int_set:Nn \l__tilings_pentagon_parity_int
+ {3 - \l__tilings_pentagon_parity_int}
+}
+\tikzset{
+ every~ pentagon~ decomposition/.code={%
+ \int_set:Nn \l__tilings_pentagon_parity_int {2}
+ }
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {+}
+{\pgftransformrotate{72}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {*}
+{\pgftransformrotate{144}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {-}
+{\pgftransformrotate{288}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {_}
+{\pgftransformrotate{216}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {>}
+{\pgftransformrotate{180}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {|}
+{\pgftransformxscale{-1}}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {s} {
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {
+ 1/(2 + 2 * cosd(72) ) * \l__tilings_step_dim
+ }
+ \dim_set:Nn \l__tilings_step_dim {\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {f} {
+ \fp_set:Nn \l__tilings_tmpa_fp { tand(54)/2 * \l__tilings_step_dim }
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {F} {
+ \fp_set:Nn \l__tilings_tmpa_fp { tand(54) * \l__tilings_step_dim }
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {d} {
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {
+ (tand(54)/2 - tand(72)/2 + sind(36) ) * \l__tilings_step_dim
+ }
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {e} {
+ \fp_set:Nn \l__tilings_tmpa_fp
+ {
+ tand(54) * cosd(36) * \l__tilings_step_dim
+ }
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {P} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/2}
+ \pgftransformxshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*tand(54)/2}
+ \pgftransformyshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ pentagon/.try,
+ every~
+ \seq_item:Nn \l__tilings_pentagon_parity_seq
+ {\l__tilings_pentagon_parity_int}
+ \space pentagon/.try,
+ every~ pentagon~ 5/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{pentagon~5}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {Q} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/2}
+ \pgftransformxshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*tand(54)/2}
+ \pgftransformyshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ pentagon/.try,
+ every~
+ \seq_item:Nn \l__tilings_pentagon_parity_seq
+ {\l__tilings_pentagon_parity_int}
+ \space pentagon/.try,
+ every~ pentagon~ 3/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{pentagon~3}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {R} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/2}
+ \pgftransformxshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*tand(54)/2}
+ \pgftransformyshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ pentagon/.try,
+ every~
+ \seq_item:Nn \l__tilings_pentagon_parity_seq
+ {\l__tilings_pentagon_parity_int}
+ \space pentagon/.try,
+ every~ pentagon~ 2/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{pentagon~2}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {G} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*cosd(72)}
+ \pgftransformxshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*tand(54)*cosd(72)}
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ pentagram/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{pentagram}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {B} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*cosd(72)}
+ \pgftransformxshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*tand(54)*cosd(72)}
+ \pgftransformyshift{\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ boat/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{boat}
+ \group_end:
+}
+\prop_gput:Nnn \g__tilings_pentagon_lms_action_prop {D} {
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \pgftransformrotate{90}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim*cosd(18)}
+ \pgftransformxshift{-\fp_to_dim:N \l__tilings_tmpa_fp}
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ diamond/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{diamond}
+ \group_end:
+}
+\ExplSyntaxOff
+%%
+%% Copyright (C) 2014-2023 by Andrew Stacey <loopspace@mathforge.org>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License (LPPL), either
+%% version 1.3c of this license or (at your option) any later
+%% version. The latest version of this license is in the file:
+%%
+%% http://www.latex-project.org/lppl.txt
+%%
+%% This work is "maintained" (as per LPPL maintenance status) by
+%% Andrew Stacey.
+%%
+%% This work consists of the files penrose_code.dtx
+%% penrose.tex
+%% and the derived files penrose.ins
+%% penrose_code.pdf
+%% penrose.pdf
+%% tikzlibrarytilings.code.tex
+%% tikzlibrarytilings.penrose.code.tex
+%% tikzlibrarytilings.polykite.code.tex
+%% tikzlibrarypenrose.code.tex
+%% README.txt
+%%
+%%
+%% End of file `tikzlibrarytilings.penrose.code.tex'.
diff --git a/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.polykite.code.tex b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.polykite.code.tex
new file mode 100644
index 00000000000..8efff82ac62
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tilings/tikzlibrarytilings.polykite.code.tex
@@ -0,0 +1,859 @@
+%%
+%% This is file `tikzlibrarytilings.polykite.code.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% tilings_code.dtx (with options: `polykite')
+%% ----------------------------------------------------------------
+%% tilings --- TikZ library for producing tilings
+%% E-mail: loopspace@mathforge.org
+%% Released under the LaTeX Project Public License v1.3c or later
+%% See http://www.latex-project.org/lppl.txt
+%% ----------------------------------------------------------------
+%%
+\RequirePackage{tikz}
+\usetikzlibrary{tilings}
+\ProvidesFile {tikzlibrarytilings.polykite.code.tex}
+ [2023/06/01 v2.0 TikZ pics for Aperiodical Polykite tiles]
+\DeclareDocumentCommand \DefinePolykiteTile {s m m m}
+{
+ \IfBooleanTF {#1}
+ {
+ \DefineTile {#2} {2 2 1 1 2 2 1 1 1 1 2 2 1 1}
+ }
+ {
+ \DefineTile {#2} {1 1 2 2 1 1 2 2 2 2 1 1 2 2}
+ }
+ {
+ {0 : #4}
+ ++{90 : #3}
+ ++{150 : #3}
+ ++{240 : #4}
+ ++{180 : #4}
+ ++{-90 : #3}
+ ++{210 : #3}
+ ++{-60 : #4}
+ ++{0 : #4}
+ ++{0 : #4}
+ ++{60 : #4}
+ ++{-30 : #3}
+ ++{30 : #3}
+ ++{120 : #4}
+ }
+}
+\DefinePolykiteTile{aperiodical hat}{sqrt(3)/2}{1/2}
+\DefinePolykiteTile{spectral hat}{sqrt(3)/2}{1/2}
+\DefinePolykiteTile{aperiodical turtle}{1/2}{sqrt(3)/2}
+\DefinePolykiteTile*{spectral turtle}{1/2}{sqrt(3)/2}
+\DefineTile {spectre} {a A a A a A a A a A a A a A}
+ {
+ {0 : .75}
+ ++{90 : .75}
+ ++{150 : .75}
+ ++{240 : .75}
+ ++{180 : .75}
+ ++{-90 : .75}
+ ++{210 : .75}
+ ++{-60 : .75}
+ ++{0 : .75}
+ ++{0 : .75}
+ ++{60 : .75}
+ ++{-30 : .75}
+ ++{30 : .75}
+ ++{120 : .75}
+ }
+\DefineTile{meta cluster T}{A A b}
+{
+{ -1.5 , -sqrt(3)/2 }
+{ 1.5 , -sqrt(3)/2 }
+{ 0 , sqrt(3) }
+}
+\DefineTile{meta cluster P}{1 D d A 1 D d b}
+{
+{ -2.5, sqrt(3)/2 }
+{ -2, 0 }
+{ -1.5, -sqrt(3)/2 }
+{ -0.5 , -sqrt(3)/2 }
+{ 2.5 , -sqrt(3)/2 }
+{ 2 , 0 }
+{ 1.5 , sqrt(3)/2 }
+{ .5 , sqrt(3)/2 }
+}
+\DefineTile{meta cluster F}{1 D d 1 D c C d b}
+{
+{ -2.5, sqrt(3)/2 }
+{ -2, 0 }
+{ -1.5, -sqrt(3)/2 }
+{ -0.5 , -sqrt(3)/2 }
+{ .5 , -sqrt(3)/2 }
+{ 1.5 , -sqrt(3)/2 }
+{ 2 , 0 }
+{ 1.5 , sqrt(3)/2 }
+{ .5 , sqrt(3)/2 }
+}
+\DefineTile{meta cluster H}{B D d B D d a D d}
+{
+{ -2, -sqrt(3) }
+{ 1, -sqrt(3) }
+{ 2, -sqrt(3) }
+{ 2.5, -sqrt(3)/2 }
+{ 1, sqrt(3)}
+{ .5 , 3*sqrt(3)/2 }
+{ -.5 , 3*sqrt(3)/2 }
+{ -2, 0 }
+{ -2.5, -sqrt(3)/2 }
+}
+\DefineTile{super cluster T}{A A b}
+{
+{ -30 : 3 * (1 + sqrt(5))/2 / sqrt(3) }
+{ 90 : 3 * (1 + sqrt(5))/2 / sqrt(3) }
+{ 210 : 3 * (1 + sqrt(5))/2 / sqrt(3) }
+}
+\DefineTile{super cluster P}{1 D d A 1 D d b}
+{
+{ - 1.75 - sqrt(5), (sqrt(5)/2 + 1) * sqrt(3)/2 }
+++{ -60 : 1 + sqrt(5) }
+++{ -60 : 1}
+++{ 1, 0}
+++{ 3*(1 + sqrt(5))/2, 0 }
+++{ 120 : 1 + sqrt(5) }
+++{ 120 : 1 }
+++{ -1, 0 }
+}
+\DefineTile{super cluster F}{1 D d 1 D c C d b}
+{
+{ - 1.75 - sqrt(5), (sqrt(5)/2 + 1) * sqrt(3)/2 }
+++{ -60 : 1 + sqrt(5) }
+++{ -60 : 1}
+++{ 1, 0}
+++{ 1 + sqrt(5), 0 }
+++{ 1, 0 }
++{ -.75 + (2 + sqrt(5)) * sqrt(3)/4 * sqrt(3)/3,
+ (2 + sqrt(5)) * sqrt(3)/4 + 3/4 * sqrt(3)/3 }
+++{ -1.5, (2 + sqrt(5)) * sqrt(3)/2 }
+++{ -1, 0 }
+}
+\DefineTile{super cluster H}{B D d B D d a D d}
+{
+{1.75 + 3*sqrt(5)/4, -(1 + sqrt(5))*sqrt(3)/4}
+++{120 : 3*(1+sqrt(5))/2 }
+++{120 : 1 }
+++{-1,0}
+++{240 : 3*(1+sqrt(5))/2}
+++{240 : 1}
+++{300 : 1}
+++{ 3*(1+sqrt(5))/2, 0 }
+++{1, 0}
+++{60 : 1}
+}
+\DefineTile{subcluster H}{B B a}
+{
+ { 0, 0 }
+ { 3, 0 }
+ { 60 : 3 }
+}
+\DefineTile{subcluster T}{A A b}
+{
+ { 0, 0 }
+ { 3, 0 }
+ { 60 : 3 }
+}
+\DefineTile{subcluster P}{ 1 A 1 b }
+{
+ { 0, 0 }
+ { 1, 0 }
+ { 4, 0 }
+ { 3, 0 }
+}
+\DefineTile{subcluster F}{ 1 1 f F b }
+{
+ { 0, 0 }
+ { 1, 0 }
+ +{ 60 : 1 }
+ { 2, 0 }
+ { 3, 0 }
+}
+\tikzset{
+ no clip/.code={%
+ \tikz@addmode{\tikz@mode@clipfalse}%
+ },
+ every subcluster P clip/.style={no clip},
+ every subcluster F clip/.style={no clip},
+}
+\BakeTile {aperiodical hat}
+\BakeTile {aperiodical turtle}
+\BakeTile {spectral hat}
+\BakeTile {spectral turtle}
+\BakeTile {spectre}
+\BakeTile {meta cluster T}
+\BakeTile {meta cluster P}
+\BakeTile {meta cluster F}
+\BakeTile {meta cluster H}
+\BakeTile {super cluster T}
+\BakeTile {super cluster P}
+\BakeTile {super cluster F}
+\BakeTile {super cluster H}
+\ExplSyntaxOn
+\clist_map_inline:nn {a,A,b,B,f,F}
+{
+ \tl_new:c {g__tilings_side_polykite_#1_tl}
+ \tl_if_exist:cF {g__tilings_side_#1_tl}
+ {
+ \tl_new:c {g__tilings_side_#1_tl}
+ }
+}
+
+\tl_gset:cn {g__tilings_side_polykite_A_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{-0.3333332942822268pt}
+ \pgfsyssoftpath@linetotoken {0.0833331478405773pt}{-0.1889954840909892pt}
+ \pgfsyssoftpath@linetotoken {0.3333332942822268pt}{-0.3333332942822268pt}
+ \pgfsyssoftpath@linetotoken {0.5833333235705567pt}{-0.1889954840909892pt}
+ \pgfsyssoftpath@linetotoken {0.6666667057177732pt}{-0.3333332942822268pt}
+ \pgfsyssoftpath@linetotoken {1pt}{-0.3333332942822268pt}
+}
+\tl_gset:cn {g__tilings_side_polykite_a_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{0.33333pt}
+ \pgfsyssoftpath@linetotoken {0.33333pt}{0.33333pt}
+ \pgfsyssoftpath@linetotoken {0.41667pt}{0.189pt}
+ \pgfsyssoftpath@linetotoken {0.66667pt}{0.33333pt}
+ \pgfsyssoftpath@linetotoken {0.91667pt}{0.189pt}
+ \pgfsyssoftpath@linetotoken {1pt}{0.33333pt}
+}
+\tl_gset:cn {g__tilings_side_polykite_B_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{0pt}
+ \pgfsyssoftpath@linetotoken {0.3333332942822268pt}{0pt}
+ \pgfsyssoftpath@linetotoken {0.4166665592761237pt}{0.1443378101912376pt}
+ \pgfsyssoftpath@linetotoken {0.6666667057177732pt}{0pt}
+ \pgfsyssoftpath@linetotoken {0.9166666178527835pt}{0.1443378101912376pt}
+ \pgfsyssoftpath@linetotoken {1pt}{0pt}
+}
+\tl_gset:cn {g__tilings_side_polykite_b_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{0pt}
+ \pgfsyssoftpath@linetotoken {0.08333pt}{-0.14433pt}
+ \pgfsyssoftpath@linetotoken {0.33333pt}{0pt}
+ \pgfsyssoftpath@linetotoken {0.58333pt}{-0.14433pt}
+ \pgfsyssoftpath@linetotoken {0.66667pt}{0pt}
+ \pgfsyssoftpath@linetotoken {1pt}{0pt}
+}
+\tl_gset:cn {g__tilings_side_polykite_F_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{-2.00000070292pt}
+ \pgfsyssoftpath@linetotoken {0.74999982427pt}{-1.566987221617321pt}
+ \pgfsyssoftpath@linetotoken {1pt}{-2.00000070292pt}
+}
+\tl_gset:cn {g__tilings_side_polykite_f_tl}
+{
+ \pgfsyssoftpath@movetotoken {0pt}{2pt}
+ \pgfsyssoftpath@linetotoken {0.25pt}{1.56699pt}
+ \pgfsyssoftpath@linetotoken {1pt}{2pt}
+}
+
+\clist_map_inline:nn {a,A,b,B,f,F}
+{
+ \tl_gclear_new:c {g__tilings_side_backup_#1_tl}
+ \tl_gset_eq:cc {g__tilings_side_backup_#1_tl} {g__tilings_side_#1_tl}
+ \tl_gclear_new:c {g__tilings_side_#1_tl}
+ \tl_gset_eq:cc {g__tilings_side_#1_tl}{g__tilings_side_polykite_#1_tl}
+}
+
+\BakeTile{subcluster~ H}
+\BakeTile{subcluster~ T}
+\BakeTile{subcluster~ P}
+\BakeTile{subcluster~ F}
+
+\clist_map_inline:nn {a,A,b,B,f,F}
+{
+ \tl_gset_eq:cc {g__tilings_side_#1_tl} {g__tilings_side_backup_#1_tl}
+}
+\cs_new_protected_nopar:Npn \__tilings_place_cluster_tile:nn #1#2
+{
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \pgftransformscale{\fp_use:N \l__tilings_tmpa_fp}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \UseTile[
+ every~ tile/.try,
+ every~ #1~#2/.try,
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try/.expand~ once=\l__tilings_tmpc_tl
+ ]{#1~ #2}
+ \group_end:
+}
+\cs_generate_variant:Nn \__tilings_place_cluster_tile:nn {Vn}
+\prop_new:N \g__tilings_supercluster_lms_rule_prop
+\prop_gput:Nnn \g__tilings_supercluster_lms_rule_prop {T}
+{
+ [s H]
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_rule_prop {H}
+{
+ [s {r{-60}} T]
+ [s {x{\fp_to_decimal:n{1}}} {y{\fp_to_decimal:n{(1+2*\c__tilings_phi_fp)}}} H]
+ [s
+ {x{\fp_to_decimal:n{-2-3*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-\c__tilings_phi_fp}}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{1+3*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-1-\c__tilings_phi_fp}}}
+ {r{-120}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{-1.5-3.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{2.5*\c__tilings_phi_fp+1.5}}}
+ {r{-120}}
+ P]
+ [s
+ {x{\fp_to_decimal:n{-1.5-2*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-1.5-3*\c__tilings_phi_fp}}}
+ {r{180}}
+ P]
+ [s
+ {x{\fp_to_decimal:n{3+5.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5*\c__tilings_phi_fp}}}
+ {r{120}}
+ P]
+ [s
+ {x{\fp_to_decimal:n{-4.5-6.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5-.5*\c__tilings_phi_fp}}}
+ {r{-120}}
+ F]
+ [s
+ {x{\fp_to_decimal:n{1.5+4*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-2.5-3*\c__tilings_phi_fp}}}
+ F]
+ [s
+ {x{\fp_to_decimal:n{3+2.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{2+3.5*\c__tilings_phi_fp}}}
+ {r{120}}
+ F]
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_rule_prop {P}
+{
+ [s {r{60}} P]
+ [s
+ {x{\fp_to_decimal:n{2.5+3.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-.5-.5*\c__tilings_phi_fp}}}
+ {r{-120}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{-2.5-3.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5+.5*\c__tilings_phi_fp}}}
+ {r{180}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{4.5+6*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5+\c__tilings_phi_fp}}}
+ {r{120}}
+ F]
+ [s
+ {x{\fp_to_decimal:n{-4.5-6*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-.5-\c__tilings_phi_fp}}}
+ {r{-60}}
+ F]
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_rule_prop {F}
+{
+ [s {r{60}} P]
+ [s
+ {x{\fp_to_decimal:n{2.5+3.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-.5-.5*\c__tilings_phi_fp}}}
+ {r{-120}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{-2.5-3.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5+.5*\c__tilings_phi_fp}}}
+ {r{180}}
+ H]
+ [s
+ {x{\fp_to_decimal:n{4.5+6*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{.5+\c__tilings_phi_fp}}}
+ {r{120}}
+ F]
+ [s
+ {x{\fp_to_decimal:n{-4.5-6*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-.5-\c__tilings_phi_fp}}}
+ {r{-60}}
+ F]
+ [s
+ {x{\fp_to_decimal:n{3+4.5*\c__tilings_phi_fp}}}
+ {y{\fp_to_decimal:n{-2-2.5*\c__tilings_phi_fp}}}
+ F]
+}
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {supercluster} {HTPF}
+\fp_const:Nn \c__tilings_phi_fp {(1 + sqrt(5))/2}
+\prop_new:N \g__tilings_supercluster_lms_action_prop
+
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {r}
+{
+ \pgftransformrotate{\l__tilings_parameters_lms_tl}
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {x}
+{
+ \pgftransformxshift{
+ \fp_to_dim:n
+ {.5 * (\l__tilings_parameters_lms_tl) * \l__tilings_step_dim}
+ }
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {y}
+{
+ \pgftransformyshift{
+ \fp_to_dim:n
+ {.5 * sqrt(3) * (\l__tilings_parameters_lms_tl) * \l__tilings_step_dim}
+ }
+}
+
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {s}
+{
+ \fp_set:Nn \l__tilings_tmpa_fp {
+ \l__tilings_step_dim
+ /
+ \c__tilings_phi_fp
+ /
+ \c__tilings_phi_fp
+ }
+ \dim_set:Nn \l__tilings_step_dim {\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {H}
+{
+ \__tilings_place_cluster_tile:nn {super~ cluster}{H}
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {T}
+{
+ \__tilings_place_cluster_tile:nn {super~ cluster}{T}
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {P}
+{
+ \__tilings_place_cluster_tile:nn {super~ cluster}{P}
+}
+\prop_gput:Nnn \g__tilings_supercluster_lms_action_prop {F}
+{
+ \__tilings_place_cluster_tile:nn {super~ cluster}{F}
+}
+\cs_new_protected_nopar:Npn \__tilings_place_cluster_tile_as_pic:nnnnnn #1#2#3#4#5#6
+{
+ \group_begin:
+ \int_gincr:N \g__tilings_tile_int
+ \fp_set:Nn \l__tilings_tmpa_fp {\l__tilings_step_dim/(1cm)}
+ \tl_set:Nx \l__tilings_tmpc_tl
+ {
+ {\int_use:N \g__tilings_tile_int}
+ {\int_use:N \g__tilings_tiles_int}
+ }
+ \tl_clear:N \l__tilings_tmpa_tl
+ \tl_put_right:Nn \l__tilings_tmpa_tl
+ {
+ \pic[
+ every~ tile/.try,
+ every~ #1~#2/.try,
+ }
+ \tl_put_right:Nx \l__tilings_tmpa_tl
+ {
+ tile~ \int_use:N \g__tilings_tile_int/.try,
+ tile/.try=\l__tilings_tmpc_tl,
+ scale=\fp_use:N \l__tilings_tmpa_fp,
+ }
+ \tl_put_right:Nn \l__tilings_tmpa_tl
+ {
+ name=#3,
+ }
+ \tl_if_empty:nTF {#4}
+ {
+ \tl_put_right:Nn \l__tilings_tmpa_tl
+ {
+ first~ tile/.try,
+ }
+ }
+ {
+ \tl_put_right:Nn \l__tilings_tmpa_tl
+ {
+ align~ with=#4~along~#5
+ }
+ \tl_if_single:nF {#6}
+ {
+ \tl_put_right:Nx \l__tilings_tmpa_tl
+ {
+ \c_space_tl using~\tl_tail:n {#6}
+ }
+ }
+ \tl_put_right:Nn \l__tilings_tmpa_tl {,}
+ }
+ \tl_put_right:Nn \l__tilings_tmpa_tl
+ {
+ #1~ #2
+ ];
+ }
+ \tl_use:N \l__tilings_tmpa_tl
+ \group_end:
+}
+\cs_generate_variant:Nn \__tilings_place_cluster_tile_as_pic:nnnnnn {
+ Vnnnnn, VnVnnn, VnVVnn
+}
+\tikzset{
+ cluster~ type/.initial=super~ cluster,
+ first~ file/.style={transform~ shape}
+}
+\prop_new:N \g__tilings_cluster_lms_rule_prop
+\cs_new_nopar:Npn \__tilings_tile_label:
+{
+ \tl_item:Nn \l__tilings_parameters_lms_tl {1}
+}
+\cs_new_nopar:Npn \__tilings_adjoint_label:
+{
+ \tl_item:Nn \l__tilings_parameters_lms_tl {2}
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {T}
+{
+ [s {H{\__tilings_tile_label:0}{}}]
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {H}
+{
+ [s {r{-60}} {T{\__tilings_tile_label:0}{}}]
+ [{ {HTa{A1}} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+ [{ {HTa{A2}} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+ [{ {HT{B1}b} {\__tilings_tile_label:3} {\__tilings_tile_label:0} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:4} {\__tilings_tile_label:1} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:5} {\__tilings_tile_label:2} }]
+ [{ {PHAa} {\__tilings_tile_label:6} {\__tilings_tile_label:3} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:7} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:8} {\__tilings_tile_label:2} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:9} {\__tilings_tile_label:3} }]
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {P}
+{
+ [s {r{60}} {P{\__tilings_tile_label:0}{}}]
+ [{ {HPaA} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+ [{ {HP{B2}b} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:3} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:4} {\__tilings_tile_label:2} }]
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {F}
+{
+ [s {r{60}} {P{\__tilings_tile_label:0}{}}]
+ [{ {HPaA} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+ [{ {HP{B2}b} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:3} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:4} {\__tilings_tile_label:2} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:5} {\__tilings_tile_label:1} }]
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {TH{A1}a} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {TH{A2}a} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {THb{B1}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {THb{B2}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HTa{A1}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HTa{A2}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HT{B1}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HT{B2}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HPaA} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HP{B1}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HP{B2}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HF{B1}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {HF{B2}b} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PHAa} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PHb{B1}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PHb{B2}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PF{11}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PF{12}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PF{11}{12}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {PF{12}{12}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FHb{B1}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FHb{B2}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FP{11}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FP{12}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FP{11}{12}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FP{12}{12}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FFfF} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FFFf} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FF{11}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FF{12}{11}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FF{11}{12}} {}
+\prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {FF{12}{12}} {}
+\cs_new_nopar:cpn {__tilings_T{A1}_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {T#1{A1}#2}
+ {
+ [{ {H#3{B1}#4} {\__tilings_tile_label:0} {\__tilings_adjoint_label:#5} }]
+ }
+}
+\cs_new_nopar:cpn {__tilings_T{A2}_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {T#1{A2}#2}
+ {
+ [{ {H#3{B2}#4} {\__tilings_tile_label:0} {\__tilings_adjoint_label:#5} }]
+ }
+}
+\cs_new_nopar:cpn {__tilings_Tb_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {T#1b#2}
+ {
+ [{ {H#3a#4} {\__tilings_tile_label:0} {\__tilings_adjoint_label:#5} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_H{B1}_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {H#1{B1}#2}
+ {
+ [{ {P#3A#4} {\__tilings_tile_label:4} {\__tilings_adjoint_label:#5} }]
+
+ [{ {HP{B2}b} {\__tilings_tile_label:1} {\__tilings_tile_label:4} }]
+ [{ {TH{A1}a} {\__tilings_tile_label:0} {\__tilings_tile_label:1} }]
+
+ [{ {HTa{A2}} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:5} {\__tilings_tile_label:2} }]
+
+ [{ {HT{B1}b} {\__tilings_tile_label:3} {\__tilings_tile_label:0} }]
+ [{ {PHAa} {\__tilings_tile_label:6} {\__tilings_tile_label:3} }]
+
+ [{ {FHb{B1}} {\__tilings_tile_label:7} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:8} {\__tilings_tile_label:2} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:9} {\__tilings_tile_label:3} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_H{B2}_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {H#1{B2}#2}
+ {
+ [{ {P#3A#4} {\__tilings_tile_label:5} {\__tilings_adjoint_label:#5} }]
+
+ [{ {HP{B2}b} {\__tilings_tile_label:2} {\__tilings_tile_label:5} }]
+ [{ {TH{A2}a} {\__tilings_tile_label:0} {\__tilings_tile_label:2} }]
+
+ [{ {HTa{A1}} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:4} {\__tilings_tile_label:1} }]
+
+ [{ {HT{B1}b} {\__tilings_tile_label:3} {\__tilings_tile_label:0} }]
+ [{ {PHAa} {\__tilings_tile_label:6} {\__tilings_tile_label:3} }]
+
+ [{ {FHb{B1}} {\__tilings_tile_label:7} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:8} {\__tilings_tile_label:2} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:9} {\__tilings_tile_label:3} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_Ha_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {H#1a#2}
+ {
+ [{ {P#3b#4} {\__tilings_tile_label:6} {\__tilings_adjoint_label:#5} }]
+
+ [{ {HPaA} {\__tilings_tile_label:3} {\__tilings_tile_label:6} }]
+ [{ {THb{B1}} {\__tilings_tile_label:0} {\__tilings_tile_label:3} }]
+
+ [{ {HTa{A1}} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:4} {\__tilings_tile_label:1} }]
+
+ [{ {HTa{A2}} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:5} {\__tilings_tile_label:2} }]
+
+ [{ {FHb{B1}} {\__tilings_tile_label:7} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:8} {\__tilings_tile_label:2} }]
+ [{ {FHb{B2}} {\__tilings_tile_label:9} {\__tilings_tile_label:3} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_PA_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {P#1A#2}
+ {
+ [{ {H#3{B1}#4} {\__tilings_tile_label:1} {\__tilings_adjoint_label:#5} }]
+ [{ {PHAa} {\__tilings_tile_label:0} {\__tilings_tile_label:1} }]
+ [{ {HP{B2}b} {\__tilings_tile_label:2} {\__tilings_tile_label:0} }]
+
+ [{ {FHb{B2}} {\__tilings_tile_label:3} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:4} {\__tilings_tile_label:2} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_Pb_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {P#1b#2}
+ {
+ [{ {H#3a#4} {\__tilings_tile_label:2} {\__tilings_adjoint_label:#5} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:0}{\__tilings_tile_label:2} }]
+ [{ {HPaA} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+
+ [{ {FHb{B2}} {\__tilings_tile_label:3} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:4} {\__tilings_tile_label:2} }]
+ }
+}
+
+\cs_new_nopar:cpn {__tilings_Fb_creator:nnnnn} #1#2#3#4#5
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_rule_prop {F#1b#2}
+ {
+ [{ {H#3a#4} {\__tilings_tile_label:2} {\__tilings_adjoint_label:#5} }]
+ [{ {PHb{B2}} {\__tilings_tile_label:0}{\__tilings_tile_label:2} }]
+ [{ {HPaA} {\__tilings_tile_label:1} {\__tilings_tile_label:0} }]
+
+ [{ {FHb{B2}} {\__tilings_tile_label:3} {\__tilings_tile_label:1} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:4} {\__tilings_tile_label:2} }]
+ [{ {FHb{B1}} {\__tilings_tile_label:5} {\__tilings_tile_label:1} }]
+ }
+}
+\clist_map_inline:nn
+{
+ TH{{A1}}a HP{{{B1}}}b06,
+ TH{{A2}}a HP{{{B2}}}b06,
+ THb{{B1}} HPaA04,
+ THb{{B2}} HPaA05,
+ PHAa HP{{{B1}}}b16,
+ PHb{{B1}} HPaA24,
+ PHb{{B2}} HPaA25,
+ FHb{{B1}} HPaA24,
+ FHb{{B2}} HPaA25,
+}
+{
+ \tl_clear:N \l__tilings_tmpa_tl
+ \tl_put_right:Nn \l__tilings_tmpa_tl { \use:c }
+ \tl_put_right:Nx \l__tilings_tmpa_tl
+ {
+ {__tilings_ \tl_item:nn {#1}{2}\tl_item:nn {#1}{4} _creator:nnnnn}
+ {\tl_item:nn {#1}{1}}{\tl_item:nn{#1}{3}}
+ \tl_item:nn {#1}{5}\tl_item:nn{#1}{7}
+ \tl_item:nn {#1}{9}
+ }
+ \tl_use:N \l__tilings_tmpa_tl
+ \tl_clear:N \l__tilings_tmpa_tl
+ \tl_put_right:Nn \l__tilings_tmpa_tl { \use:c }
+ \tl_put_right:Nx \l__tilings_tmpa_tl
+ {
+ {__tilings_ \tl_item:nn {#1}{1}\tl_item:nn {#1}{3} _creator:nnnnn}
+ {\tl_item:nn {#1}{2}}{\tl_item:nn{#1}{4}}
+ \tl_item:nn {#1}{6}\tl_item:nn{#1}{8}
+ \tl_item:nn {#1}{10}
+ }
+ \tl_use:N \l__tilings_tmpa_tl
+}
+
+\prop_new:N \g__tilings_cluster_lms_action_prop
+\prop_gput:Nnn \g__tilings_drawables_lms_prop {cluster} {HTPF}
+\prop_gput:Nnn \g__tilings_cluster_lms_action_prop {r}
+{
+ \pgftransformrotate{\l__tilings_parameters_lms_tl}
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_action_prop {x}
+{
+ \pgftransformxshift{
+ \fp_to_dim:n
+ {.5 * (\l__tilings_parameters_lms_tl) * \l__tilings_step_dim}
+ }
+}
+\prop_gput:Nnn \g__tilings_cluster_lms_action_prop {y}
+{
+ \pgftransformyshift{
+ \fp_to_dim:n
+ {.5 * sqrt(3) * (\l__tilings_parameters_lms_tl) * \l__tilings_step_dim}
+ }
+}
+
+\prop_gput:Nnn \g__tilings_cluster_lms_action_prop {s}
+{
+ \fp_set:Nn \l__tilings_tmpa_fp {
+ \l__tilings_step_dim
+ /
+ \c__tilings_phi_fp
+ /
+ \c__tilings_phi_fp
+ }
+ \dim_set:Nn \l__tilings_step_dim {\fp_to_dim:N \l__tilings_tmpa_fp}
+}
+\clist_map_inline:nn {H,T,P,F}
+{
+
+ \prop_gput:Nnn \g__tilings_cluster_lms_action_prop {#1}
+ {
+ \__tilings_tikz_keys_get:Nn \l__tilings_tmpa_tl {cluster~type}
+ \tl_set:Nx \l__tilings_tmpb_tl {\tl_item:Nn \l__tilings_parameters_lms_tl {1}}
+ \__tilings_place_cluster_tile_as_pic:VnVnnn
+ \l__tilings_tmpa_tl {#1} \l__tilings_tmpb_tl {}{}{}
+ }
+}
+\cs_new_protected_nopar:Npn \__tilings_place_cluster_tile_as_pic_aux:nnnn #1#2#3#4
+{
+ \__tilings_tikz_keys_get:Nn \l__tilings_tmpa_tl {cluster~type}
+ \tl_set:Nx \l__tilings_tmpb_tl {\__tilings_tile_label:}
+ \tl_set:Nx \l__tilings_tmpc_tl {\__tilings_adjoint_label:}
+ \__tilings_place_cluster_tile_as_pic:VnVVnn
+ \l__tilings_tmpa_tl {#1} \l__tilings_tmpb_tl \l__tilings_tmpc_tl {#4}{#3}
+}
+
+\clist_map_inline:nn {
+ TH{A1}a,
+ TH{A2}a,
+ THb{B1},
+ THb{B2},
+ HTa{A1},
+ HTa{A2},
+ HT{B1}b,
+ HT{B2}b,
+ HPaA,
+ HP{B1}b,
+ HP{B2}b,
+ HF{B1}b,
+ HF{B2}b,
+ PHAa,
+ PHb{B1},
+ PHb{B2},
+ PF{11}{11},
+ PF{12}{11},
+ PF{11}{12},
+ PF{12}{12},
+ FHb{B1},
+ FHb{B2},
+ FP{11}{11},
+ FP{12}{11},
+ FP{11}{12},
+ FP{12}{12},
+ FFfF,
+ FFFf,
+ FF{11}{11},
+ FF{12}{11},
+ FF{11}{12},
+ FF{12}{12}
+}
+{
+ \prop_gput:Nnn \g__tilings_cluster_lms_action_prop {#1}
+ {
+ \__tilings_place_cluster_tile_as_pic_aux:nnnn #1
+ }
+}
+
+\ExplSyntaxOff
+%%
+%% Copyright (C) 2014-2023 by Andrew Stacey <loopspace@mathforge.org>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License (LPPL), either
+%% version 1.3c of this license or (at your option) any later
+%% version. The latest version of this license is in the file:
+%%
+%% http://www.latex-project.org/lppl.txt
+%%
+%% This work is "maintained" (as per LPPL maintenance status) by
+%% Andrew Stacey.
+%%
+%% This work consists of the files penrose_code.dtx
+%% penrose.tex
+%% and the derived files penrose.ins
+%% penrose_code.pdf
+%% penrose.pdf
+%% tikzlibrarytilings.code.tex
+%% tikzlibrarytilings.penrose.code.tex
+%% tikzlibrarytilings.polykite.code.tex
+%% tikzlibrarypenrose.code.tex
+%% README.txt
+%%
+%%
+%% End of file `tikzlibrarytilings.polykite.code.tex'.