]> gitweb.michael.orlitzky.com - spline3.git/blobdiff - src/Comparisons.hs
Clean up the imports/exports between MRI and Main.
[spline3.git] / src / Comparisons.hs
index 4a8144469415668327567717239844a4b1c85a22..3bf4e246bcfba473634b255fb1befb8187a84b8f 100644 (file)
@@ -1,5 +1,14 @@
 -- | Functions for comparing 'Double' values.
-module Comparisons
+module Comparisons (
+  (~=),
+  (~~=),
+  almost_equals,
+  kinda_equals,
+  nearly_equals,
+  nearly_ge,
+  non_very_positive_entries,
+  very_positive,
+  )
 where
 
 -- | epsilon is the value that will be used in all tests that require
@@ -10,7 +19,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