Eliminate Cross-Term by Change in Variables

elimxy3.html

Exploration

Show that applying the change in variables x'=k x+y and y'=k y-x, where

,

to the equation is equivalent to rotating the quadratic by an angle θ given by

and scaling the quadratic by a scale factor

.

Approach

Create a quadratic and rotate and scale it as specified. Compare the result to the result of elimxy2.html.

Initialize

To initialize Descarta2D, select the input cell bracket and press SHIFT-Enter.

This initialization assumes that the Descarta2D software has been copied into one of the standard directories for AddOns which are on the Mathematica search path, $Path.

<<Descarta2D`

Solution

Create a quadratic.

Clear[a,b,c,d,e,f];
Q1=Quadratic2D[a,b,c,d,e,f];

Rotate it by the specified angle.

Clear[k];
Q2=Rotate2D[Q1,ArcTan[1/k]] //Simplify

As shown in elimxy2.html, the x y term must vanish.

Q2[[2]]=0;Q2

Scale as specified.

Q3=Scale2D[Q2,1/Sqrt[1+k^2]] //Simplify

Simplify, showing the same result as elimxy2.html.

Q4=Q3 /. {Sqrt[1+k^(-2)]*k->Sqrt[1+k^2]} //Simplify