Re: Combine sqrts in denominator

*To*: mathgroup at smc.vnet.net*Subject*: [mg122427] Re: Combine sqrts in denominator*From*: "Dr. Wolfgang Hintze" <weh at snafu.de>*Date*: Fri, 28 Oct 2011 05:35:10 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <j8bcf3$8s3$1@smc.vnet.net>

In[259]:= Simplify[(1/Sqrt[-h + Sqrt[h^2 + r^2]])* (1/Sqrt[h + Sqrt[h^2 + r^2]]), h \[Element] Reals] Out[259]= 1 --- Wolfgang "Tom D" <tomdickens at att.net> schrieb im Newsbeitrag news:j8bcf3$8s3$1 at smc.vnet.net... > 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 >