Relax difference a little
commit2c7249cce9ad55e8a94e667e64fb76ede1da46a0
authorHuw Campbell <huw.campbell@ambiata.com>
dateTue 11 Jul 2017, 09:04 (9 years ago)
parent831fd86
test/Test/Grenade/Network.hs+1−1
@@ -376,7 +376,7 @@ maxVal ( S3D x ) = norm_Inf x
376376
377377(~~~) :: (Monad m, HasCallStack) => Double -> Double -> Test m ()
378378(~~~) x y =
379− if abs (x - y) < 1e-5 then
379+ if abs (x - y) < 2e-5 then
380380 success
381381 else
382382 withFrozenCallStack $