Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: Are two expressions equal?
Replies: 1   Last Post: Oct 25, 1996 10:37 PM

 Messages: [ Previous | Next ]
 Jeremy Gorman Posts: 2 Registered: 12/7/04
Are two expressions equal?
Posted: Oct 23, 1996 1:32 AM

Hello Folks,

How can I check to see if these expressions are equal?
----------------------------
In[25]:=
q1 == q2
Out[25]=
phi psi theta phi psi theta
x (-2 Cos[--- + ---] Cos[-----] Sin[--- - ---] Sin[-----] +
2 2 2 2 2 2

phi psi theta phi psi theta
2 Cos[--- - ---] Cos[-----] Sin[--- + ---] Sin[-----]) +
2 2 2 2 2 2

phi psi phi psi theta theta
y (-2 Cos[--- - ---] Cos[--- + ---] Cos[-----] Sin[-----] -
2 2 2 2 2 2

theta phi psi phi psi theta
2 Cos[-----] Sin[--- - ---] Sin[--- + ---] Sin[-----]) +
2 2 2 2 2 2

phi psi 2 theta 2 theta 2 phi psi 2
z (Cos[--- + ---] Cos[-----] + Cos[-----] Sin[--- + ---] +
2 2 2 2 2 2

phi psi 2 theta 2 phi psi 2 theta 2
Cos[--- - ---] Sin[-----] + Sin[--- - ---] Sin[-----] ) ==
2 2 2 2 2 2

z Cos[psi] Cos[theta] + y (-(Sin[phi] Sin[psi]) +

Cos[phi] Cos[psi] Sin[theta]) +

x (Cos[phi] Sin[psi] + Cos[psi] Sin[phi] Sin[theta])
-------------------------------
I've tried
Expand[q1]==Expand[q2]
but Mma 2.2.2 still returns an expresion with == in it.
I could go through comparing subexpressions, but there are a few
more of these which I'd like to compare, and I'm hoping for a
more general approach.

Jeremy

/*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/
Jeremy Gorman "Just a Comment"
Most of my opinions are my own (especially if expressed here) !
/*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/ /*\ \*/

Date Subject Author
10/23/96 Jeremy Gorman
10/25/96 Paul A. Rubin