[pstricks] pst-solides3d -- increases ngrid, reduce lines

[Herbert Voss]

Am 28.09.2010 12:53, schrieb Marco Daniel:

>> use multido and draw the circles
>>    
> but I have no idea to work with the hint. :-)

for example:

\documentclass{article}
\usepackage[T1]{fontenc}
\usepackage{pst-solides3d,multido}
\pagestyle{empty}
\begin{document}

\begin{pspicture}(-4,-5)(6,8)
\psset{lightsrc=,viewpoint=50 -30 10 rtp2xyz,Decran=60}

\multido{\iA=0+1}{4}{%
  \defFunction[algebraic]{CircleA}(phi)%
    {sqrt(16-\iA^2)*cos(phi)}{sqrt(16-\iA^2)*sin(phi)}{\iA}
  \defFunction[algebraic]{CircleB}(phi)%
    {sqrt(16-\iA^2)*cos(phi)}{sqrt(16-\iA^2)*sin(phi)}{-\iA}
  \psSolid[object=courbe, function=CircleA, resolution=180, r=0.01,
    range=0 2 Pi mul, linecolor=blue,R=0]
  \psSolid[object=courbe, function=CircleB, resolution=180, r=0.01,
    range=0 2 Pi mul, linecolor=blue,R=0]}
  \gridIIID(-4,4)(-4,4)
\end{pspicture}

\end{document}

you can also use fixed radii for only a few circles.

Herbert