\begin{pspicture}(-4,-4)(4,9)
%\psframe(-4,-4)(4,4)
\psset{SphericalCoor,viewpoint=100 -20 20,Decran=150}% ,action=draw,num=all,show=all}
\psset{lightsrc=100 -20 cos mul 20 cos mul 100 -20 sin mul 20 cos mul 100 20 sin mul}
\psSolid[object=calcite,r=2,h=8,hue=0.2 0.5 0.5 1,opacity=0.7,action=draw**,hollow]
\axesIIID(2,2,4)(4,4,5)
\end{pspicture}