diff options
Diffstat (limited to 'Master/texmf-dist/doc/latex/pstricks-examples/15-08-4.ltx')
-rw-r--r-- | Master/texmf-dist/doc/latex/pstricks-examples/15-08-4.ltx | 64 |
1 files changed, 0 insertions, 64 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples/15-08-4.ltx b/Master/texmf-dist/doc/latex/pstricks-examples/15-08-4.ltx deleted file mode 100644 index 4711de35c85..00000000000 --- a/Master/texmf-dist/doc/latex/pstricks-examples/15-08-4.ltx +++ /dev/null @@ -1,64 +0,0 @@ -%% -%% Ein Beispiel der DANTE-Edition -%% -%% -%% Copyright (C) 2010 Herbert Voss -%% -%% It may be distributed and/or modified under the conditions -%% of the LaTeX Project Public License, either version 1.3 -%% of this license or (at your option) any later version. -%% -%% See http://www.latex-project.org/lppl.txt for details. -%% -%% -%% ==== -% Show page(s) 1 -%% -\documentclass[]{exaarticle} -\pagestyle{empty} -\setlength\textwidth{190.324pt} -\setlength\parindent{0pt} -\StartShownPreambleCommands -\usepackage{pst-plot,pst-xkey,multido} -\makeatletter -\pst@addfams{user} -\define@key[psset]{user}{nLoop}{\def\psnLoop{#1}} -\psset[user]{nLoop=1} -\makeatother -\def\chooseColor#1{% - \ifcase#1\or red\or green\or blue\or cyan\or magenta\or gray\fi} -\StopShownPreambleCommands -\begin{document} -\psset{xunit=1.5mm,yunit=3mm} -\begin{pspicture}(-45,0)(45,20) - \psaxes[Dy=10,Dx=15]{->}(0,0)(-45,0)(45,20)% - \psset{linewidth=1pt}% - \pstVerb{% - /dc 0.2 def - /kx 12 def - /ky 12 def - /pi 3.141529 def - /rad2deg { 57.296 mul } def - /si { pi mul dup rad2deg sin exch div } def - /Func { - /nLoop exch def - x kx mul nLoop mul cos - nLoop dc mul si mul - } def - }% - \psset{plotpoints=400,linecolor=red,plotstyle=curve}% - \multido{\iA=1+1}{6}{% - \psplot[linecolor=\chooseColor\iA,nLoop=\iA]{-45}{45}{% - /y0 x kx mul cos dc si mul def - /y1 0 def - 1 1 \psnLoop { - Func y1 add /y1 exch def - } for - y1 y0 add - dc mul 2 mul - dc add - ky mul - }% - }% -\end{pspicture} -\end{document} |