\documentclass{article} \usepackage[dvipsnames,svgnames]{pstricks} \usepackage{pst-solides3d} \begin{document} \pagestyle{empty} %% Auteur : Manuel Luque %% %% ATTENTION : nécessite DEUX VISUALISATIONS du fichier .ps %% soit : %% 1 compilation LaTeX, 1 visualisation du .ps, une compilation LaTeX %% puis une nouvelle visualisation \psset{unit=2} \begin{pspicture}(-4,-3)(4,3) \psframe(-4,-3)(4,3) \IfFileExists{cylindreconcave-sommets.dat}{% \psset{lightsrc=viewpoint,SphericalCoor,viewpoint=100 160 30,Decran=50} \psSolid[object=datfile,fillcolor=yellow!50, file=cylindreconcave] }{% \codejps{ % pour enregistrer les données % du cylindre sans le biseau % avec la partie enlevée en creux -6 2 6 [6 24] newcylindre {0 90 0 rotateOpoint3d} solidtransform [1 -1 0 0] solidplansepare /cylindretest1 exch def /cylindretest0 exch def cylindretest0 [1 1 0 0] solidplansepare /cylindretest21 exch def /cylindretest20 exch def cylindretest21 dup [0 13] solidrmfaces dup solidfacesreverse /faceconcave exch def faceconcave {0 0 90 rotateOpoint3d} solidtransform /faceconcave exch def cylindretest20 dup [0 62] solidrmfaces faceconcave solidfuz (cylindreconcave) writesolidfile } } \end{pspicture} \end{document}