waterfall-cad-0.6.3.0: src/Waterfall/Internal/NearZero.hs

module Waterfall.Internal.NearZero 
( confusion
, nearZero
) where

confusion :: Double
confusion = 1e-7

nearZero :: Double -> Bool
nearZero = (<= confusion) . abs