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

Re: question

• To: mathgroup at smc.vnet.net
• Subject: [mg77337] Re: [mg77275] question
• From: Bob Hanlon <hanlonr at cox.net>
• Date: Thu, 7 Jun 2007 03:41:01 -0400 (EDT)
• Reply-to: hanlonr at cox.net

Chop[N[o, 55], 10^-50]


Bob Hanlon

---- dimitris <dimmechan at yahoo.com> wrote: 
> In[61]:=
> o=(1/6)*(2*I*Sqrt[3]*EllipticF[Pi/3, 4/3] - 3*I*EllipticF[ArcSin[2/
> Sqrt[3]], 3/4] + 3*EllipticK[1/4])
> Out[61]=
> (1/6)*(2*I*Sqrt[3]*EllipticF[Pi/3, 4/3] - 3*I*EllipticF[ArcSin[2/
> Sqrt[3]], 3/4] + 3*EllipticK[1/4])
> 
> Above expression is equal to zero.
> 
> In[63]:=
> Developer`ZeroQ[o]
> Out[63]=
> True
> 
> Any ideas how we can use Mathematica
> in order to simplify o to zero?
> 
> Dimitris
> 
>