MathGroup Archive 2007

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

Search the Archive

Re: Ellipse equation simplification on Mathematica:


On May 31, 12:19 pm, Andrzej Kozlowski <a... at mimuw.edu.pl> wrote:
> On 30 May 2007, at 18:29, Narasimham wrote:

> (-y^2)*(a - d)^2 + (a^2 - 2*d*a - c*(c + 2*cp*d))*(a - d)^2 +
> (-a^2 + 2*d*a + c^2 + (cp^2 - 1)*d^2 + 2*c*cp*d)*x^2

The above can be simplified, and they are shown capable of being cast
into canonical form of ellipses :

(x/aEff)^2 + y^2/(aEff^2 - cEff^2) = 1

For case x-axis parallel tube cp = 1, forming trapeziums at each
stage:

aEff = (a - d), cEff = (c + d).

For case x-axis perpendicular to tube cp = 0:

aEff = (a - d) V, cEff = c V

where V = Sqrt((a^2 -2 a d -c^2)/(a^2 -2 a d -c^2 + d^2) )

Narasimham



  • Prev by Date: Re: Re: Mathematica 6 & Wolfram Workbench
  • Next by Date: How to change symbolic values to numbers
  • Previous by thread: Re: Re: Mathematica 6 & Wolfram Workbench
  • Next by thread: Re: Re: Ellipse equation simplification on Mathematica: