diff options
| author | Alberto Ruiz <aruiz@um.es> | 2010-09-26 17:05:09 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2010-09-26 17:05:09 +0000 |
| commit | 611ff4782c261a6c6e52fe7ed0c122a0eac22691 (patch) | |
| tree | 5b9362a88a568cbb4e8ad442365e26bdef17946d /lib/Numeric/LinearAlgebra | |
| parent | 632c2c5a8b934fd8b54c8be68d178aa49323077d (diff) | |
fix imports, examples
Diffstat (limited to 'lib/Numeric/LinearAlgebra')
| -rw-r--r-- | lib/Numeric/LinearAlgebra/Tests.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Numeric/LinearAlgebra/Tests.hs b/lib/Numeric/LinearAlgebra/Tests.hs index a44c273..630ba91 100644 --- a/lib/Numeric/LinearAlgebra/Tests.hs +++ b/lib/Numeric/LinearAlgebra/Tests.hs | |||
| @@ -300,8 +300,8 @@ conjuTest m = mapVector conjugate (flatten (trans m)) == flatten (ctrans m) | |||
| 300 | 300 | ||
| 301 | --------------------------------------------------------------------- | 301 | --------------------------------------------------------------------- |
| 302 | 302 | ||
| 303 | succTest = utest "successive" $ successive_ (<) (fromList [1 :: Double,2,3,4]) == True | 303 | succTest = utest "successive" $ successive_ (>) (fromList [1 :: Double,2,3,4]) == True |
| 304 | && successive_ (<) (fromList [1 :: Double,3,2,4]) == False | 304 | && successive_ (<) (fromList [1 :: Double,3,2,4]) == False |
| 305 | 305 | ||
| 306 | --------------------------------------------------------------------- | 306 | --------------------------------------------------------------------- |
| 307 | 307 | ||