diff options
| author | Karl Berry <karl@freefriends.org> | 2013-06-29 15:38:25 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2013-06-29 15:38:25 +0000 |
| commit | fa15421ac0e309a735fac98e1e6ca4432c0d031e (patch) | |
| tree | 05982c4b1e38df425f7cf3872e4e307037847480 /Master/texmf-dist/dvips | |
| parent | fd0e0fada68b585f51bcd1422e59ed7c2271660d (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')
| -rw-r--r-- | Master/texmf-dist/dvips/pst-func/pst-func.pro | 17 |
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? |