summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--hmatrix.cabal3
-rw-r--r--lib/Numeric/LinearAlgebra/Instances.hs12
2 files changed, 7 insertions, 8 deletions
diff --git a/hmatrix.cabal b/hmatrix.cabal
index 8d46944..778d113 100644
--- a/hmatrix.cabal
+++ b/hmatrix.cabal
@@ -71,8 +71,7 @@ library
71 Build-Depends: haskell98, 71 Build-Depends: haskell98,
72 QuickCheck, HUnit, 72 QuickCheck, HUnit,
73 storable-complex, 73 storable-complex,
74 process, 74 process
75 parallel >= 2
76 75
77 Extensions: ForeignFunctionInterface, 76 Extensions: ForeignFunctionInterface,
78 CPP 77 CPP
diff --git a/lib/Numeric/LinearAlgebra/Instances.hs b/lib/Numeric/LinearAlgebra/Instances.hs
index 3122a3d..04bbd68 100644
--- a/lib/Numeric/LinearAlgebra/Instances.hs
+++ b/lib/Numeric/LinearAlgebra/Instances.hs
@@ -27,7 +27,7 @@ import Data.List(transpose,intersperse)
27import Foreign(Storable) 27import Foreign(Storable)
28import Data.Monoid 28import Data.Monoid
29import Data.Packed.Internal.Vector 29import Data.Packed.Internal.Vector
30import Control.Parallel.Strategies 30-- import Control.Parallel.Strategies
31 31
32------------------------------------------------------------------ 32------------------------------------------------------------------
33 33
@@ -199,8 +199,8 @@ instance (Storable a) => Monoid (Vector a) where
199 199
200--------------------------------------------------------------- 200---------------------------------------------------------------
201 201
202instance (NFData a, Storable a) => NFData (Vector a) where 202-- instance (NFData a, Storable a) => NFData (Vector a) where
203 rnf = rnf . (@>0) 203-- rnf = rnf . (@>0)
204 204--
205instance (NFData a, Element a) => NFData (Matrix a) where 205-- instance (NFData a, Element a) => NFData (Matrix a) where
206 rnf = rnf . flatten 206-- rnf = rnf . flatten