diff options
Diffstat (limited to 'packages')
-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 | ||
5 | module Numeric.Sparse( | 5 | module 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 | ||
13 | import Data.Packed.Numeric | 13 | import Internal.Vector |
14 | import Internal.Matrix | ||
15 | import Internal.Numeric | ||
16 | import Internal.Container | ||
17 | import Internal.Tools | ||
14 | import qualified Data.Vector.Storable as V | 18 | import qualified Data.Vector.Storable as V |
19 | import Data.Vector.Storable(fromList) | ||
15 | import Data.Function(on) | 20 | import Data.Function(on) |
16 | import Control.Arrow((***)) | 21 | import Control.Arrow((***)) |
17 | import Control.Monad(when) | 22 | import Control.Monad(when) |
18 | import Data.List(groupBy, sort) | 23 | import Data.List(groupBy, sort) |
19 | import Foreign.C.Types(CInt(..)) | 24 | import Foreign.C.Types(CInt(..)) |
20 | 25 | ||
21 | import Data.Packed.Development | 26 | import Internal.Devel |
22 | import System.IO.Unsafe(unsafePerformIO) | 27 | import System.IO.Unsafe(unsafePerformIO) |
23 | import Foreign(Ptr) | 28 | import Foreign(Ptr) |
24 | import Text.Printf(printf) | 29 | import Text.Printf(printf) |