summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pstricks
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2018-11-14 21:58:59 +0000
committerKarl Berry <karl@freefriends.org>2018-11-14 21:58:59 +0000
commit80997f0765e6e81eddcb63c27e7533f641289d62 (patch)
tree546b9e4a6355318290de7e8a37f2024417fff854 /Master/texmf-dist/dvips/pstricks
parent887b7325c46470e11aff67219395421d0fbc8060 (diff)
pstricks (14nov18)
git-svn-id: svn://tug.org/texlive/trunk@49157 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips/pstricks')
-rw-r--r--Master/texmf-dist/dvips/pstricks/pstricks.pro18
1 files changed, 16 insertions, 2 deletions
diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro
index 03148f97d34..ea9e66cc361 100644
--- a/Master/texmf-dist/dvips/pstricks/pstricks.pro
+++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro
@@ -1,7 +1,7 @@
-% $Id: pstricks.pro 698 2017-12-30 19:08:50Z herbert $
+% $Id: pstricks.pro 838 2018-11-14 19:00:45Z herbert $
%
%% PostScript prologue for pstricks.tex.
-%% Version 1.28, 2017/12/30
+%% Version 1.29, 2018/11/14
%%
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN archives
@@ -46,6 +46,20 @@ tx@Dict begin
pop pop 0 }{ sqrt exch atan} ifelse
y 0 lt { 180 add } if
} def
+/Power { % a^b latest ghostscript don't allow -4^-3.1
+ 2 dict begin % hold all local
+ /b ED
+ /a ED
+ a 0 lt % prevent something like (-4)^(-3.1)=> 1/(-4)^3
+ { b 0 lt
+ { a b cvi exp }
+ { a b exp } ifelse
+ }
+ { a 0 eq { 0 }{ a b exp } ifelse
+ } ifelse
+ end
+} def
+%
/NET { neg exch neg exch T } def % change coordinate system to the negative one
/Pyth { dup mul exch dup mul add sqrt } def % Pythagoras, expects 2 parameter
/Pyth2 { % Pythagoras, xA yA xB yB