summaryrefslogtreecommitdiff
path: root/info/examples/Einfuehrung2/15-03-5.ltxps
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/Einfuehrung2/15-03-5.ltxps')
-rw-r--r--info/examples/Einfuehrung2/15-03-5.ltxps40
1 files changed, 40 insertions, 0 deletions
diff --git a/info/examples/Einfuehrung2/15-03-5.ltxps b/info/examples/Einfuehrung2/15-03-5.ltxps
new file mode 100644
index 0000000000..9696246f38
--- /dev/null
+++ b/info/examples/Einfuehrung2/15-03-5.ltxps
@@ -0,0 +1,40 @@
+%%
+%% Ein Beispiel der DANTE-Edition
+%%
+%% 2. Auflage
+%%
+%% Beispiel 15-03-5 auf Seite 753.
+%%
+%% Copyright (C) 2016 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{145.16928pt}
+\setlength\parindent{0pt}
+\usepackage[utf8]{inputenc}
+%StartShownPreambleCommands
+\usepackage{pstricks-add}
+\usepackage{multido}
+%StopShownPreambleCommands
+\begin{document}
+\psscalebox{0.75}{%
+\begin{pspicture}(-1,-3)(4.75,3)
+ \psaxes{->}(0,0)(-1,-3)(5,3)
+ \psplot[polarplot,linewidth=2pt,algebraic,
+ plotpoints=500]{0}{6.289}{2*(1+cos(x))}
+ \multido{\r=0.000+0.314}{21}{ %
+ \psplotTangent[polarplot,Derive=-2*sin(x),
+ algebraic,arrows=<->]{\r}{1.5}{2*(1+cos(x))}}
+\end{pspicture}}
+\end{document}