diff options
author | Vivian McPhail <haskell.vivian.mcphail@gmail.com> | 2010-09-20 03:48:46 +0000 |
---|---|---|
committer | Vivian McPhail <haskell.vivian.mcphail@gmail.com> | 2010-09-20 03:48:46 +0000 |
commit | 482b533c3fbfcd75d6c5c1d3ce32585bf9fc2ad7 (patch) | |
tree | 82f284eeb1cf03fd4514960b848d38e5af94e709 /lib/Data/Packed/Internal/Matrix.hs | |
parent | 503f598801b67886028d9ffdfdef38813954e46f (diff) |
remove Fractional from Element
Diffstat (limited to 'lib/Data/Packed/Internal/Matrix.hs')
-rw-r--r-- | lib/Data/Packed/Internal/Matrix.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Data/Packed/Internal/Matrix.hs b/lib/Data/Packed/Internal/Matrix.hs index 090826d..c0824a3 100644 --- a/lib/Data/Packed/Internal/Matrix.hs +++ b/lib/Data/Packed/Internal/Matrix.hs | |||
@@ -246,7 +246,8 @@ compat m1 m2 = rows m1 == rows m2 && cols m1 == cols m2 | |||
246 | ------------------------------------------------------------------ | 246 | ------------------------------------------------------------------ |
247 | 247 | ||
248 | -- | Supported element types for basic matrix operations. | 248 | -- | Supported element types for basic matrix operations. |
249 | class (Storable a, Floating a) => Element a where | 249 | --class (Storable a, Floating a) => Element a where |
250 | class (Storable a) => Element a where | ||
250 | subMatrixD :: (Int,Int) -- ^ (r0,c0) starting position | 251 | subMatrixD :: (Int,Int) -- ^ (r0,c0) starting position |
251 | -> (Int,Int) -- ^ (rt,ct) dimensions of submatrix | 252 | -> (Int,Int) -- ^ (rt,ct) dimensions of submatrix |
252 | -> Matrix a -> Matrix a | 253 | -> Matrix a -> Matrix a |