diff options
| author | Alberto Ruiz <aruiz@um.es> | 2007-09-14 11:06:57 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2007-09-14 11:06:57 +0000 |
| commit | 9e2f7fb0ca902665b430a96f77959522976a97f9 (patch) | |
| tree | c2f258fe28df79a645f3908655b46fbaf89ecf16 /lib/Data/Packed/Internal/Matrix.hs | |
| parent | 620d5008ea9a931a91907cd0c902bb64f005121f (diff) | |
code refactoring
Diffstat (limited to 'lib/Data/Packed/Internal/Matrix.hs')
| -rw-r--r-- | lib/Data/Packed/Internal/Matrix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Data/Packed/Internal/Matrix.hs b/lib/Data/Packed/Internal/Matrix.hs index f9dd9a9..89a162a 100644 --- a/lib/Data/Packed/Internal/Matrix.hs +++ b/lib/Data/Packed/Internal/Matrix.hs | |||
| @@ -171,7 +171,7 @@ compat m1 m2 = rows m1 == rows m2 && cols m1 == cols m2 | |||
| 171 | ---------------------------------------------------------------- | 171 | ---------------------------------------------------------------- |
| 172 | 172 | ||
| 173 | -- | Optimized matrix computations are provided for elements in the Field class. | 173 | -- | Optimized matrix computations are provided for elements in the Field class. |
| 174 | class Storable a => Field a where | 174 | class (Storable a, Num a) => Field a where |
| 175 | constantD :: a -> Int -> Vector a | 175 | constantD :: a -> Int -> Vector a |
| 176 | transdata :: Int -> Vector a -> Int -> Vector a | 176 | transdata :: Int -> Vector a -> Int -> Vector a |
| 177 | multiplyD :: Matrix a -> Matrix a -> Matrix a | 177 | multiplyD :: Matrix a -> Matrix a -> Matrix a |