Double Equals

Sure it does

MaxUIPS is … well … document weird to say the least

Dim d As Double

d = 0 // where d = 0.000000000000001


If d.Equals(0.0, 1) Then // x is MaxUIps from the docs
  // d is zero.
  Break
End If

Break

this usage would permit .000000000000001 to .000000000000006 to be considered “equal”

maxUIPS is the amoubt between the last digits

Dim d As Double

d = 0.000000000000001


If d.Equals(0.000000000000003, 1) Then // x is MaxUIps from the docs
  // d is zero.
  Break
End If

Break

since I set the “equals” call to permit a range of 0.000000000000001 to 0.000000000000002 (1 difference of 1 in the right most digit) is restricts equalness to a tiny range