diff options
author | Karl Berry <karl@freefriends.org> | 2018-11-14 21:58:59 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2018-11-14 21:58:59 +0000 |
commit | 80997f0765e6e81eddcb63c27e7533f641289d62 (patch) | |
tree | 546b9e4a6355318290de7e8a37f2024417fff854 /Master/texmf-dist/dvips/pstricks | |
parent | 887b7325c46470e11aff67219395421d0fbc8060 (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.pro | 18 |
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 |