pstricks (14sep17)

git-svn-id: svn://tug.org/texlive/trunk@45288 c570f23f-e606-0410-a88d-b1316a301751

6 files changed, 60 insertions, 33 deletions

diff --git a/Master/texmf-dist/doc/generic/pstricks/pst-news17.pdf b/Master/texmf-dist/doc/generic/pstricks/pst-news17.pdf
index a2f6659f141..d2cb77ea8cc 100644
--- a/Master/texmf-dist/doc/generic/pstricks/pst-news17.pdf
+++ b/Master/texmf-dist/doc/generic/pstricks/pst-news17.pdf
diff --git a/Master/texmf-dist/doc/generic/pstricks/pst-news17.tex b/Master/texmf-dist/doc/generic/pstricks/pst-news17.tex
index cdeca0b1657..b371be4040d 100644
--- a/Master/texmf-dist/doc/generic/pstricks/pst-news17.tex
+++ b/Master/texmf-dist/doc/generic/pstricks/pst-news17.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-news17.tex 476 2017-06-15 19:44:19Z herbert $
+%% $Id: pst-news17.tex 545 2017-09-12 18:45:32Z herbert $
 \documentclass[11pt,english,BCOR=10mm,DIV=12,bibliography=totoc,parskip=false,headings=small,
     headinclude=false,footinclude=false,twoside]{pst-doc}
 \listfiles
@@ -60,6 +60,7 @@ original base 14 fonts of PostScript. For example: instaed of Helvetica we use
 NimbusSanL-Regu. The URW fonts are always embedded in the created ps or pdf output.
 This is not the default for the PostScript fonts.
 
+
 \subsection{Error message}
 
 Using PSTricks with \Lprog{pdflatex} will work only when using package
@@ -174,6 +175,25 @@ For example
 \end{verbatim}
 
 
+%--------------------------------------------------------------------------------------
+\section{\texttt{pstricks.pro}}
+%--------------------------------------------------------------------------------------
+
+A full circle has by default an angle of 360 degrees. 
+Setting the circle with \Lcs{degrees}\Largs{17} to another value doesn't work for the 
+PostScript function \texttt{PtoC} (Polat to Cartesian -- $(r,\phi)\rightarrow (x,y)$).
+Now there is a \texttt{PtoC360} for the old definition and a \texttt{PtoC} which now takes
+the setting of \Lcs{pst@angleunit}  into account.
+
+\begin{LTXexample}[pos=t]
+\degrees[16]
+\begin{pspicture}[showgrid](-2,-2)(2,2)
+\psline[linecolor=blue](!1.8 2 PtoC)%  45 degrees
+\end{pspicture}
+\end{LTXexample}
+
+
+
 \clearpage
 \nocite{*}
 \printbibliography
diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro
index ad932f84696..60a9afcafbe 100644
--- a/Master/texmf-dist/dvips/pstricks/pstricks.pro
+++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro
@@ -1,7 +1,7 @@
 % $Id: pstricks.pro 446 2017-04-19 11:40:55Z herbert $
 %
 %% PostScript prologue for pstricks.tex.
-%% Version 1.24, 2016/04/22
+%% Version 1.25, 2017/09/12
 %%
 %% This program can be redistributed and/or modified under the terms
 %% of the LaTeX Project Public License Distributed from CTAN archives
@@ -54,7 +54,8 @@ tx@Dict begin
   3 1 roll 		% yB-yA xA xB
   sub			% yB-yA xA-xB
   Pyth } def
-/PtoC { 2 copy cos mul 3 1 roll sin mul } def % Polar to Cartesian
+/PtoC360 { 2 copy cos mul 3 1 roll sin mul } def % Polar to Cartesian (origimal)
+/PtoC { pst@angleunit 2 copy cos mul 3 1 roll sin mul } def % Polar to Cartesian
 /PtoCab { dup cos 4 -1 roll mul 3 1 roll sin mul } def % Polar to Cartesian (Ellipse) a b phi-> x y 
 %/Rand { rand 4294967295 div } def		% a real random number
 /Rand { rand 2147483447 div } def		% a real random number between 0 and 1
diff --git a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
index 846c4a86fea..a57d3f85376 100644
--- a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
+++ b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
@@ -141,8 +141,8 @@
 \@ifundefined{pgffor@emptyvalues}{\input pgffor.code.tex}{}
 \let\pgfforeach\foreach
 %
-\def\fileversion{2.75}
-\def\filedate{2017/08/24}
+\def\fileversion{2.75a}
+\def\filedate{2017/09/12}
 \pst@addfams{pstricks}
 %
 %\define@boolkey[psset]{pstricks}[Pst@]{useURWfonts}[true]{}
