diff options
Diffstat (limited to 'lib/Numeric/LinearAlgebra/Instances.hs')
-rw-r--r-- | lib/Numeric/LinearAlgebra/Instances.hs | 12 |
1 files changed, 6 insertions, 6 deletions
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) | |||
27 | import Foreign(Storable) | 27 | import Foreign(Storable) |
28 | import Data.Monoid | 28 | import Data.Monoid |
29 | import Data.Packed.Internal.Vector | 29 | import Data.Packed.Internal.Vector |
30 | import 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 | ||
202 | instance (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 | -- | |
205 | instance (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 |