Re: solving for 2 angles
- To: mathgroup at smc.vnet.net
- Subject: [mg89817] Re: solving for 2 angles
- From: Steven Siew <stevensiew2 at gmail.com>
- Date: Sat, 21 Jun 2008 05:31:40 -0400 (EDT)
- References: <g3g00h$kvd$1@smc.vnet.net>
I dont know what you are trying to find but you should first get rid
of Sin and Cosine
by turning them into exponential functions.
eqn01 = J*Cos[az]*Sin[el] + K*Sin[az]*Sin[el] + L*Cos[el] == 0
eqn02 = M*Cos[az]*Sin[el] + N*Sin[az]*Sin[el] + P*Cos[el] == 0
eqn03 = TrigToExp[eqn01]
eqn04 = TrigToExp[eqn02]
soln01 = Solve[eqn03, el]
eqn05 = eqn04 /. soln01
finalsolution=Solve[eqn05, az]
It's much better if you put in all your assumptions at the very start
with the form
$Assumptions = And @@ {x > 0, y > 0, z > 0}
Steven Siew