Increase theta by an order of magnitude, fixing one particularly bad case.

diff --git a/src/Comparisons.hs b/src/Comparisons.hs
index 4a8144469415668327567717239844a4b1c85a22..d033159f23f827fa3776ca2c6dd2ac775780af91 100644 (file)
--- 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