diff options
| author | Karl Berry <karl@freefriends.org> | 2014-05-19 22:07:36 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2014-05-19 22:07:36 +0000 |
| commit | df1c0578d12dbfc05d52fa0c9e05678461a8f8e1 (patch) | |
| tree | a76505d196e84144a20949e0f3d1b176ff590200 /Master/texmf-dist/dvips | |
| parent | fbcca9aeebcca4c5935747e39d330ae7b9233eed (diff) | |
pstricks (19may14)
git-svn-id: svn://tug.org/texlive/trunk@34126 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips')
| -rw-r--r-- | Master/texmf-dist/dvips/pstricks/pst-algparser.pro | 7 | ||||
| -rw-r--r-- | Master/texmf-dist/dvips/pstricks/pstricks.pro | 9 |
2 files changed, 11 insertions, 5 deletions
diff --git a/Master/texmf-dist/dvips/pstricks/pst-algparser.pro b/Master/texmf-dist/dvips/pstricks/pst-algparser.pro index edd71c773fa..60e5c28263c 100644 --- a/Master/texmf-dist/dvips/pstricks/pst-algparser.pro +++ b/Master/texmf-dist/dvips/pstricks/pst-algparser.pro @@ -1,7 +1,7 @@ % $Id: pst-algparser.pro 902 2014-03-30 16:23:33Z herbert $ %% %% PostScript prologue for PSTricks algorithm parser -%% Version 0.05, 2014/03/30 +%% Version 0.06, 2014/05/19 %% %% This program can be redistributed and/or modified under the terms %% of the LaTeX Project Public License Distributed from CTAN archives @@ -9,6 +9,8 @@ %% %%-----------------------------------------------------------------------------% % +%currentdict /Pi known not { /Pi 3.14159265359 def } if +% /AlgParser { tx@AlgToPs begin AlgToPs end } def % Dominique Rodriguez % /tx@CoreAnalyzerDict 100 dict def tx@CoreAnalyzerDict begin @@ -304,7 +306,8 @@ end %% (name) -> /TrigoFunc { dup (cos) eq 1 index (sin) eq or exch (tan) eq or - { /ExpressionVector ExpressionVector aload length Pi /div cvx 180 /mul cvx 5 -1 roll 4 add + { /ExpressionVector ExpressionVector aload length 3.1415926 /div cvx 180 /mul cvx 5 -1 roll 4 add + array astore def array astore def } if } def diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro index 39c0e6e180c..856d7b24958 100644 --- a/Master/texmf-dist/dvips/pstricks/pstricks.pro +++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro @@ -1,7 +1,7 @@ % $Id: pstricks.pro 902 2014-03-30 16:23:33Z herbert $ % %% PostScript prologue for pstricks.tex. -%% Version 1.22, 2014/02/20 +%% Version 1.23, 2014/05/15 %% %% 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 +/PtoC { 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 %----------------- hv added 20050516 --------------- @@ -1041,7 +1042,9 @@ gsave /mtrx CM def T rotAngle rotate - scale 0 0 1 5 3 roll arc + scale + 0 0 moveto 1 0 rmoveto % move to the start position + 0 0 1 5 3 roll arc mtrx setmatrix } def % |