@@ -853,10 +853,12 @@
 \def\@degrees[#1]{%
   \pst@checknum{#1}\pst@tempg
   \edef\pst@angleunit{360 \pst@tempg div mul }%
+  \pstVerb{tx@Dict begin startGlobal /pst@angleunit {\pst@angleunit} def endGlobal end}%
   \ignorespaces}
 %
-\def\radians{\def\pst@angleunit{57.2956 mul }}
-\def\pst@angleunit{}
+\def\radians{\def\pst@angleunit{57.2956 mul }}%
+\def\pst@angleunit{}%
+\pstVerb{tx@Dict begin startGlobal /pst@angleunit {\pst@angleunit} def endGlobal end}%
 %
 \def\SpecialCoor{%
   \def\pst@@getcoor##1{%
diff --git a/Master/texmf-dist/tex/latex/pstricks/pst-doc.cls b/Master/texmf-dist/tex/latex/pstricks/pst-doc.cls
index 7166d95c1ea..f0a84e5347e 100644
--- a/Master/texmf-dist/tex/latex/pstricks/pst-doc.cls
+++ b/Master/texmf-dist/tex/latex/pstricks/pst-doc.cls
@@ -1,4 +1,4 @@
-% $Id: pst-doc.cls 461 2017-05-18 10:17:06Z herbert $
+% $Id: pst-doc.cls 533 2017-08-24 14:56:30Z herbert $
 %
 %%
 %% The PSTricks Project
@@ -26,8 +26,8 @@
 \RequirePackage{amsmath, amssymb} 
 \ifxetex
   \usepackage{unicode-math}
-  \usepackage{libertinus}
-  \setmonofont[Scale=MatchLowercase,FakeStretch=0.92]{Anonymous Pro}
+  \usepackage{libertinus-otf}
+  \setmonofont[Scale=MatchLowercase,FakeStretch=0.92]{DejaVu Sans Mono}
   \setmathfont{XITS Math}
 \else
   \RequirePackage[T1]{fontenc}
diff --git a/Master/texmf-dist/tex/latex/pstricks/pstricks.sty b/Master/texmf-dist/tex/latex/pstricks/pstricks.sty
index 28e511fb174..2a4b86e7b63 100644
--- a/Master/texmf-dist/tex/latex/pstricks/pstricks.sty
+++ b/Master/texmf-dist/tex/latex/pstricks/pstricks.sty
@@ -1,4 +1,4 @@
-% $Id: pstricks.sty 474 2017-06-15 16:40:57Z herbert $
+% $Id: pstricks.sty 545 2017-09-12 18:45:32Z herbert $
 %%
 %% This is file `pstricks.sty'.
 %%
@@ -17,7 +17,7 @@
 
 \NeedsTeXFormat{LaTeX2e}
 
-\ProvidesPackage{pstricks}[2017/03/17 v0.63 LaTeX wrapper for `PSTricks' (RN,HV)]
+\ProvidesPackage{pstricks}[2017/07/16 v0.64 LaTeX wrapper for `PSTricks' (RN,HV)]
 % 
 \def\documentclass{%
   \edef\@tempa{\jobname.tex }%
@@ -82,11 +82,11 @@
   \let\saved@scalebox\scalebox
   \input{pstricks}%
   \ProvidesFile{pstricks.tex}[\filedate\space v\fileversion\space `PSTricks' (tvz,hv)]
-  \input{pst-fp.tex}
+  \input{pst-fp.tex}%
   \ProvidesFile{pst-fp.tex}[\filedate\space v\fileversion\space `PST-fp' (hv)]
   \IfFileExists{pstricks.pro}{%
     \ProvidesFile{pstricks.pro}
-      [2012/10/16 v. 1.15,  PostScript prologue file (hv)]
+      [2017/09/12 v. 1.25,  PostScript prologue file (hv)]
         \@addtofilelist{pstricks.pro}}{}%
   \IfFileExists{pst-algparser.pro}{%
     \ProvidesFile{pst-algparser.pro}[2011/10/31 v. 0.04,  PostScript prologue file (hv)]
@@ -107,25 +107,29 @@
     [ /ca \psk@strokeopacityalpha 
       /CA \psk@strokeopacityalpha /SetTransparency pdfmark >
   \pst@def{setBlendmode}<
-    [ /BM\ifcase\psk@blendmode%
-        /Normal \or	% 0
-	/Multiply \or	% 1
-	/Screen \or	% 2
-	/Overlay \or	% 3
-	/Darken \or	% 4
-	/Lighten \or	% 5
-	/ColorDodge \or	% 6
-	/ColorBurn \or	% 7
-	/HardLight \or	% 8
-	/SoftLight \or	% 9
-	/Difference \or	% 10
-	/Exclusion \or	% 11
-	/Hue \or	% 12
-	/Color \or	% 13
-	/Saturation \or	% 14
-	/Luminosity 	% 15
-      \else /Normal \fi
-      /ca \psk@shapealpha /CA \psk@opacityalpha /SetTransparency pdfmark >%
+    [ /BM%
+     \ifcase\psk@blendmode
+      /Normal \or
+      /Compatible \or
+      /Screen \or
+      /Multiply \or
+      /HardLight \or
+      /Darken \or
+      /Lighten \or
+      /Difference \or
+      /ColorDodge \or
+      /ColorBurn \or
+      /SoftLight \or
+      /Hue \or
+      /Saturation \or
+      /Luminosity \or
+      /Overlay \or
+      /Exclusion \or
+      /Color
+    \else 
+      /Normal 
+    \fi
+    /ca \psk@shapealpha /CA \psk@opacityalpha /SetTransparency pdfmark >
 \fi
 %
 \@ifpackageloaded{xcolor}{%