diff options
Diffstat (limited to 'Master/texmf-dist/doc/latex/pstricks-examples/36-00-72.ltx')
-rw-r--r-- | Master/texmf-dist/doc/latex/pstricks-examples/36-00-72.ltx | 61 |
1 files changed, 61 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples/36-00-72.ltx b/Master/texmf-dist/doc/latex/pstricks-examples/36-00-72.ltx new file mode 100644 index 00000000000..b508cb7cac4 --- /dev/null +++ b/Master/texmf-dist/doc/latex/pstricks-examples/36-00-72.ltx @@ -0,0 +1,61 @@ +%% +%% 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-solides3d} +\StopShownPreambleCommands +\begin{document} +\psset{unit=0.75} +\begin{pspicture}(-6.5,-3)(7,11) +\psset{lightsrc=10 -20 50,viewpoint=50 -20 20 rtp2xyz,Decran=50} +\psSolid[object=grille,base=-4 4 -4 4, + linecolor=lightgray,linewidth=0.5\pslinewidth]% +\psSolid[object=grille,base=-4 4 0 8, + linecolor=lightgray,RotX=90, + linewidth=0.5\pslinewidth](0,4,0) +\psSolid[object=grille,base=-4 4 -4 4, + linecolor=lightgray,RotY=90, + linewidth=0.5\pslinewidth](-4,0,4) +\defFunction[algebraic]{helice}(t)% + {1.3*(1-cos(2.5*t))*cos(6*t)} + {1.3*(1-cos(2.5*t))*sin(6*t)}{t} +\defFunction[algebraic]{helice_xy}(t)% + {1.3*(1-cos(2.5*t))*cos(6*t)} + {1.3*(1-cos(2.5*t))*sin(6*t)}{0} +\defFunction[algebraic]{helice_xz}% + (t){1.3*(1-cos(2.5*t))*cos(6*t)}{4}{t} +\defFunction[algebraic]{helice_yz}% + (t){-4}{1.3*(1-cos(2.5*t))*sin(6*t)}{t} +\psset{range=0 8} +\psSolid[object=courbe,r=0,linecolor=blue, + linewidth=0.05,resolution=360, + normal=0 0 1,function=helice_xy] +\psSolid[object=courbe,r=0, + linecolor=green,linewidth=0.05, + resolution=360,normal=0 0 1, + function=helice_xz] +\psSolid[object=courbe,r=0, + linewidth=0.05,resolution=360, + normal=0 0 1,function=helice_yz] +\psSolid[object=courbe,r=0, + linecolor=red,linewidth=0.1, + resolution=360,function=helice] + \end{pspicture} +\end{document} |