From 197e88c3b56d28840217010a2871c6ea3a4dd1a4 Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Wed, 21 May 2014 10:30:55 +0200 Subject: update dependencies, move examples etc --- packages/tests/src/Numeric/LinearAlgebra/Tests.hs | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'packages/tests/src/Numeric/LinearAlgebra/Tests.hs') diff --git a/packages/tests/src/Numeric/LinearAlgebra/Tests.hs b/packages/tests/src/Numeric/LinearAlgebra/Tests.hs index b5e7c72..e4f0846 100644 --- a/packages/tests/src/Numeric/LinearAlgebra/Tests.hs +++ b/packages/tests/src/Numeric/LinearAlgebra/Tests.hs @@ -26,6 +26,7 @@ module Numeric.LinearAlgebra.Tests( --import Data.Packed.Random import Numeric.LinearAlgebra +import Numeric.Container import Numeric.LinearAlgebra.LAPACK import Numeric.LinearAlgebra.Tests.Instances import Numeric.LinearAlgebra.Tests.Properties @@ -66,6 +67,11 @@ a ~~ b = fromList a |~| fromList b feye n = flipud (ident n) :: Matrix Double +eps = peps :: Double + +i = 0 :+ 1 :: Complex Double + + ----------------------------------------------------------- detTest1 = det m == 26 @@ -427,8 +433,6 @@ conformTest = utest "conform" ok ,26,28,30 ,39,41,43 ,52,54,56] - row = asRow . fromList - col = asColumn . fromList :: [Double] -> Matrix Double --------------------------------------------------------------------- -- cgit v1.2.3