diff options
Diffstat (limited to 'packages/base/src/Internal/Modular.hs')
-rw-r--r-- | packages/base/src/Internal/Modular.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/packages/base/src/Internal/Modular.hs b/packages/base/src/Internal/Modular.hs index 0d906bb..6c6d5c5 100644 --- a/packages/base/src/Internal/Modular.hs +++ b/packages/base/src/Internal/Modular.hs | |||
@@ -400,9 +400,9 @@ test = (ok, info) | |||
400 | , am <> gaussElim_2 am bm == bm | 400 | , am <> gaussElim_2 am bm == bm |
401 | , am <> gaussElim am bm == bm | 401 | , am <> gaussElim am bm == bm |
402 | , (checkGen (gen 5 :: Matrix R)) < 1E-15 | 402 | , (checkGen (gen 5 :: Matrix R)) < 1E-15 |
403 | , (checkGen (gen 5 :: Matrix Float)) < 1E-7 | 403 | , (checkGen (gen 5 :: Matrix Float)) < 2E-7 |
404 | , (checkGen (gen 5 :: Matrix C)) < 1E-15 | 404 | , (checkGen (gen 5 :: Matrix C)) < 1E-15 |
405 | , (checkGen (gen 5 :: Matrix (Complex Float))) < 1E-7 | 405 | , (checkGen (gen 5 :: Matrix (Complex Float))) < 2E-7 |
406 | , (checkGen (gen 5 :: Matrix (Mod 7 I))) == 0 | 406 | , (checkGen (gen 5 :: Matrix (Mod 7 I))) == 0 |
407 | , (checkGen (gen 5 :: Matrix (Mod 7 Z))) == 0 | 407 | , (checkGen (gen 5 :: Matrix (Mod 7 Z))) == 0 |
408 | , (checkLU (magnit 1E-10) (gen 5 :: Matrix R)) < 1E-15 | 408 | , (checkLU (magnit 1E-10) (gen 5 :: Matrix R)) < 1E-15 |