\documentclass{article}
\usepackage{pst-solides3d,pst-node,pst-plot,multido,url}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage{colortbl}
\usepackage{array}
\usepackage[a4paper,bottom=2.5cm,top=2cm]{geometry}
%%\usepackage[frenchle]{babel}
\makeatletter

\title{\texttt{pst-solides3d} :\\
       Test 1}
\date{\today }
\begin{document}
\maketitle

%\psset{lightsrc=10 20 30,viewpoint=50 20 30 rtp2xyz}
\psset{viewpoint=50 20 30 rtp2xyz}

\section {Test section avec PSTricks}

\begin{center}
\psset{unit=0.75}
\psset{viewpoint=50 -20 30 rtp2xyz,Decran=50}
\begin{pspicture*}(-5,-4)(6,9)
\psframe(-5,-4)(6,9)
\psSolid[object=cylindre,
   ngrid=1 12,
   r=2,
   plansection={
      [0 0 1 -1]
      [0 0 1 -2]
      [0 0 1 -3]
%      [1 0 -1 2]
   },
   action=draw,
   ]
\end{pspicture*}
\end{center}


\section {Test separe avec PSTricks}

\begin{center}
\psset{unit=0.75}
\psset{viewpoint=50 -20 30 rtp2xyz,Decran=50}
\begin{pspicture*}(-5,-4)(6,9)
\psframe(-5,-4)(6,9)
\psset{solidmemory}
\codejps{
/plan1 [1 1 1 0] eq2plan def
}
\psSolid[object=cylindre,
   r=1,
   h=4,
   ngrid=5 12,
   fillcolor=green,
   plansepare={plan1},
   name=test,
   action=none
]
\psSolid[object=load,
   deactivatecolor,
   load=test1](-3,-2,-1)
\psSolid[object=load,
   deactivatecolor,
   plansepare={[0 0 1 -2]},
   load=test0,
   name=double,
   action=none]
\psSolid[object=load,
   deactivatecolor,
   load=double1,
   numfaces=all]
\psSolid[object=load,
   deactivatecolor,
   load=double0](0,0,2)
\composeSolid
\end{pspicture*}
\end{center}

\end{document}