diff options
| author | Alberto Ruiz <aruiz@um.es> | 2010-09-13 18:21:15 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2010-09-13 18:21:15 +0000 |
| commit | 9d54e7b9543c22d398ef5097e3ba619ca974820b (patch) | |
| tree | a71b00a450eb22224b389ad501806b92a6a09864 /lib/Numeric/LinearAlgebra/Tests.hs | |
| parent | 5323b5f9c5da53ab413202141667142e646897d4 (diff) | |
remove ComplexContainer
Diffstat (limited to 'lib/Numeric/LinearAlgebra/Tests.hs')
| -rw-r--r-- | lib/Numeric/LinearAlgebra/Tests.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Numeric/LinearAlgebra/Tests.hs b/lib/Numeric/LinearAlgebra/Tests.hs index aa7b01c..0df29a8 100644 --- a/lib/Numeric/LinearAlgebra/Tests.hs +++ b/lib/Numeric/LinearAlgebra/Tests.hs | |||
| @@ -453,7 +453,7 @@ runTests n = do | |||
| 453 | , utest "randomGaussian" randomTestGaussian | 453 | , utest "randomGaussian" randomTestGaussian |
| 454 | , utest "randomUniform" randomTestUniform | 454 | , utest "randomUniform" randomTestUniform |
| 455 | , utest "buildVector/Matrix" $ | 455 | , utest "buildVector/Matrix" $ |
| 456 | comp (10 |> [0::Double ..]) == buildVector 10 fromIntegral | 456 | complex (10 |> [0::Double ..]) == buildVector 10 fromIntegral |
| 457 | && ident 5 == buildMatrix 5 5 (\(r,c) -> if r==c then 1::Double else 0) | 457 | && ident 5 == buildMatrix 5 5 (\(r,c) -> if r==c then 1::Double else 0) |
| 458 | , utest "rank" $ rank ((2><3)[1,0,0,1,6*eps,0]) == 1 | 458 | , utest "rank" $ rank ((2><3)[1,0,0,1,6*eps,0]) == 1 |
| 459 | && rank ((2><3)[1,0,0,1,7*eps,0]) == 2 | 459 | && rank ((2><3)[1,0,0,1,7*eps,0]) == 2 |