[pstricks] just a little more help

[Herbert Voss]

Am 21.12.2012 22:42, schrieb Cyrille Piatecki:
> Thanks all for your kindly help
>
> I just wonder how to plot with dash line the masked part of the red line
> and how tho fill with a color the U_0 cut

I played a bit with the parameter equation of the paraboloid, which
makes it easier to draw the circles (intersection). However, I think
my equation is not correct ...

Herbert

\documentclass{article}
\usepackage{pst-solides3d}

\begin{document}
\begin{center}
\psset{lightsrc=viewpoint,viewpoint=40 30 16 rtp2xyz,Decran=20,unit=0.8}
\begin{pspicture}(-8,-8)(9,7)
\defFunction{Func}(u,v)
   {u 2 mul v RadtoDeg cos mul 4 add}
   {u 2 mul v RadtoDeg sin mul 4 add}
   {10 u dup mul sub dup -2 lt { pop -2 } if }
\psSolid[object=surfaceparametree,function=Func,fillcolor=cyan!10,grid,
    ngrid=.25 .25,base=0 4 0 6.3]
\defFunction{FuncR}(t)
   {6.5 sqrt 2 mul t RadtoDeg cos mul 4 add}
   {6.5 sqrt 2 mul t RadtoDeg sin mul 4 add}
   { 3.6 }
\defFunction{FuncR}(t)
   {1.75 sqrt 2 mul t RadtoDeg cos mul 4 add}
   {1.75 sqrt 2 mul t RadtoDeg sin mul 4 add}
   { 8.25 }
\psSolid[object=courbe,r=0,function=FuncR,resolution=20,range=0 
6.3,linestyle=dashed]

\psSolid[object=tronccone,grid,r0=7,r1=5,h=5.6,fillcolor=cyan!10,mode=4](4,4,-2)

\axesIIID[linecolor=gray,linewidth=0.4pt,labelsep=18pt,axisnames={x,y,U}](0,0,0)(13,13,12)
\psLineIIID[linecolor=blue, linewidth=0.1pt,linearc=0.,
   doubleline=false](0,0,0)(6,0,0)(6,6,0)(6,6,8.4)
\psLineIIID[linecolor=blue, linewidth=0.1pt,linearc=0.,
   doubleline=false](0,0,0)(0,6,0)(6,6,0)
\psLineIIID[linecolor=red, linewidth=0.1pt,linearc=0.,
   doubleline=false](0,0,0)(8,0,0)(8,8,0)(8,8,3.6)
\psLineIIID[linecolor=red, linewidth=0.1pt,linearc=0.,
   doubleline=false](0,0,0)(0,8,0)(8,8,0)
\defFunction[algebraic]{inter}(t){t}{t}{-(t-4)^2*0.4+10}
\psSolid[object=courbe,r=0,linecolor=green,linewidth=1pt,range=6 8,
ngrid=.15 .15,
          function=inter,grid,action=draw]
%\pscurve[linecolor=green](-0.32,0.45)(-0.33,.9)(-0.6,2.4)
\rput(-1.8,-.5){\tiny $x_1$}
\rput(-2.6,-1){\tiny $x_0$}
\rput(4,-0.4){\tiny $y_0$}
\rput(3,-0.25){\tiny $y_1$}
\rput(-1.5,.8){\tiny $U_0$}
\rput(1.1,4.1){\tiny $U_1$}
\psline[linecolor=yellow](1.4,.9)(2,.3)
\psline[linecolor=yellow](1.4,-1.4)(2,-2)
%\psgrid
   \end{pspicture}
   \end{center}
\end{document}