Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: surface intersection

  • To: mathgroup at smc.vnet.net
  • Subject: [mg61142] Re: [mg61097] surface intersection
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Tue, 11 Oct 2005 03:21:25 -0400 (EDT)
  • Reply-to: hanlonr at cox.net
  • Sender: owner-wri-mathgroup at wolfram.com

pp3d=ParametricPlot3D[{Sqrt[2-y^2], y, Sqrt[2-y^2]}, {y, 0, Sqrt[2]}];

Needs["Graphics`"];

Shadow[pp3d];


Bob Hanlon

> 
> From: "David Turner" <dturner at faulkner.edu>
To: mathgroup at smc.vnet.net
> Date: 2005/10/10 Mon AM 02:39:58 EDT
> Subject: [mg61142] [mg61097] surface intersection
> 
> Hello,
>  
> I wish to plot the intersection of the surfaces x = Sqrt[2 - y^2] and z = Sqrt
[2 - y^2] which lies in the first octant.  I wish for the plot to be limitd to only 
the intersection.  My best attempt is 
>  
> ParametricPlot3D[{{Sqrt[2-t^2+0.00001], t, u}, {u, t, Sqrt[2-t^2+0.00001]}}, 
> {t, 0, Sqrt[2]}, {u, 0, Sqrt[2]}, ViewPoint -> {2.75, 2.4, 1}];
>  
> However, this shows more than the intersection
>  
> Any ideas?
>  
> Thanks in advance.
> 
> 


  • Prev by Date: Re: simplifying rational expressions
  • Next by Date: Re: NET/Link return array from C++
  • Previous by thread: Re: surface intersection
  • Next by thread: Re: surface intersection