einfuehrung2 (20dec15)

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

1 files changed, 40 insertions, 0 deletions

diff --git a/Master/texmf-dist/doc/latex/einfuehrung2/15-03-20.ltxps b/Master/texmf-dist/doc/latex/einfuehrung2/15-03-20.ltxps
new file mode 100644
index 00000000000..a740dd4d3f2
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/einfuehrung2/15-03-20.ltxps
@@ -0,0 +1,40 @@
+%% 
+%%  Ein Beispiel der DANTE-Edition
+%%  
+%%  2. Auflage
+%% 
+%%  Beispiel 15-03-20 auf Seite 757.
+%% 
+%%  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{pst-solides3d}
+%StopShownPreambleCommands
+\begin{document}
+\psset{viewpoint=100 50 20 rtp2xyz,Decran=60,
+       lightsrc=10 15 10}
+\defFunction[algebraic]{corne}(u,v) %
+  {(2 + u*cos(v))*sin(2*pi*u)} %
+  {(2 + u*cos(v))*cos(2*pi*u) + 2*u} %
+  {u *sin(v)}
+\begin{pspicture}(-2,-2)(2,2)
+\psSolid[object=surfaceparametree,
+  base=0 1 0 2 pi mul,function=corne,ngrid=20]
+\end{pspicture}
+\end{document}