<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
<font face="Myriad Pro">with parameters...<br>
<br>
\documentclass[a4paper,12pt]{article}<br>
\usepackage{pstricks}<br>
\usepackage{pst-3dplot}<br>
%\usepackage{pst-grad}<br>
\parindent=0pt<br>
\makeatletter<br>
<br>
\begin{document}<br>
<br>
\begin{pspicture}(-5,-5)(5,5)<br>
\psset{Beta=20,Alpha=160}<br>
\pstThreeDCoor<br>
\pstThreeDPut(0,0,0){<br>
\parametricplotThreeD[xPlotpoints=20,yPlotpoints=20,linecolor=red,drawStyle=yLines,plotstyle=line,linewidth=0.5pt](0,1)(0,360){%<br>
t <br>
u sin t mul t mul<br>
u cos t mul t mul<br>
}<br>
}<br>
<br>
\pstThreeDPut(0,0,0){<br>
\parametricplotThreeD[xPlotpoints=20,yPlotpoints=20,linecolor=blue,drawStyle=xLines,plotstyle=line,linewidth=0.5pt](0,1)(0,360){%<br>
t<br>
u sin t mul <br>
u cos t mul <br>
}<br>
}<br>
\end{pspicture}<br>
<br>
\end{document}<br>
<br>
Juergen<br>
</font><br>
Juergen Gilg wrote:
<blockquote cite="mid:467008B6.2080700@acrotex.net" type="cite">
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
<font face="Myriad Pro">... what about using<br>
<br>
\parametricplotThreeD<br>
<br>
and paramterize the "volume curves"<br>
<br>
Juergen<br>
</font><br>
Herbert Voss wrote:
<blockquote cite="mid:466FFD3B.9080902@zedat.fu-berlin.de" type="cite">
<pre wrap="">Hamed wrote:
</pre>
<blockquote type="cite">
<pre wrap="">Hi everybody,
First of all, thanks a lot for Juergen,
Second, my question was about the slice of a solid of revolution.
I meant can we do the slice for the solid obtained by rotating the region
bounded by y=x and y=x^2 about the x-axis
</pre>
</blockquote>
<pre wrap=""><!---->hope, this helps
Herbert
\documentclass{article}
\usepackage{pst-plot}
\SpecialCoor
\usepackage{multido}
\parindent=0pt
#1: x1; #2: x2: #3: no of steps; #4: equation
\def\psVolume(#1,#2)#3#4{{%
\psplot{#1}{#2}{#4}\psplot{#1}{#2}{#4 neg}
\multido{\iA=1+1}{#3}{%
\pscustom[fillcolor=green,fillstyle=solid]{%
\code{
/dX #2 #1 sub #3 div def
/Start dX \iA\space 1 sub mul #1 add def
/End Start dX add def
/Height End Start add 2 div /x ED #4 def }
\psellipticarc(!Start 0)(! Height 8 div Height){90}{270}
\rlineto(! dX 0)
\psellipticarc(!End 0)(! Height 8 div Height){270}{90}
\rlineto(!dX neg 0)}}
\psellipticarc(#2,0)(! #2 dup #1 sub #3 div 2 div sub
/x ED x 4 div #4){90}{270}
\psset{plotstyle=line,linestyle=dashed,plotpoints=40,dotstyle=*,dotsize=0.5pt}
\psplot{#1}{#2}{#4}\psplot{#1}{#2}{#4 neg}%
}\ignorespaces}
\begin{document}
\psset{xunit=2}
\begin{pspicture}(-0.5,-4)(4,4)
\psaxes{->}(0,0)(0,-4)(3,4)
\psVolume(0,1){2}{x}
\psVolume(1,2){2}{x dup mul}
\psline(2,0)(3,0)
\end{pspicture}
\begin{pspicture}(-0.5,-4)(4,4)
\psaxes{->}(0,0)(0,-4)(3,4)
\psVolume(0,1){20}{x}
\psVolume(1,2){20}{x dup mul}
\psline(2,0)(3,0)
\end{pspicture}
\end{document}
_______________________________________________
pstricks mailing list
<a moz-do-not-send="true" class="moz-txt-link-abbreviated"
href="mailto:pstricks@tug.org">pstricks@tug.org</a>
<a moz-do-not-send="true" class="moz-txt-link-freetext"
href="http://tug.org/mailman/listinfo/pstricks">http://tug.org/mailman/listinfo/pstricks</a>
</pre>
</blockquote>
<br>
<pre class="moz-signature" cols="65">--
jürgen gilg
austr. 59
70376 stuttgart
tel 0711-59 27 88
e-mail <a moz-do-not-send="true" class="moz-txt-link-abbreviated"
href="mailto:gilg@acrotex.net">gilg@acrotex.net</a>
webpage <a moz-do-not-send="true" class="moz-txt-link-abbreviated"
href="http://www.acrotex.net">www.acrotex.net</a>
<a moz-do-not-send="true" class="moz-txt-link-abbreviated"
href="http://www.gilligan-online.de">www.gilligan-online.de</a></pre>
<pre wrap="">
<hr size="4" width="90%">
_______________________________________________
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>
</pre>
</blockquote>
<br>
<pre class="moz-signature" cols="65">--
jürgen gilg
austr. 59
70376 stuttgart
tel 0711-59 27 88
e-mail <a class="moz-txt-link-abbreviated" href="mailto:gilg@acrotex.net">gilg@acrotex.net</a>
webpage <a class="moz-txt-link-abbreviated" href="http://www.acrotex.net">www.acrotex.net</a>
<a class="moz-txt-link-abbreviated" href="http://www.gilligan-online.de">www.gilligan-online.de</a></pre>
</body>
</html>