diff options
author | Karl Berry <karl@freefriends.org> | 2021-09-26 21:27:33 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-09-26 21:27:33 +0000 |
commit | bf30694fc8daf987b98580deba4bb0b585c97410 (patch) | |
tree | 0e6fe73277a8900b32e06fd42b2865e5711c02e4 /Master/texmf-dist/tex | |
parent | ab30505456ece933535297ab51495aaa6dbc5df1 (diff) |
pstricks-add (26sep21)
git-svn-id: svn://tug.org/texlive/trunk@60622 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r-- | Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex index 2fa480ae814..0f165e8c728 100644 --- a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex +++ b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex @@ -31,8 +31,8 @@ \ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi \ifx\PSTmathLoaded\endinput\else \input pst-math \fi % -\def\fileversion{3.90} -\def\filedate{2021/09/10} +\def\fileversion{3.91} +\def\filedate{2021/09/25} \let\pstricksaddFV\fileversion \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)} % @@ -2169,10 +2169,10 @@ a add \addto@pscode{ (#1) run /zMax 0 def /zMin 0 def % lowest and highest value - contourdata aload length /N ED % get the no of arrays - N{ % inside contourdata + contourdata aload length /N_data ED % get the no of arrays + N_data{ % inside contourdata /data ED % save first inner array - data aload length 3 div round cvi { % get the records + data aload length 3 div round cvi { % get the records \psk@colorOffset dup zMin lt % z<zMin? { /zMin ED } % yes, save it @@ -2183,19 +2183,19 @@ a add clear % clear stack /dz zMax zMin sub def % value range /steps \psk@colSteps\space 0 gt { true }{ false } ifelse def - 0 1 N 1 sub { % for i=0 to N-1 + 0 1 N_data 1 sub { % for i=0 to N-1 contourdata exch get /data ED % get first array - data aload length 3 div round cvi { + data aload length 3 div round cvi 1 sub { %0 .. length-1 \psk@colorOffset - /z ED /y ED /x ED - z zMin sub dz div % relative z (0..1) + /z_data ED /y_data ED /x_data ED + z_data zMin sub dz div % relative z (0..1) \ifPst@colored 400 mul 380 add tx@addDict begin wavelengthToRGB Red Green Blue end setrgbcolor % set color \else steps {\psk@colSteps\space mul round \psk@colSteps\space div} if setgray \fi - x \pst@number\psxunit mul y \pst@number\psyunit mul + x_data \pst@number\psxunit mul y_data \pst@number\psyunit mul \pst@number\pst@dimb 0 360 arc fill } repeat } for |