summaryrefslogtreecommitdiff
path: root/packages/base/src
diff options
context:
space:
mode:
Diffstat (limited to 'packages/base/src')
-rw-r--r--packages/base/src/Internal/Sparse.hs (renamed from packages/base/src/Numeric/Sparse.hs)11
1 files changed, 8 insertions, 3 deletions
diff --git a/packages/base/src/Numeric/Sparse.hs b/packages/base/src/Internal/Sparse.hs
index d856287..930bc99 100644
--- a/packages/base/src/Numeric/Sparse.hs
+++ b/packages/base/src/Internal/Sparse.hs
@@ -2,7 +2,7 @@
2{-# LANGUAGE MultiParamTypeClasses #-} 2{-# LANGUAGE MultiParamTypeClasses #-}
3{-# LANGUAGE FlexibleInstances #-} 3{-# LANGUAGE FlexibleInstances #-}
4 4
5module Numeric.Sparse( 5module Internal.Sparse(
6 GMatrix(..), CSR(..), mkCSR, fromCSR, 6 GMatrix(..), CSR(..), mkCSR, fromCSR,
7 mkSparse, mkDiagR, mkDense, 7 mkSparse, mkDiagR, mkDense,
8 AssocMatrix, 8 AssocMatrix,
@@ -10,15 +10,20 @@ module Numeric.Sparse(
10 gmXv, (!#>) 10 gmXv, (!#>)
11)where 11)where
12 12
13import Data.Packed.Numeric 13import Internal.Vector
14import Internal.Matrix
15import Internal.Numeric
16import Internal.Container
17import Internal.Tools
14import qualified Data.Vector.Storable as V 18import qualified Data.Vector.Storable as V
19import Data.Vector.Storable(fromList)
15import Data.Function(on) 20import Data.Function(on)
16import Control.Arrow((***)) 21import Control.Arrow((***))
17import Control.Monad(when) 22import Control.Monad(when)
18import Data.List(groupBy, sort) 23import Data.List(groupBy, sort)
19import Foreign.C.Types(CInt(..)) 24import Foreign.C.Types(CInt(..))
20 25
21import Data.Packed.Development 26import Internal.Devel
22import System.IO.Unsafe(unsafePerformIO) 27import System.IO.Unsafe(unsafePerformIO)
23import Foreign(Ptr) 28import Foreign(Ptr)
24import Text.Printf(printf) 29import Text.Printf(printf)