[pstricks] pst-solides3d plansepare / load

[Marco Daniel]

Hello,

i am trying to combine the two following graphics.

\usepackage{pst-solides3d}
\usepackage{pstricks-add}
\usepackage{amsmath,amsfonts}
\definecolor{myblack}{cmyk}{0 0 0 1} %reines Schwarz
\usepackage{siunitx}
\usepackage{comma}
\begin{document}

\begin{pspicture}[solidmemory](-7,-5)(10,7)
\psset{lightsrc=viewpoint,viewpoint=100 5 30 rtp2xyz,Decran=250,}
\psset{viewpoint=50 20 20 rtp2xyz,Decran=50}
\psset{lightsrc=viewpoint}

\defFunction{cone}(u,v){u v Cos mul}{u v Sin mul}{u}
\psSolid[
object=surfaceparametree,function=cone,
base=-2 2 0 2 pi mul,
fillcolor=yellow!25,
intersectiontype=0,
intersectionplan={
[0 0 1 -1]
[0 0 1 -2]
[0 0 1 -3]
[0.894 0 0.447 -1.8]},
ngrid=25 40,
intersectioncolor=(bleu) (rouge) (vert) (rose),
intersectionlinewidth=1 1.5 1.8 2.2]
\end{pspicture}

\psset{unit=0.5}
\begin{pspicture}[solidmemory](-4,-5)(7,4)
\psset{viewpoint=50 -40 10 
rtp2xyz,Decran=50,linecolor=darkgray,lightsrc=viewpoint}
\psSolid[object=cylindre,r=2,h=6,ngrid=6 24,plansepare={[0.707 0 0.707 0]},
    name=Zylinder,action=none](0,0,-3)
\psSolid[object=load,load=Zylinder1,fillcolor={[rgb]{0.7 1 0.7}},
    fcol=0 (1 1 0.7 setrgbcolor)]
\psSolid[object=load,load=Zylinder0,RotZ=90,fillcolor={[rgb]{0.7 1 0.7}},
    fcol=0 (1 1 0.7 setrgbcolor)](0,4,0)
\psSolid[object=plan,action=draw,definition=equation,
    args={[0.707 0 0.707 0] 90},base=-2 2 -3 3,planmarks]
\psSolid[object=line,args=0 0 0 0 4 0]% erste Haelfte y-Achse
\end{pspicture}
\end{document}

I want to split the cone-function. I found an example without any split:
http://melusine.eu.org/syracuse/pstricks/pst-solides3d/animations/a47/anim.tex

I am not able combine these examples.

regards
Marco