diff options
Diffstat (limited to 'Master/texmf-dist/dvips/pstricks/pstricks.pro')
-rw-r--r-- | Master/texmf-dist/dvips/pstricks/pstricks.pro | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro index 9fc3be31019..03148f97d34 100644 --- a/Master/texmf-dist/dvips/pstricks/pstricks.pro +++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro @@ -1,7 +1,7 @@ -% $Id: pstricks.pro 616 2017-10-04 16:14:42Z herbert $ +% $Id: pstricks.pro 698 2017-12-30 19:08:50Z herbert $ % %% PostScript prologue for pstricks.tex. -%% Version 1.27, 2017/09/18 +%% Version 1.28, 2017/12/30 %% %% This program can be redistributed and/or modified under the terms %% of the LaTeX Project Public License Distributed from CTAN archives @@ -55,8 +55,13 @@ tx@Dict begin sub % yB-yA xA-xB Pyth } def /PtoC { 2 copy cos mul 3 1 roll sin mul } def % Polar to Cartesian (origimal) -/PtoCrel { pst@angleunit 2 copy cos mul 3 1 roll sin mul } def % Polar to Cartesian with \degrees[??] +/PtoCrel { pst@angleunit PtoC } def % Polar to Cartesian with \degrees[??] /PtoCab { dup cos 4 -1 roll mul 3 1 roll sin mul } def % Polar to Cartesian (Ellipse) a b phi-> x y +/AnytoDeg { pst@angleunit } def +/DegtoAny { 1 pst@angleunit div} def +/AnytoRad { AnytoDeg DegtoRad } def +/RadtoAny { RadtoDeg DegtoAny } def +% %/Rand { rand 4294967295 div } def % a real random number /Rand { rand 2147483447 div } def % a real random number between 0 and 1 %----------------- hv added 20050516 --------------- @@ -985,7 +990,7 @@ gsave % Helvetica findfont b scalefont setfont % is set in pstricks.tex %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - /NimbusSanL-Regu findfont b scalefont setfont +% /NimbusSanL-Regu findfont b scalefont setfont /b b .95 mul CLW 2 div add def } if systemdict /setstrokeadjust known { true setstrokeadjust /t { } def } |