\documentclass{article} \usepackage{pst-solides3d} \begin{document} \pagestyle{empty} \begin{pspicture}(-1.5,-2)(8,6) %\psframe(-1.5,-2)(8,6) \psset{SphericalCoor,lightsrc=viewpoint,viewpoint=100 -10 10,Decran=100} \psSolid[object=grille,base=-3 3 -1 8,action=draw] \psset{solidmemory} \codejps{ /coeff 2 sqrt 2 mul def } \defFunction[algebraic]{G3}(t) {6*(cos(t))^3*sin(t)} {4*(cos(t))^2} {0} \defFunction[algebraic]{G4}(t) {6*(cos(t))^3*sin(t)} {4*(cos(t))^2+coeff} {coeff} \psSolid[object=courbe,function=G3, range=0 6.28,r=0, linecolor=blue, linewidth=2pt] \psSolid[object=cylindre, range=0 -6.28, h=4, function=G3, axe=0 1 1, ngrid=3 36, fillcolor=green!50, incolor=yellow!50] \psSolid[object=courbe,function=G4, range=0 6.28,r=0, linecolor=blue, linewidth=2pt] \psSolid[object=vecteur, linecolor=red, args=0 coeff coeff] \psSolid[object=plan,action=draw, definition=equation, args={[0 0 1 coeff neg] 90}, base=-1 8 -3 3,planmarks,showBase] \axesIIID(0,4.5,0)(4,8,5) \rput(0,-1){\texttt{axe=0 1 1}} \end{pspicture} \end{document}