Re: Plot Truncation in RealTime3D

*To*: mathgroup at smc.vnet.net*Subject*: [mg65439] Re: Plot Truncation in RealTime3D*From*: "Narasimham" <mathma18 at hotmail.com>*Date*: Sat, 1 Apr 2006 05:38:58 -0500 (EST)*References*: <e0dpnj$qbk$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Thanks. 1) While attempting to rotate with mouse Range limited plots Shown below obtained without ReallTime3D, pos=ParametricPlot3D[ {Cosh[th] Cos[th+al], th, Cosh[th]Sin[th+al]}, {th,-1.2, 1.2 }, {al,0, 2 Pi} ,PlotRange-> { { -2,2},{2,0},{0,2} } ]; neg=ParametricPlot3D[ {Cosh[th] Cos[th+al], th, -Cosh[th]Sin[th+al]}, {th,-1.2, 1.2 }, {al,0, 2 Pi} ,PlotRange-> { { -2,2},{2,0},{0,2} } ] ; Show[pos,neg] ; .. the PlotRange option cannot be implementable in <<ReallTime3D' as it is. The entire surface of revolution comes in, without the desired truncation. Is there a way to work around it? 2) Yes,the surface is same. The question is, How to hide the al parameterized parallels , retaining only th lines in pos and neg ? David Park wrote: > This appears to be two different parametrizations of the same surface. When > you Show them together Mathematica has difficulty in rendering them because > it has to keep determining which surface is 'in front'. > > I don't understand what you are trying to illustrate in your plot. > > David Park > djmp at earthlink.net > http://home.earthlink.net/~djmp/ > > From: Narasimham [mailto:mathma18 at hotmail.com] To: mathgroup at smc.vnet.net > > > a) How to make ParametricPlot3D to plot in the required PlotRange for > top half surface only? > b) How to omit/hide circumferential circles or parameter lines of al > in Show[pos,neg] ? TIA > > <<RealTime3D` > pos=ParametricPlot3D[ {Cosh[th] Cos[th+al], th, Cosh[th]Sin[th+al]}, > {th,-1.2, 1.2 }, {al,0, 2 Pi} ,PlotRange-> { { -2,2},{2,0},{0,2} } ]; > neg=ParametricPlot3D[ {Cosh[th] Cos[th+al], th, -Cosh[th]Sin[th+al]}, > {th,-1.2, 1.2 }, {al,0, 2 Pi} ,PlotRange-> { { -2,2},{2,0},{0,2} } ]; > Show[pos,neg] ; > <<Default3D`