summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty')
-rw-r--r--Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty425
1 files changed, 240 insertions, 185 deletions
diff --git a/Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty b/Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty
index bcca7fdee25..e78454f4fdd 100644
--- a/Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty
+++ b/Master/texmf-dist/tex/latex/adfsymbols/adfarrows.sty
@@ -1,199 +1,254 @@
-%% Copyright 2019 Clea F. Rees
-%
-% This work may be distributed and/or modified under the
-% conditions of the LaTeX Project Public License, either version 1.3
-% of this license or (at your option) any later version.
-% The latest version of this license is in
-% http://www.latex-project.org/lppl.txt
-% and version 1.3 or later is part of all distributions of LaTeX
-% version 2005/12/01 or later.
-%
-% This work has the LPPL maintenance status `maintained'.
-%
-% The Current Maintainer of this work is Clea F. Rees.
-%
-% This work consists of all files listed in manifest.txt.
+%%
+%% This is file `adfarrows.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% adfarrows.dtx (with options: `sty')
+%%
+%% Copyright (C) 2024 Clea F. Rees.
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3c
+%% of this license or (at your option) any later version.
+%% The latest version of this license is in
+%% https://www.latex-project.org/lppl.txt
+%% and version 1.3c or later is part of all distributions of LaTeX
+%% version 2008-05-04 or later.
+%%
+%% This work has the LPPL maintenance status `maintained'.
+%%
+%% The Current Maintainer of this work is Clea F. Rees.
+%%
+%% This file may only be distributed together with a copy of the package
+%% fontscripts. You may however distribute the package fontscripts without
+%% such generated files.
+%%
+%% This work consists of all files listed in manifest.txt.
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{adfarrows}[2019/10/13 v1.2b adfarrows CFR]
-\RequirePackage{pifont,fp}
-{\Pifont{ArrowsADF}}
-
-\def\adfarrows@ot{opentail}%
-\def\adfarrows@p{plain}%
-\def\adfarrows@c{comic}%
-\def\adfarrows@st{solidtail}%
-\def\adfarrows@th{thick}%
-\def\adfarrows@t{tail}%
-\def\adfarrows@e{e}%
-\def\adfarrows@east{east}%
-\def\adfarrows@se{se}%
-\def\adfarrows@southeast{southeast}%
-\def\adfarrows@s{s}%
-\def\adfarrows@south{south}%
-\def\adfarrows@sw{sw}%
-\def\adfarrows@southwest{southwest}%
-\def\adfarrows@w{w}%
-\def\adfarrows@west{w}%
-\def\adfarrows@nw{nw}%
-\def\adfarrows@northwest{northwest}%
-\def\adfarrows@n{n}%
-\def\adfarrows@north{north}%
-\def\adfarrows@ne{ne}%
-\def\adfarrows@northeast{northeast}%
-\FPset\adfarrows@base{0}%
-\FPset\adfarrows@add{0}%
-\FPset\adfarrowsbase@opentail{3}%
-\FPset\adfarrowsbase@plain{11}%
-\FPset\adfarrowsbase@comic{19}%
-\FPset\adfarrowsbase@solidtail{29}%
-\FPset\adfarrowsbase@thick{37}%
-\FPset\adfarrowsbase@tail{45}%
-\FPset\adfarrowsdir@e{0}%
-\FPset\adfarrowsdir@se{1}%
-\FPset\adfarrowsdir@s{2}%
-\FPset\adfarrowsdir@sw{3}%
-\FPset\adfarrowsdir@w{4}%
-\FPset\adfarrowsdir@nw{5}%
-\FPset\adfarrowsdir@n{6}%
-\FPset\adfarrowsdir@ne{7}%
-\newcommand*{\adfarrows@dir}[4]{%
- \edef\adfarrows@tempw{#1}%
- \edef\adfarrows@tempx{#2}%
- \edef\adfarrows@tempy{#3}%
- \edef\adfarrows@tempz{#4}%
- \ifx\adfarrows@tempw\adfarrows@tempz
- \FPset\adfarrows@addtemp{\adfarrows@tempy}%
- \global\let\adfarrows@add\adfarrows@addtemp
- \else
- \ifx\adfarrows@tempx\adfarrows@tempz
- \FPset\adfarrows@addtemp{\adfarrows@tempy}%
- \global\let\adfarrows@add\adfarrows@addtemp
- \fi
- \fi}
-\newcommand*{\adfarrows@fam}[4]{%
- \edef\adfarrows@tempw{#1}%
- \edef\adfarrows@tempx{#2}%
- \edef\adfarrows@tempy{#3}%
- \edef\adfarrows@tempz{#4}%
- \ifx\adfarrows@tempw\adfarrows@tempz
- \FPset\adfarrows@basetemp{\adfarrows@tempy}%
- \global\let\adfarrows@base\adfarrows@basetemp
- \else
- \ifx\adfarrows@tempx\adfarrows@tempz
- \FPset\adfarrows@basetemp{\adfarrows@tempy}%
- \global\let\adfarrows@base\adfarrows@basetemp
- \fi
- \fi}
-\newcommand*{\adfarrow}[2][]{%
- \def\adfarrows@tempa{#1}%
- \ifx\adfarrows@tempa\@empty
- \Pisymbol{ArrowsADF}{#2}%
- \else
- \adfarrows@fam{1}{\adfarrows@ot}{\adfarrowsbase@opentail}{#1}%
- \adfarrows@fam{2}{\adfarrows@p}{\adfarrowsbase@plain}{#1}%
- \adfarrows@fam{3}{\adfarrows@c}{\adfarrowsbase@comic}{#1}%
- \adfarrows@fam{4}{\adfarrows@st}{\adfarrowsbase@solidtail}{#1}%
- \adfarrows@fam{5}{\adfarrows@th}{\adfarrowsbase@thick}{#1}%
- \adfarrows@fam{6}{\adfarrows@t}{\adfarrowsbase@tail}{#1}%
- \adfarrows@dir{\adfarrows@s}{\adfarrows@south}{\adfarrowsdir@s}{#2}%
- \adfarrows@dir{\adfarrows@se}{\adfarrows@southeast}{\adfarrowsdir@se}{#2}%
- \adfarrows@dir{\adfarrows@sw}{\adfarrows@southwest}{\adfarrowsdir@sw}{#2}%
- \adfarrows@dir{\adfarrows@n}{\adfarrows@north}{\adfarrowsdir@n}{#2}%
- \adfarrows@dir{\adfarrows@ne}{\adfarrows@northeast}{\adfarrowsdir@ne}{#2}%
- \adfarrows@dir{\adfarrows@nw}{\adfarrows@northwest}{\adfarrowsdir@nw}{#2}%
- \adfarrows@dir{\adfarrows@w}{\adfarrows@west}{\adfarrowsdir@w}{#2}%
- \adfarrows@dir{\adfarrows@e}{\adfarrows@east}{\adfarrowsdir@e}{#2}%
- \FPadd\adfarrows@arrow\adfarrows@base\adfarrows@add
- \FPround{\adfarrows@arrow}{\adfarrows@arrow}{0}%
- \ifnum\adfarrows@arrow < 53
- \ifnum\adfarrows@arrow > 0
- \Pisymbol{ArrowsADF}{\adfarrows@arrow}%
- \else
- \PackageError{adfarrows}{adfarrows@arrow must be greater than 0 but is \adfarrows@arrow}%
- \fi
- \else
- \PackageError{adfarrows}{adfarrows@arrow must be less than than 53 but is \adfarrows@arrow}%
- \fi
- \fi}
-
+\RequirePackage{svn-prov}
+\ProvidesPackageSVN[\filebase.sty]{$Id: adfarrows.dtx 10467 2024-10-03 23:14:27Z cfrees $}[v1.3 \revinfo ArrowsADF]
+\DefineFileInfoSVN[adfarrows]
+\newif\if@adfarrows@digonnew
+\@ifundefined{ExplLoaderFileDate}{%
+ \IfFileExists{expl3.sty}{%
+ \RequirePackage{expl3}%
+ }{%
+ \@adfarrows@digonnewfalse
+ }%
+}{\@adfarrows@digonnewtrue}
+\if@adfarrows@digonnew
+\ExplSyntaxOn
+\keys_define:nn { adfarrows }
+{
+ scale .tl_set:N = \adfarrows@scale,
+ scale .initial:V = \@empty,
+}
+\else
+ \let\adfarrows@scale\@empty
+\fi
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\providecommand \IfFormatAtLeastTF { \@ifl@t@r \fmtversion }
+\IfFormatAtLeastTF { 2022-06-01 }
+{
+ \ProcessKeyOptions [ adfarrows ]
+}{
+ \RequirePackage { l3keys2e }
+ \ProcessKeysOptions { adfarrows }
+}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\ExplSyntaxOff
+\DeclareRobustCommand{\adfarrows@style}{%% do NOT break line below!
+ \not@math@alphabet\adfarrows@style\relax
+ \fontencoding{U}\fontfamily{ArrowsADF}\fontseries{m}\fontshape{n}\selectfont
+}
+\ExplSyntaxOn
+\int_new:N \l__adfarrows_base_ot_int
+\int_set:Nn \l__adfarrows_base_ot_int {1}
+\int_new:N \l__adfarrows_base_p_int
+\int_set:Nn \l__adfarrows_base_p_int {2}
+\int_new:N \l__adfarrows_base_c_int
+\int_set:Nn \l__adfarrows_base_c_int {3}
+\int_new:N \l__adfarrows_base_st_int
+\int_set:Nn \l__adfarrows_base_st_int {4}
+\int_new:N \l__adfarrows_base_th_int
+\int_set:Nn \l__adfarrows_base_th_int {5}
+\int_new:N \l__adfarrows_base_t_int
+\int_set:Nn \l__adfarrows_base_t_int {6}
+\int_new:N \l__adfarrows_dir_e_int
+\int_set:Nn \l__adfarrows_dir_e_int {0}
+\int_new:N \l__adfarrows_dir_east_int
+\int_set:Nn \l__adfarrows_dir_east_int {0}
+\int_new:N \l__adfarrows_dir_se_int
+\int_set:Nn \l__adfarrows_dir_se_int {1}
+\int_new:N \l__adfarrows_dir_southeast_int
+\int_set:Nn \l__adfarrows_dir_southeast_int {1}
+\int_new:N \l__adfarrows_dir_s_int
+\int_set:Nn \l__adfarrows_dir_s_int {2}
+\int_new:N \l__adfarrows_dir_south_int
+\int_set:Nn \l__adfarrows_dir_south_int {2}
+\int_new:N \l__adfarrows_dir_sw_int
+\int_set:Nn \l__adfarrows_dir_sw_int {3}
+\int_new:N \l__adfarrows_dir_southwest_int
+\int_set:Nn \l__adfarrows_dir_southwest_int {3}
+\int_new:N \l__adfarrows_dir_w_int
+\int_set:Nn \l__adfarrows_dir_w_int {4}
+\def\adfarrows@west{west}%
+\int_new:N \l__adfarrows_dir_west_int
+\int_set:Nn \l__adfarrows_dir_west_int {4}
+\int_new:N \l__adfarrows_dir_nw_int
+\int_set:Nn \l__adfarrows_dir_nw_int {5}
+\int_new:N \l__adfarrows_dir_northwest_int
+\int_set:Nn \l__adfarrows_dir_northwest_int {5}
+\int_new:N \l__adfarrows_dir_n_int
+\int_set:Nn \l__adfarrows_dir_n_int {6}
+\int_new:N \l__adfarrows_dir_north_int
+\int_set:Nn \l__adfarrows_dir_north_int {6}
+\int_new:N \l__adfarrows_dir_ne_int
+\int_set:Nn \l__adfarrows_dir_ne_int {7}
+\int_new:N \l__adfarrows_dir_northeast_int
+\int_set:Nn \l__adfarrows_dir_northeast_int {7}
+\int_new:N \g__adfarrows_base_int
+\int_new:N \g__adfarrows_add_int
+\int_new:N \l__adfarrows_base_opentail_int
+\int_set:Nn \l__adfarrows_base_opentail_int {3}
+\int_new:N \l__adfarrows_base_plain_int
+\int_set:Nn \l__adfarrows_base_plain_int {11}
+\int_new:N \l__adfarrows_base_comic_int
+\int_set:Nn \l__adfarrows_base_comic_int {19}
+\int_new:N \l__adfarrows_base_solidtail_int
+\int_set:Nn \l__adfarrows_base_solidtail_int {29}
+\int_new:N \l__adfarrows_base_thick_int
+\int_set:Nn \l__adfarrows_base_thick_int {37}
+\int_new:N \l__adfarrows_base_tail_int
+\int_set:Nn \l__adfarrows_base_tail_int {45}
+\int_new:N \l__adfarrows_arrow_int
+\cs_new_nopar:Nn \__adfarrows_arrow:nn
+{
+ \int_if_exist:cTF { l__adfarrows_base_#1_int }
+ {
+ \int_gset_eq:Nc \g__adfarrows_base_int { l__adfarrows_base_#1_int }
+ }{ % some kind of error check needed here
+ \int_gset:Nn \g__adfarrows_base_int { #1 }
+ }
+ \int_if_exist:cTF { l__adfarrows_dir_#2_int }
+ {
+ \int_gset_eq:Nc \g__adfarrows_add_int { l__adfarrows_dir_#2_int }
+ }{
+ \PackageError{adfarrows}{#2 ~not~a~valid~direction.~Setting~east~}
+ \int_gzero:N \g__adfarrows_add_int
+ }
+ \int_set:Nn \l__adfarrows_arrow_int { \g__adfarrows_base_int + \g__adfarrows_add_int }
+ \int_compare:nNnTF { \l__adfarrows_arrow_int } < { 53 }
+ { %^^A ~ \ifnum ... \the \numexpr ... N \the \numexpr ... \else ... \fi
+ \int_compare:nNnTF { \l__adfarrows_arrow_int } > { 0 }
+ {
+ \expandafter\adfarrows@style\expandafter\char \int_to_arabic:n {
+ \l__adfarrows_arrow_int
+ }
+ }{
+ \PackageError{adfarrows}{\textbackslash l__adfarrows_arrow_int~must~be~greater~than~0~but~is~\int_to_arabic:n {\l__adfarrows_arrow_int}}%
+ }
+ }{
+ \PackageError{adfarrows}{\textbackslash l__adfarrows_arrow_int ~ must~be~less~than~than~53~but~is~\int_to_arabic:n {\l__adfarrows_arrow_int}}%
+ }
+}
+\cs_new_nopar:Nn \__adfarrows_arrow:n
+{
+ \adfarrows@style\char#1
+}
+\NewDocumentCommand \adfarrow { o m }
+{
+ \group_begin:
+ \IfValueTF { #1 }
+ {
+ \__adfarrows_arrow:nn { #1 } { #2 }
+ }{
+ \__adfarrows_arrow:n { #2 }
+ }
+ \group_end:
+}
+\ExplSyntaxOff
\newcommand*{\adfhalfarrowright}{\adfarrow{1}}
\newcommand*{\adfhalfarrowleft}{\adfarrow{2}}
\newcommand*{\adfhalfarrowrightsolid}{\adfarrow{27}}
\newcommand*{\adfhalfarrowleftsolid}{\adfarrow{28}}
-
\gdef\adfarrowe#1{%
- \ifcase #1 \relax
- \or \adfarrow{3}%
- \or \adfarrow{11}%
- \or \adfarrow{19}%
- \or \adfarrow{29}%
- \or \adfarrow{37}%
- \or \adfarrow{45}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{3}%
+\or \adfarrow{11}%
+\or \adfarrow{19}%
+\or \adfarrow{29}%
+\or \adfarrow{37}%
+\or \adfarrow{45}%
+\fi}
\gdef\adfarrowse#1{%
- \ifcase #1 \relax
- \or \adfarrow{4}%
- \or \adfarrow{12}%
- \or \adfarrow{20}%
- \or \adfarrow{30}%
- \or \adfarrow{38}%
- \or \adfarrow{46}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{4}%
+\or \adfarrow{12}%
+\or \adfarrow{20}%
+\or \adfarrow{30}%
+\or \adfarrow{38}%
+\or \adfarrow{46}%
+\fi}
\gdef\adfarrows#1{%
- \ifcase #1 \relax
- \or \adfarrow{5}%
- \or \adfarrow{13}%
- \or \adfarrow{21}%
- \or \adfarrow{31}%
- \or \adfarrow{39}%
- \or \adfarrow{47}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{5}%
+\or \adfarrow{13}%
+\or \adfarrow{21}%
+\or \adfarrow{31}%
+\or \adfarrow{39}%
+\or \adfarrow{47}%
+\fi}
\gdef\adfarrowsw#1{%
- \ifcase #1 \relax
- \or \adfarrow{6}%
- \or \adfarrow{14}%
- \or \adfarrow{22}%
- \or \adfarrow{32}%
- \or \adfarrow{40}%
- \or \adfarrow{48}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{6}%
+\or \adfarrow{14}%
+\or \adfarrow{22}%
+\or \adfarrow{32}%
+\or \adfarrow{40}%
+\or \adfarrow{48}%
+\fi}
\gdef\adfarroww#1{%
- \ifcase #1 \relax
- \or \adfarrow{7}%
- \or \adfarrow{15}%
- \or \adfarrow{23}%
- \or \adfarrow{33}%
- \or \adfarrow{41}%
- \or \adfarrow{49}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{7}%
+\or \adfarrow{15}%
+\or \adfarrow{23}%
+\or \adfarrow{33}%
+\or \adfarrow{41}%
+\or \adfarrow{49}%
+\fi}
\gdef\adfarrownw#1{%
- \ifcase #1 \relax
- \or \adfarrow{8}%
- \or \adfarrow{16}%
- \or \adfarrow{24}%
- \or \adfarrow{34}%
- \or \adfarrow{42}%
- \or \adfarrow{50}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{8}%
+\or \adfarrow{16}%
+\or \adfarrow{24}%
+\or \adfarrow{34}%
+\or \adfarrow{42}%
+\or \adfarrow{50}%
+\fi}
\gdef\adfarrown#1{%
- \ifcase #1 \relax
- \or \adfarrow{9}%
- \or \adfarrow{17}%
- \or \adfarrow{25}%
- \or \adfarrow{35}%
- \or \adfarrow{43}%
- \or \adfarrow{51}%
- \fi}
+\ifcase #1 \relax
+\or \adfarrow{9}%
+\or \adfarrow{17}%
+\or \adfarrow{25}%
+\or \adfarrow{35}%
+\or \adfarrow{43}%
+\or \adfarrow{51}%
+\fi}
\gdef\adfarrowne#1{%
- \ifcase #1 \relax
- \or \adfarrow{10}%
- \or \adfarrow{18}%
- \or \adfarrow{26}%
- \or \adfarrow{36}%
- \or \adfarrow{44}%
- \or \adfarrow{52}%
- \fi}
-
-\endinput
+\ifcase #1 \relax
+\or \adfarrow{10}%
+\or \adfarrow{18}%
+\or \adfarrow{26}%
+\or \adfarrow{36}%
+\or \adfarrow{44}%
+\or \adfarrow{52}%
+\fi}
%% end adfarrows.sty
-
+\endinput
+%%
+%% End of file `adfarrows.sty'.