MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Combine sqrts in denominator

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122421] Re: Combine sqrts in denominator
  • From: Ray Koopman <koopman at sfu.ca>
  • Date: Fri, 28 Oct 2011 05:34:05 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j8bcf3$8s3$1@smc.vnet.net>

On Oct 27, 3:40 am, Tom D <tomdick... at att.net> wrote:
> I'm doing a calculation that results in terms of the form
>
> 1/ Sqrt[ -h + Sqrt[h^2 + r^2]] * 1/Sqrt[h + Sqrt[h^2 + r^2]] * (other
> functions)
>
> One sees that this simplifies to (other functions)/r.
>
> It would helpful to make Mathematica perform this simplification, but
> I have not been able to get Simplify[] or FullSimplify[] or anything
> else to do it.
>
> How would I be able to do this?
>
> Thanks,
> Tom

In[1]:= f = 1/Sqrt[-h + Sqrt[h^2 + r^2]] *
            1/Sqrt[ h + Sqrt[h^2 + r^2]];

In[2]:= Assuming[{h,r} \[Element] Reals, FullSimplify[f]]

Out[2]= 1/Abs[r]



  • Prev by Date: Problem with Solve and NSolve
  • Next by Date: Re: Combine sqrts in denominator
  • Previous by thread: Re: Combine sqrts in denominator
  • Next by thread: Re: Combine sqrts in denominator