Approximate comparisons for IEEE floating point numbers in Haskell - View it on GitHub