%@AUTEUR: Maxime Chupin %@DATE: 31 mars 2008 \documentclass[a4paper]{article} \usepackage{pst-solides3d} \definecolor{moblue}{rgb}{0.06,0.247,0.662} \pagestyle{empty} \begin{document} \begin{pspicture}(-6,-6)(6,6) \psset{SphericalCoor=true,viewpoint=12 90 18,Decran=60,linewidth=0.2pt} \psset{solidmemory} \psSolid[object=cone, h=0.8647,r=2, fillcolor=green!20, name=C1, ngrid=1 60, RotZ=180, action=none] \psSolid[object=calottesphere, r=2.175, theta=-23.5, phi=-90, action=none, hollow, RotZ=180, fillcolor=green!20, ngrid=30 60, name=S1](0,0,0.8647) \psSolid[object=fusion, base=C1 S1, file=spherecone, action=writesolid] \composeSolid \end{pspicture} \end{document}