Removed old comments

darcs-hash:20081219074159-7eff5-5ff38924c7a80830b4e10972286b779d89cc9902.gz
reinerp · Dec 19, 2008 · abf9e32 · abf9e32
1 parent f30442f
commit abf9e32
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 2 deletions.
diff --git a/Data/Packed/Static/Matrix.hs b/Data/Packed/Static/Matrix.hs
@@ -84,7 +84,6 @@ instance ShapedContainer Matrix where
     unsafeReshape = Matrix . unMatrix
 
 ------ Shaping
--- TODO: turn IntegerT constraint into PositiveT constraint
 refineMat :: forall m n t a. Matrix (m,n) t -> (forall m' n'. (PositiveT m', PositiveT n') => Matrix (m', n') t -> a) -> a
 refineMat m k = fromJust.fromJust $ reifyPositiveD (toInteger $ rows m) (\r ->
                    reifyPositiveD (toInteger $ cols m) (\c -> 

diff --git a/Numeric/LinearAlgebra/Static/Algorithms.hs b/Numeric/LinearAlgebra/Static/Algorithms.hs
@@ -54,7 +54,6 @@ rcond :: (H.Field t) => Matrix (m,n) t -> Double
 rcond = H.rcond . unMatrix
 
 --------- SVD
--- | The vector's length is the minimum of m and n.
 svd :: (H.Field t) => Matrix (m,n) t ->
    (Matrix (m,m) t, Vector (Min m n) Double, Matrix (n,n) t)
 svd = svdBody