pst-func (4feb14)

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

4 files changed, 28 insertions, 6 deletions

diff --git a/Master/texmf-dist/doc/generic/pst-func/Changes b/Master/texmf-dist/doc/generic/pst-func/Changes
index 14637921791..f3204955d54 100644
--- a/Master/texmf-dist/doc/generic/pst-func/Changes
+++ b/Master/texmf-dist/doc/generic/pst-func/Changes
@@ -1,4 +1,5 @@
 ..... pst-func.tex
+0.78  2014-02-03  - added \psWeierstrass as original defined
 0.77  2014-02-01  - added \psWeierstrass
 0.76  2012-01-13  - modifications to \psImpPlot
 0.75  2012-01-01  - moved \psPrintValue into pst-tools
diff --git a/Master/texmf-dist/doc/generic/pst-func/README b/Master/texmf-dist/doc/generic/pst-func/README
index 11083f2897c..71046634ac5 100644
--- a/Master/texmf-dist/doc/generic/pst-func/README
+++ b/Master/texmf-dist/doc/generic/pst-func/README
@@ -22,7 +22,7 @@ pst-func: plotting special mathematical functions:
 -- psWeibull for Weibull distribution 
 -- psLame (Lam\`e\ Curve -- a superellipse)
 -- psThomae (popcorn function)
--- psWeierstrass
+-- psWeierstrass (original and modified)
 -- psplotImp (plotting implicit defined functions)
 -- psVolume (rotating f(x) around the x-axis)
 -- psPrintValue
diff --git a/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf b/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf
index 11513d64057..f64f846dca8 100644
--- a/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf
+++ b/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf
diff --git a/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex b/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex
index 2aec2a646d3..e582a82e4ea 100644
--- a/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex
+++ b/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-func-doc.tex 884 2014-02-01 17:09:26Z herbert $
+%% $Id: pst-func-doc.tex 890 2014-02-02 15:47:16Z herbert $
 \documentclass[11pt,english,BCOR10mm,DIV12,bibliography=totoc,parskip=false,
    smallheadings, headexclude,footexclude,oneside]{pst-doc}
 \usepackage[utf8]{inputenc}
@@ -1627,17 +1627,38 @@ everywhere but differentiable nowhere.
 %
 
 \begin{BDef}
-\Lcs{psWeierstrass}\OptArgs\Largr{$x_0,x_1$}\Largb{a}
+\Lcs{psWeierstrass}\OptArgs\Largr{$x_0,x_1$}\OptArg*{\Largs{a}}\Largb{a/b}
 \end{BDef}
 
+Without the optional argument the mandatory one is $a$, otherwise it is $b$ and
+the optional one $a$. Without setting the optional argument \Lkeyword{epsilon} the value
+of 1.e-8 will be used.
+
+
 \begin{LTXexample}[width=6.5cm,wide=false]
 \psset{yunit=10,xunit=5}
 \begin{pspicture}(-0.1,-0.5)(2.1,0.5)
-\psaxes[Dx=0.2,Dy=0.1,ticksize=-4pt 0,
+\psaxes[Dx=0.2,Dy=0.1,ticksize=-2pt 0,
   labelFontSize=\scriptstyle]{->}(0,0)(0,-0.5)(2.1,0.5)
 \psWeierstrass[linecolor=red](0,2){2}
-\psWeierstrass[linecolor=green](0,2){3}
-\psWeierstrass[linecolor=blue](0,2){4}
+\psWeierstrass[linecolor=green,epsilon=1.e-15](0,2){3}
+\psWeierstrass[linecolor=blue,epsilon=1.e-5](0,2){4}
+\end{pspicture}
+\end{LTXexample}
+
+
+The original Weierstraß function can be used with the optional argument:
+\[ f(x)= \sum_{n=0}^\infty a^n \cos(b^n \pi x) \]
+
+
+
+\begin{LTXexample}[width=6.5cm,wide=false]
+\psset{unit=2cm,linewidth=0.5pt,plotpoints=5000}
+\begin{pspicture}(-2.1,-2.1)(2.1,2.1)
+\psaxes[Dx=0.5,Dy=0.5,ticksize=-2pt 0,
+  labelFontSize=\scriptstyle]{->}(0,0)(-2,-2)(2,2)
+\psWeierstrass[linecolor=red](-2,2)[0.5]{3}
+\psWeierstrass[linecolor=blue!70](-2,2)[0.5]{10}
 \end{pspicture}
 \end{LTXexample}