<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html; charset=UTF-8" http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#ffffff">
Dear Manuel!<br>
<br>
Thanks for your help! This is not exactly what I want. <br>
<br>
The plane cutting the paraboloid shoud be the xz-plane: y = 0<br>
<br>
Restricting the values for y, here y < 0 should do the job. <br>
<br>
<font><font><font color="black" face="Arial, Helvetica, sans-serif"
size="2"><font color="black" face="Arial, Helvetica,
sans-serif" size="2"> h=2, %% hauteur 0<z<2<br>
<br>
-4 < y < 0 <br>
<br>
Is this possible?<br>
<br>
Thank You for Your help!<br>
<br>
Markus<br>
<br>
</font></font></font></font><br>
<br>
<br>
Am 26.02.2011 15:52, schrieb Manuel Luque:
<blockquote
cite="mid:8CDA3DBE3ACF1F3-23F8-1E6F9@webmail-m084.sysops.aol.com"
type="cite"><font color="black" face="Arial, Helvetica,
sans-serif" size="2"><font color="black" face="Arial, Helvetica,
sans-serif" size="2">
<div> <span id="result_box" class="short_text"><span
style="background-color: rgb(235, 239, 249);"
title="Est-ce cela que vous voulez obtenir ?">Dear
Markus,<br>
<br>
Is this what you want?<br>
<br>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%<br>
</span></span>
</div>
<div> <br>
</div>
<div> \documentclass{article}<br>
\usepackage{pst-solides3d}<br>
\begin{document}<br>
<br>
\begin{center}<br>
\psset{lightsrc=viewpoint,viewpoint=50 60 25
rtp2xyz,Decran=50}<br>
\begin{pspicture}(-5,-3)(6,6)<br>
\psSolid[object=grille,base=-4 4 -4 4,action=draw]%<br>
\psSolid[object=new,fillcolor=red!50,incolor=yellow,<br>
hollow,<br>
a=15, %% nb d’etages<br>
b=36, %% diviseur de 360, nb de meridiens<br>
h=2, %% hauteur 0<z<2<br>
sommets=<br>
a -1 0 { % z<br>
/k exch def<br>
0 1 b 1 sub {<br>
/i exch def<br>
/r 4 h a div k mul sub sqrt 2 mul def<br>
360 b idiv i mul cos r mul<br>
360 b idiv i mul sin r mul<br>
h a div k mul<br>
} for<br>
} for,<br>
faces={<br>
0 1 a 1 sub {<br>
/k exch def<br>
k b mul 1 add 1 k 1 add b mul 1 sub {<br>
/i exch def<br>
[i i 1 sub b i add 1 sub b i add]<br>
} for<br>
[k b mul k 1 add b mul 1 sub k 2 add b mul 1 sub k 1 add
b mul]<br>
} for}](0,0,0)<br>
\defFunction[algebraic]%<br>
{parabel}(t)<br>
{t}{0}{-1/4*t^2+4}<br>
\psSolid[object=courbe,<br>
function=parabel,range=0 4,<br>
r=0,linecolor=red,<br>
linewidth=2pt]<br>
\gridIIID[Zmin=0,Zmax=4,spotX=r](-4,4)(-4,4)<br>
\end{pspicture}<br>
\end{center}<br>
<br>
\end{document}<br>
<br>
</div>
<div> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%<br>
</div>
<div style="font-family: arial,helvetica; font-size: 10pt;
color: black;"><br>
<span id="result_box" class="short_text" lang="en"><span
title="Cliquer ici pour voir d'autres traductions"
class="hps">It is</span> <span title="Cliquer ici pour
voir d'autres traductions" class="hps">an</span> <span
title="Cliquer ici pour voir d'autres traductions"
class="hps">example</span> <span title="Cliquer ici
pour voir d'autres traductions" class="hps">from</span>
<span title="Cliquer ici pour voir d'autres traductions"
class="hps">this :<br>
<br>
<a class="moz-txt-link-freetext" href="http://melusine.eu.org/lab/bjps/solide/tour.jps">http://melusine.eu.org/lab/bjps/solide/tour.jps</a><br>
<br>
<br>
Best regards,<br>
<br>
M.L<br>
</span></span><!-- end of AOLMsgPart_0_c226e852-fbe1-4153-a21f-a6be0cbbdbd5 -->
</div>
</font></font>
<pre wrap="">
<fieldset class="mimeAttachmentHeader"></fieldset>
_______________________________________________
PSTricks mailing list
<a class="moz-txt-link-abbreviated" href="mailto:PSTricks@tug.org">PSTricks@tug.org</a>
<a class="moz-txt-link-freetext" href="http://tug.org/mailman/listinfo/pstricks">http://tug.org/mailman/listinfo/pstricks</a>
archive: <a class="moz-txt-link-freetext" href="http://www.tug.org/pipermail/pstricks/">http://www.tug.org/pipermail/pstricks/</a></pre>
</blockquote>
</body>
</html>