diff options
Diffstat (limited to 'Master/texmf-dist/dvips/pst-func/pst-func.pro')
| -rw-r--r-- | Master/texmf-dist/dvips/pst-func/pst-func.pro | 31 |
1 files changed, 28 insertions, 3 deletions
diff --git a/Master/texmf-dist/dvips/pst-func/pst-func.pro b/Master/texmf-dist/dvips/pst-func/pst-func.pro index 8a4b0e98f8e..e1093708323 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 55 2008-11-14 12:01:12Z herbert $ +%% $Id: pst-func.pro 72 2009-01-08 22:00:47Z herbert $ %% %% This is file `pst-func.pro', %% @@ -16,7 +16,7 @@ %% `pst-func' is a PSTricks package to plot special math functions %% %% -%% version 0.09 / 2008-03-22 Herbert Voss <voss _at_ pstricks.de> +%% version 0.10 / 2009-01-08 Herbert Voss <voss _at_ pstricks.de> % /tx@FuncDict 100 dict def tx@FuncDict begin @@ -282,7 +282,32 @@ tx@FuncDict begin sum z ln sub CEuler z mul sub end } def - +% +/ChebyshevT { 5 dict begin % z on stack + /xtmp exch def + /n exch def + 0 0 1 n .5 mul floor { + /k exch def + xtmp xtmp mul 1 sub k exp + xtmp n 2 k mul sub exp mul + n 2 k mul MoverN mul + add + } for + end +} def +% +/ChebyshevU {5 dict begin % z on stack + /xtmp exch def + /n exch def + 0 0 1 n .5 mul floor { + /k exch def + xtmp xtmp mul 1 sub k exp + xtmp n 2 k mul sub exp mul + n 1 add 2 k mul 1 add MoverN mul + add + } for + end +} def % % subroutines for complex numbers, given as an array [a b] % which is a+bi = Real+i Imag |