diff options
author | Alberto Ruiz <aruiz@um.es> | 2015-06-05 16:36:08 +0200 |
---|---|---|
committer | Alberto Ruiz <aruiz@um.es> | 2015-06-05 16:36:08 +0200 |
commit | 379f6a9855a36979c0670a3f89b6c7202836369c (patch) | |
tree | 0447a77cbc32fab7193b89f758e33ef4b7ed77c1 /packages | |
parent | 2876998f04380c9e835c6177b440447368dfe623 (diff) |
move cg
Diffstat (limited to 'packages')
-rw-r--r-- | packages/base/src/Internal/CG.hs (renamed from packages/base/src/Numeric/LinearAlgebra/Util/CG.hs) | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/packages/base/src/Numeric/LinearAlgebra/Util/CG.hs b/packages/base/src/Internal/CG.hs index 899a5bf..1193b18 100644 --- a/packages/base/src/Numeric/LinearAlgebra/Util/CG.hs +++ b/packages/base/src/Internal/CG.hs | |||
@@ -1,16 +1,22 @@ | |||
1 | {-# LANGUAGE FlexibleContexts, FlexibleInstances #-} | 1 | {-# LANGUAGE FlexibleContexts, FlexibleInstances #-} |
2 | {-# LANGUAGE RecordWildCards #-} | 2 | {-# LANGUAGE RecordWildCards #-} |
3 | 3 | ||
4 | module Numeric.LinearAlgebra.Util.CG( | 4 | module Internal.CG( |
5 | cgSolve, cgSolve', | 5 | cgSolve, cgSolve', |
6 | CGState(..), R, V | 6 | CGState(..), R, V |
7 | ) where | 7 | ) where |
8 | 8 | ||
9 | import Data.Packed.Numeric | 9 | import Internal.Vector |
10 | import Numeric.Sparse | 10 | import Internal.Matrix hiding (mat) |
11 | import Internal.Numeric | ||
12 | import Internal.Element | ||
13 | import Internal.IO | ||
14 | import Internal.Container | ||
15 | import Internal.Sparse | ||
11 | import Numeric.Vector() | 16 | import Numeric.Vector() |
12 | import Numeric.LinearAlgebra.Algorithms(linearSolveLS, relativeError, pnorm, NormType(..)) | 17 | import Internal.Algorithms(linearSolveLS, relativeError, pnorm, NormType(..)) |
13 | import Control.Arrow((***)) | 18 | import Control.Arrow((***)) |
19 | import Data.Vector.Storable(fromList) | ||
14 | 20 | ||
15 | {- | 21 | {- |
16 | import Util.Misc(debug, debugMat) | 22 | import Util.Misc(debug, debugMat) |