summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-05-31 20:21:26 +0000
committerKarl Berry <karl@freefriends.org>2021-05-31 20:21:26 +0000
commit7ebd673c159df9ff99861be49e0d9cbcb684399b (patch)
tree842bfabdb2d671bf6ec2b3a0fc0e03ebbbf32759
parent376aaf5faf77de5bd0ab22eacf400b6b04eb1432 (diff)
pstricks (31may21)
git-svn-id: svn://tug.org/texlive/trunk@59402 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/texmf-dist/dvips/pstricks/pstricks.pro26
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/pstricks.tex12
2 files changed, 33 insertions, 5 deletions
diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro
index 823fa1e8e7a..a54aed45d2b 100644
--- a/Master/texmf-dist/dvips/pstricks/pstricks.pro
+++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro
@@ -1,7 +1,7 @@
-% $Id: pstricks.pro 1055 2019-05-16 11:59:06Z herbert $
+% $Id: pstricks.pro 68 2021-04-08 06:41:14Z herbert $
%
%% PostScript prologue for pstricks.tex.
-%% Version 1.34, 2021/03/30
+%% Version 1.35, 2021/05/21
%%
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN archives
@@ -460,6 +460,28 @@ gsave
gsave fill grestore
} def
%
+/ArrowT { % like tikz
+ CLW mul add dup
+ 2 div /w ED
+ mul dup /h ED
+ mul /Inset ED
+ { 0 h T 1 -1 scale } if % changes the direction
+ w 2 mul /w exch def
+ w neg h moveto % lower left of >
+ w 9 div 4 mul neg h 3 div 2 mul
+ w 9 div neg h 3 div
+ 0 0 curveto % tip of >
+ w 9 div h 3 div
+ w 9 div 4 mul h 3 div 2 mul
+ w h curveto % upper left of >
+% w neg Inset neg rlineto % move to x=0 and inset
+% CLW SLW
+% 1 0 0 setrgbcolor
+ 2 setlinejoin
+ stroke
+ 0 0 moveto
+} def
+%
/Tbar {
CLW mul add /z ED
z -2 div CLW 2 div moveto
diff --git a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
index 57dbfd33dd6..52a58656555 100644
--- a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
+++ b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
@@ -80,8 +80,8 @@
\fi
\let\pgfforeach\foreach
%
-\def\fileversion{3.01a}
-\def\filedate{2021/03/30}
+\def\fileversion{3.02}
+\def\filedate{2021/05/31}
\pst@addfams{pstricks}
%
%\define@boolkey[psset]{pstricks}[Pst@]{useURWfonts}[true]{}
@@ -1485,7 +1485,7 @@
%
\def\psk@arrowA{}
\def\psk@arrowB{}
-\def\pst@arrowtable{,-,<->,<<->>,>-<,>>-<<,(-),[-],)-(,]-[,|>-<|,<D-D>,D>-<D,<D<D-D>D>} % hv --1.16
+\def\pst@arrowtable{,-,<->,<<->>,>-<,>>-<<,(-),[-],)-(,]-[,|>-<|,<D-D>,D>-<D,<D<D-D>D>,<T-T>} % hv --1.16
\edef\pst@arrowtable{\pst@arrowtable,|<*->|*,|<->|}
\begingroup
\catcode`\<=13
@@ -1498,6 +1498,7 @@
%
\def\tx@Arrow{ \tx@setStrokeTransparency Arrow }% hv 2008-01-13
\def\tx@ArrowD{ \tx@setStrokeTransparency ArrowD }% hv 2008-01-13
+\def\tx@ArrowT{ \tx@setStrokeTransparency ArrowT }% hv 2021-05-31
%
\@namedef{psas@<|}{
\psk@tbarsize\space \tx@Tbar
@@ -1575,6 +1576,11 @@
CP newpath moveto 0 a neg L stroke 0 h neg T
true \psk@arrowinset \psk@arrowlength \psk@arrowsize \tx@ArrowD
}
+\@namedef{psas@T>}{ false \psk@arrowinset \psk@arrowlength \psk@arrowsize \tx@ArrowT }% hv 20210531
+\@namedef{psas@<T}{ % hv 20071211
+ true \psk@arrowinset \psk@arrowlength \psk@arrowsize \tx@ArrowT
+}
+
\define@key[psset]{pstricks}{tbarsize}[2pt 5]{%
\pst@expandafter\pst@getdimnum{#1} 0 {} {}\@nil
\edef\psk@tbarsize{\pst@number\pst@dimg \pst@tempg}}