From e45d789d67d3c4f38c84c7fde65836452e0794af Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Mon, 29 Aug 2011 19:01:54 -0400 Subject: [PATCH] Increase theta by an order of magnitude, fixing one particularly bad case. --- src/Comparisons.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Comparisons.hs b/src/Comparisons.hs index 4a81444..d033159 100644 --- a/src/Comparisons.hs +++ b/src/Comparisons.hs @@ -10,7 +10,7 @@ epsilon = 0.0001 -- | A tiny margin of error. theta :: Double -theta = 0.00000000000001 +theta = 0.0000000000001 -- | x almost equals y if x is within 'theta' of y. nearly_equals :: Double -> Double -> Bool -- 2.43.2