[pstricks] pstThreeDSphere

[Markus Krebs]

Hi!

I've tried to plot a sphere. There must be a mistake in my code (or in my 
brain) cause the two spheres are different.

\documentclass[12pt]{scrartcl}
\usepackage{pst-vue3d,pst-3dplot,pstricks-add}
\begin{document}

\psset{Alpha=35,Beta=15,plotpoints=200}
\begin{pspicture}(-9,-9)(4,5.5)
%\psgrid
\pstThreeDCoor[xMin=-5,
                yMin=-5,
                zMin=-5,
                xMax=10,
                yMax=5,
                zMax=5,
                linecolor=red,
                linewidth=1.5pt,
                IIIDticks=false
                ]
\pstThreeDSphere[fillstyle=vlines,hatchsep=3pt,hatchwidth=0.1pt,linewidth=0.5pt](4,1,-1){5}
\pstThreeDPut(4,1,-1){%
          \parametricplotThreeD[plotstyle=curve,yPlotpoints=10](0,360)(0,360){%
	 5 u cos t sin mul  mul
	 5 u cos t cos mul  mul
	 5 u sin  mul
            }
}
\pstThreeDPut(4,1,-1){%
           \parametricplotThreeD[plotstyle=curve,yPlotpoints 
=10,hiddenLine=true](0 ,360)(360 ,0){%
  	t cos u sin mul 5 mul
  	t cos u cos mul 5 mul
  	t sin 5 mul
   	}
}
\end{pspicture}
\end{document}

Any help is appreciated.

Thanks!

Markus Krebs