summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pst-func
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-06-29 15:38:25 +0000
committerKarl Berry <karl@freefriends.org>2013-06-29 15:38:25 +0000
commitfa15421ac0e309a735fac98e1e6ca4432c0d031e (patch)
tree05982c4b1e38df425f7cf3872e4e307037847480 /Master/texmf-dist/dvips/pst-func
parentfd0e0fada68b585f51bcd1422e59ed7c2271660d (diff)
pst-func (3jun13)
git-svn-id: svn://tug.org/texlive/trunk@31038 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips/pst-func')
-rw-r--r--Master/texmf-dist/dvips/pst-func/pst-func.pro17
1 files changed, 8 insertions, 9 deletions
diff --git a/Master/texmf-dist/dvips/pst-func/pst-func.pro b/Master/texmf-dist/dvips/pst-func/pst-func.pro
index c190e16fb78..0ea724d8439 100644
--- a/Master/texmf-dist/dvips/pst-func/pst-func.pro
+++ b/Master/texmf-dist/dvips/pst-func/pst-func.pro
@@ -1,4 +1,4 @@
-%% $Id: pst-func.pro 391 2010-10-02 16:43:32Z herbert $
+%% $Id: pst-func.pro 786 2013-06-03 07:28:54Z herbert $
%%
%% This is file `pst-func.pro',
%%
@@ -16,7 +16,7 @@
%% `pst-func' is a PSTricks package to plot special math functions
%%
%%
-%% version 0.13 / 2010-06-21 Herbert Voss
+%% version 0.14 / 2013-06-03 Herbert Voss
%
/tx@FuncDict 100 dict def
tx@FuncDict begin
@@ -74,7 +74,7 @@ tx@FuncDict begin
} for % x y on stack
end
} def
-%
+
/BezierCurve { % on stack [ coors psk@plotpoints BezierType
% 10 dict begin
/BezierType ED
@@ -83,14 +83,13 @@ tx@FuncDict begin
epsilon GetBezierCoor % next Bezier point
Points 0 get Points 1 get % starting point
ArrowA moveto
- epsilon epsilon 1 {
- /t ED
- t GetBezierCoor
- t 0.9999 lt { lineto }{ 1 epsilon sub GetBezierCoor 4 2 roll ArrowB pop pop pop pop } ifelse
- } for
+ epsilon dup 1 epsilon sub { /t ED t GetBezierCoor lineto } for
+ 1 epsilon sub GetBezierCoor
+ 1 GetBezierCoor
+ ArrowB lineto moveto
% end
} def
-%
+
/Bernstein { % on stack tStart tEnd plotpoints i n
12 dict begin % hold all local
/envelope ED % plot envelope?