5
$\begingroup$

The expression $\tan ^{-1}\left(\frac{\sqrt{L^2 \sin ^2(\theta )}}{\sqrt{L^2 \cos ^2(\theta )}}\right)$ can be simplified to $\theta$.

After some attempts I got the following to do the job.

ArcTan[Sqrt[L^2 Cos[θ]^2], Sqrt[L^2 Sin[θ]^2]] // 
PowerExpand // TrigToExp // Simplify // PowerExpand

It appears rather clunky to me. Is there a better way to simplify this expression.

$\endgroup$
11
  • 1
    $\begingroup$ Please see meta.mathematica.stackexchange.com/a/1044/1356 for formatting questions with greek letters easily. $\endgroup$
    – Öskå
    Jul 15, 2013 at 15:46
  • $\begingroup$ Öskå, thanks for pointing that out. I had wondered how that was done. $\endgroup$ Jul 15, 2013 at 15:49
  • $\begingroup$ I don't think mathematically it is true that the argument of ArcTan can be simplified to theta...what if theta=3Pi/4? $\endgroup$
    – Leo Fang
    Jul 15, 2013 at 15:50
  • $\begingroup$ @Leo Fang, doesn't $n/n$ simplify to 1, even though it would be problematic if $n=0$. (Although I fail to see any thing problematic with the ArcTan expression when $\theta =\frac{3 \pi }{4}$). $\endgroup$ Jul 15, 2013 at 16:00
  • 5
    $\begingroup$ @SubaThomas, I think I am not missing the point. The point you had such a clunky expression is that you missed the fact sin(θ) may give a minus sign, and that's why you had to use PowerExpand to simplify it (PowerExpand assumes everything is real and positive, so the problem here is avoided). For a cleaner way see my comment above using Assumptions . $\endgroup$
    – Leo Fang
    Jul 15, 2013 at 16:48

1 Answer 1

6
$\begingroup$

the most you can generally simplify is:

Simplify[ArcTan[ Sqrt[ L^2 Sin[t]^2]/Sqrt[ L^2 Cos[t]^2]], 
    Assumptions -> {L > 0, Element[t, Reals]}]

(* ArcTan[Sqrt[1/Cot[t]^2]] *)

your original statement is true only on 0-Pi/2

Simplify[ArcTan[ Sqrt[ L^2 Sin[t]^2]/Sqrt[ L^2 Cos[t]^2]], 
   Assumptions -> {L > 0, 0 < t < Pi/2}]

(* t *)

now a fair question, why doesnt Simplyfy return -t here.. ?

 Simplify[ArcTan[ Sqrt[ L^2 Sin[t]^2]/Sqrt[ L^2 Cos[t]^2]], 
    Assumptions -> {L > 0, -Pi/2 < t < 0}] 

or better we'd like to see Abs[t] for -Pi/2 < t < Pi/2

$\endgroup$
2
  • $\begingroup$ Yeah this is a interesting question...In fact Simplify[Sqrt[ L^2 Sin[t]^2]/Sqrt[ L^2 Cos[t]^2], Assumptions -> {L > 0, -Pi/2 < t < 0}] is not really simplified either, so the question is irrelevant of ArcTan. $\endgroup$
    – Leo Fang
    Jul 15, 2013 at 21:24
  • $\begingroup$ Thanks for your response. My eventual solution was to reformulate the expression as $\sin ^{-1}(\sin (\theta ))$ and use PowerExpand. $\endgroup$ Jul 16, 2013 at 13:19

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Not the answer you're looking for? Browse other questions tagged or ask your own question.