Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Explain floating point arithmetic result

by starbolin (Hermit)
on Jun 04, 2008 at 20:07 UTC ( #690234=note: print w/replies, xml ) Need Help??


in reply to Explain floating point arithmetic result

Do you mean:

perl -e 'print 5.1 + 100005.2 - 100005.2' 5.09999999997672?
Note that this does what you expect:
perl -e 'print 5.1 + ( 100005.2 -100005.2 )' [12:36pm] 5.1
To summarize, the bible , most rational numbers are not representable exactly by binary numbers. When the larger constant 100005.2 is added to the smaller constant 5.1 the representational errors in the larger constant can swamp out the smaller constant.

Re-arranging terms as I did in the second example can help. A more universal method is to insure that all constants have exact representations base 2. i.e.

%perl -e ' printf "%f %f \n", 0x186A5, ( 5.1 + 0x186A5 ) - 0x186A5' 100005.000000 5.100000


s//----->\t/;$~="JAPH";s//\r<$~~/;{s|~$~-|-~$~|||s |-$~~|$~~-|||s,<$~~,<~$~,,s,~$~>,$~~>,, $|=1,select$,,$,,$,,1e-1;print;redo}

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://690234]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2022-09-30 21:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I prefer my indexes to start at:




    Results (126 votes). Check out past polls.

    Notices?