Reduce an expression with Sqrt [closed]

r Cos[γ[t]] + 1/2 l Sqrt[1 – (r^2 Sin[γ[t]]^2)/l^2]

How can I ask Mathematica to write my expression without l^2 in the denominator such as:

r Cos[γ[t]] + 1/2*Sqrt[l^2 – r^2 Sin[γ[t]]^2]

Sorry, if my question is very simple, but I have been unable to work out an answer.

=================

=================

1 Answer
1

=================

r Cos[γ[t]] + 1/2 l Sqrt[1 – (r^2 Sin[γ[t]]^2)/l^2]
Simplify[%, Assumptions -> {l^2 > 0, l > 0}]

Or:

r Cos[γ[t]] + 1/2 l Sqrt[1 – (r^2 Sin[γ[t]]^2)/l^2]
Simplify[%, Assumptions -> {Re[l] > 0, Im[l] == 0}]

But I am sure this is discussed in Simplify help page.

EDIT

As @BobHanlon pointed out l>0 implies l^2>0, so one should write:

Simplify[%, Assumptions -> {l > 0}]

  

 

thank you for your help
– Bendesarts
Dec 28 ’15 at 13:21

1

 

@Bendesarts You are welcome, but you might also accept it 😉
– mattiav27
Dec 28 ’15 at 13:41