X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FComparisons.hs;h=d033159f23f827fa3776ca2c6dd2ac775780af91;hb=2f1d864660ff740773ea2c36ab79a837000f6452;hp=4a8144469415668327567717239844a4b1c85a22;hpb=d1ee387490ef0ada8781f4bf81f82cce7f0006ba;p=spline3.git 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