diff options
author | Karl Berry <karl@freefriends.org> | 2021-05-31 20:21:26 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-05-31 20:21:26 +0000 |
commit | 7ebd673c159df9ff99861be49e0d9cbcb684399b (patch) | |
tree | 842bfabdb2d671bf6ec2b3a0fc0e03ebbbf32759 | |
parent | 376aaf5faf77de5bd0ab22eacf400b6b04eb1432 (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.pro | 26 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/pstricks/pstricks.tex | 12 |
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}} |