summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx')
-rw-r--r--Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx43
1 files changed, 0 insertions, 43 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx b/Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx
deleted file mode 100644
index c93b87a4161..00000000000
--- a/Master/texmf-dist/doc/latex/pstricks-examples/33-07-4.ltx
+++ /dev/null
@@ -1,43 +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}
-\usepackage[utf8]{inputenc}
-\StartShownPreambleCommands
-\usepackage{pst-thick,pst-node,multido}
-\StopShownPreambleCommands
-\begin{document}
-\begin{pspicture}(-1,-3)(10,3)
-\psthick[curveonly,E=2,K=45]{0}{10}{\fonctionSinus{10}{2}}
-\multido{\i=0+1}{11}{%
-\pnode(! /t \i\space def /E 2 def /K 45 def
- /dt 10 360 div def \fonctionSinus{10}{2}
- /ds dx dup mul dy dup mul add sqrt def
- /dx dx ds div def /dy dy ds div def
- /dx' K cos dx mul K sin dy mul sub def
- /dy' K sin dx mul K cos dy mul add def
- /nx E 2 div dy' mul neg def % normale x
- /ny E 2 div dx' mul def % normale y
- x0 nx add y0 ny add ){A}
-\psdot[linecolor=red](A) \pnode(! x0 nx sub y0 ny sub ){B}
-\psdot[linecolor=red](B) \psdot(!t O t mul sin A mul) \psline(A)(B)}
-\parametricplot[linestyle=dashed]{0}{10}{ t O t mul sin A mul }
-\psaxes(0,0)(-1,-3)(10,3)
-\end{pspicture}
-\end{document}