where
-- | epsilon is the value that will be used in all tests that require
--- some measure of "closeness." Increasing it will make those tests
--- more tolerant.
+-- some measure of \"closeness.\" Increasing it will make those
+-- tests more tolerant.
epsilon :: Double
epsilon = 0.0001