[Date Index]
[Thread Index]
[Author Index]
Re: Problem with Limit
*To*: mathgroup at smc.vnet.net
*Subject*: [mg66832] Re: Problem with Limit
*From*: "David W.Cantrell" <DWCantrell at sigmaxi.org>
*Date*: Thu, 1 Jun 2006 06:54:23 -0400 (EDT)
*References*: <e5jri2$dos$1@smc.vnet.net>
*Sender*: owner-wri-mathgroup at wolfram.com
"Tony Harker" <a.harker at ucl.ac.uk> wrote:
> Can anybody explain why, for
>
> t =Sqrt[(k*m1 + k*m2 + m1*g + m2*g -
> (1/2)*Sqrt[4*(m1 + m2)^2*(k + g)^2 - 16*k*m1*m2*(k + 2*g)])/
> (m1*m2)]/(1 + (k*m1 - k*m2 + m1*g - m2*g +
> (1/2)*Sqrt[4*(m1 + m2)^2*(k + g)^2 - 16*k*m1*m2*(k + 2*g)])^2/
> (4*m1*m2*g^2)) + Sqrt[(k*m1 + k*m2 + m1*g + m2*g +
> (1/2)*Sqrt[4*(m1 + m2)^2*(k + g)^2 - 16*k*m1*m2*(k + 2*g)])/
> (m1*m2)]/(1 + ((-k)*m1 + k*m2 - m1*g + m2*g +
> (1/2)*Sqrt[4*(m1 + m2)^2*(k + g)^2 - 16*k*m1*m2*(k + 2*g)])^2/
> (4*m1*m2*g^2));
>
> Limit[t, g -> 0]
> Limit[Together[t], g -> 0]
>
> both give zero, whereas
>
> Limit[Simplify[Together[t]], g -> 0]
>
> gives a non-zero result? This is with Mathe4matica 5.2.
Interesting question.
I haven't looked at it carefully enough to be able to explain why. But,
FWIW, I certainly think the nonzero result is the correct one. With
the assumptions that m1 and m2 are real and that k > 0, that simplifies
to
Sqrt[2*k/m2]
At first, that surprised me because I had thought, based on just a quick
glance, that t was symmetric wrt m1 and m2. But it's not, I see now.
David
Prev by Date:
**Re: Problem with Limit**
Next by Date:
**Re: How to get the maximums of a curve**
Previous by thread:
**Re: Problem with Limit**
Next by thread:
**Re: Problem with Limit**
| |