ex_29.tex

\documentclass[a4paper]{article}
\usepackage{pst-solides3d}
\pagestyle{empty}
\begin{document}
 
\begin{pspicture}(-4,-5)(-6,8)
\psset{solidmemory}
\psset{unit=0.25}
\psset{viewpoint=-10 -10 10,
   lightsrc=-8 -5 6,
   Decran=50}
 
\psSolid[object=sphere,
    r=4.5,
    ngrid=36 36,
%    RotY=90,
    fillcolor=blue,
    incolor=lightgray,
    hollow,
    name=sph1,
    action=none](0,0,2)
\psSolid[object=cone,
      fillcolor=red,
      r=5,
      h=9,
      ngrid=36 36,
      hollow,
      name=sph2,
      action=none
      ](0,0,0)
\psSolid[%
    object=fusion,
    base=sph1 sph2,
    name=sphere,
    opacity=0.6,
    action=draw**
    ](0,0,0)%
\composeSolid
 
 
\end{pspicture}
 
\end{document}