diff options
Diffstat (limited to 'packages/base/src/Internal/CG.hs')
-rw-r--r-- | packages/base/src/Internal/CG.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/packages/base/src/Internal/CG.hs b/packages/base/src/Internal/CG.hs index 1193b18..fd14212 100644 --- a/packages/base/src/Internal/CG.hs +++ b/packages/base/src/Internal/CG.hs | |||
@@ -16,7 +16,6 @@ import Internal.Sparse | |||
16 | import Numeric.Vector() | 16 | import Numeric.Vector() |
17 | import Internal.Algorithms(linearSolveLS, relativeError, pnorm, NormType(..)) | 17 | import Internal.Algorithms(linearSolveLS, relativeError, pnorm, NormType(..)) |
18 | import Control.Arrow((***)) | 18 | import Control.Arrow((***)) |
19 | import Data.Vector.Storable(fromList) | ||
20 | 19 | ||
21 | {- | 20 | {- |
22 | import Util.Misc(debug, debugMat) | 21 | import Util.Misc(debug, debugMat) |
@@ -30,7 +29,6 @@ infix 0 /// | |||
30 | v /// b = debugMat b 2 asRow v | 29 | v /// b = debugMat b 2 asRow v |
31 | -} | 30 | -} |
32 | 31 | ||
33 | type R = Double | ||
34 | type V = Vector R | 32 | type V = Vector R |
35 | 33 | ||
36 | data CGState = CGState | 34 | data CGState = CGState |