Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Serious Bug in Mathematica 7 and 8.0.4.0 (latest version)

• To: mathgroup at smc.vnet.net
• Subject: [mg126192] Re: Serious Bug in Mathematica 7 and 8.0.4.0 (latest version)
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Tue, 24 Apr 2012 05:33:14 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <201204230941.FAA16597@smc.vnet.net>

If you want Mathematica to use more than machine precision tell it so.

Precision[6371.01]

MachinePrecision

Precision[6371.01`20]

20.

b = 6371.01`20

6371.0100000000000000

SetPrecision[a = b, 20]

6371.0100000000000000

http : // reference.wolfram.com/mathematica/tutorial/NumericalPrecision.html


Bob Hanlon


On Mon, Apr 23, 2012 at 5:41 AM, Alexander Mayer <amayer at alum.mit.edu> wrote:
> In[1]:= (* This notebook produced by Mathematica 8.0.4.0 *)
> (* Platform: OSX 10.6.8 on MacBook Pro *)
>
> In[1]:= b = 6371.01 (* We set the value of b to this real number. *)
>
> Out[1]= 6371.01
>
> In[2]:= SetPrecision[a = b, 20] (* We test the actual value of b. *)
>
> Out[2]= 6371.0100000000002183
>
> In[3]:= (* Mathematica has added a small constant! *)
>
> In[4]:= (* Adding zeros to the 16th place fixes the problem. *)
>
> In[5]:= c = 6371.0100000000000000
>
> Out[5]= 6371.0100000000000000
>
> In[6]:= SetPrecision[a = c, 20]
>
> Out[6]= 6371.0100000000000000
>

• References:
  • Serious Bug in Mathematica 7 and 8.0.4.0 (latest version)
    • From: Alexander Mayer <amayer@alum.mit.edu>