PSTricks

Vendredi 11 Janvier 2008

/pst-solides3d/objfusion/ex_19.png
LaTeX PDF

Retour, répertoire : /pst-solides3d/objfusion

ex_19.pst
%@AUTEUR: Juergen Gilg
\begin{pspicture}(-4,-5)(-6,8)



\psset{solidmemory}
\psset{unit=0.75}
\psset{lightsrc=10 5 10,SphericalCoor,viewpoint=20 10 20,Decran=50}



\psSolid[%
    object=calottesphere,
    r=3,
    phi=-90,
    theta=35,
    fillcolor=blue,
    incolor=lightgray,
    ngrid=24 36,
    RotY=90,
    hollow,
    action=none,
    name=sph1,
    ](0,0,0)
\psSolid[%
    object=calottesphere,
    r=2.5,
    phi=-90,
    theta=35,
    fillcolor=green,
    incolor=white,
    ngrid=24 36,
    RotY=90,
    hollow,
    action=none,    
    RotZ=-8,
    name=sph5,
    ](0,0,0)
\psSolid[%
    object=calottesphere,
    r=2,
    phi=-90,
    theta=35,
    fillcolor=orange,
    incolor=gray,
    hollow,
    ngrid=24 36,
    action=none,
    name=sph2,
    RotY=90,
    RotZ=30,
    ](0,0,0)
\psSolid[%
    object=calottesphere,
    r=1.5,
    phi=-90,
    theta=35,
    fillcolor=yellow,
    incolor=lightgray,
    hollow,
    ngrid=24 36,
    action=none,
    name=sph4,
    RotY=40,
    RotZ=10,
    ](0,0,0)
\psSolid[%
    object=calottesphere,
    r=1,
    phi=-90,
    theta=35,
    fillcolor=red,
    incolor=white,
    hollow,
    ngrid=24 36,
    action=none,
    name=sph3,
    RotY=90,
    RotZ=-10,
    ](0,0,0)
\psSolid[%
    object=fusion,
    base=sph1 sph2 sph3 sph4 sph5,
    name=sphere,
    action=draw**
    ](0,0,0)%
\composeSolid


\end{pspicture}

106913 — durée de production de la page: 0.5857 s