TheBackShed.com

Home	JAQForum Ver 24.01
Log In or Join
Active Topics
Local Time 08:49 12 Jul 2025	Privacy Policy
Jump to

Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.

Forum Index : Microcontroller and PC projects : MMX - machine epsilon

Author

Message

cdeagle
Senior Member

Joined: 22/06/2014
Location: United States
Posts: 265

Posted: 01:52am 12 Apr 2017

Copy link to clipboard

Print this post

Here's a short program that computes the machine epsilon of the MicroMite eXtreme.

' epsmach.bas

' machine epsilon

'''''''''''''''''

one = 1.0

two = 2.0

u =1.0

do

u = u / two

if ((one + u) = one) then exit do

loop

epsmach = two * u

print " "
print "eps = ", epsmach
print " "

end

The value for the eXtreme is 2.22045e-16

Print this page

To reply to this topic, you need to log in.