Suppose I want to calculate:
Cross[A1 + B1, A2 - B2] + Cross[A1 - B1, A2 + B2]
which is equal to
2 A1xA2 - 2 B1xB2
FullSimpify won't do it. I can use
Distribute[Cross[A1 + B1, A2 - B2]] + Distribute[Cross[A1 - B1, A2 + B2]] (* which gives: 2 A1xA2 + A1x(-B2) + A1xB2 + (-B1)xA2 + (-B1)xB2 + B1xA2 + B1x(-B2) *)
Close but it still keeps the
- into parentheses, keeping terms that cancel each other.
How can I overcome this?