lapack 0.2.2 → 0.2.3
raw patch · 2 files changed
+12/−14 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Numeric.LAPACK.Matrix: toColumns :: (C vert, C horiz, C height, Indexed width, Floating a) => Full vert horiz height width a -> [Vector height a]
+ Numeric.LAPACK.Matrix: toColumns :: (C vert, C horiz, C height, C width, Floating a) => Full vert horiz height width a -> [Vector height a]
- Numeric.LAPACK.Matrix: toRows :: (C vert, C horiz, Indexed height, C width, Floating a) => Full vert horiz height width a -> [Vector width a]
+ Numeric.LAPACK.Matrix: toRows :: (C vert, C horiz, C height, C width, Floating a) => Full vert horiz height width a -> [Vector width a]
Files
- lapack.cabal +2/−2
- src/Numeric/LAPACK/Matrix.hs +10/−12
lapack.cabal view
@@ -1,5 +1,5 @@ Name: lapack-Version: 0.2.2+Version: 0.2.3 License: BSD3 License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de>@@ -45,7 +45,7 @@ default: False Source-Repository this- Tag: 0.2.2+ Tag: 0.2.3 Type: darcs Location: http://hub.darcs.net/thielema/lapack/
src/Numeric/LAPACK/Matrix.hs view
@@ -255,33 +255,31 @@ toRows :: (Extent.C vert, Extent.C horiz,- Shape.Indexed height, Shape.C width, Class.Floating a) =>+ Shape.C height, Shape.C width, Class.Floating a) => Full vert horiz height width a -> [Vector width a]-toRows a = map (takeRow a) $ Shape.indices $ Matrix.height a+toRows a =+ let ad = Basic.mapHeight Shape.Deferred $ fromFull a+ in map (takeRow ad) $ Shape.indices $ Matrix.height ad toColumns :: (Extent.C vert, Extent.C horiz,- Shape.C height, Shape.Indexed width, Class.Floating a) =>+ Shape.C height, Shape.C width, Class.Floating a) => Full vert horiz height width a -> [Vector height a]-toColumns a = map (takeColumn a) $ Shape.indices $ Matrix.width a+toColumns a =+ let ad = Basic.mapWidth Shape.Deferred $ fromFull a+ in map (takeColumn ad) $ Shape.indices $ Matrix.width ad toRowArray :: (Extent.C vert, Extent.C horiz, Shape.C height, Shape.C width, Class.Floating a) => Full vert horiz height width a -> BoxedArray.Array height (Vector width a)-toRowArray a =- let ad = Basic.mapHeight Shape.Deferred $ fromFull a- in BoxedArray.fromList (Matrix.height a) $- map (takeRow ad) $ Shape.indices (Matrix.height ad)+toRowArray a = BoxedArray.fromList (Matrix.height a) (toRows a) toColumnArray :: (Extent.C vert, Extent.C horiz, Shape.C height, Shape.C width, Class.Floating a) => Full vert horiz height width a -> BoxedArray.Array width (Vector height a)-toColumnArray a =- let ad = Basic.mapWidth Shape.Deferred $ fromFull a- in BoxedArray.fromList (Matrix.width a) $- map (takeColumn ad) $ Shape.indices (Matrix.width ad)+toColumnArray a = BoxedArray.fromList (Matrix.width a) (toColumns a) takeRow ::