summaryrefslogtreecommitdiff
path: root/packages/base
diff options
context:
space:
mode:
authorKevin Slagle <kjslag@gmail.com>2016-10-13 00:24:54 -0700
committerKevin Slagle <kjslag@gmail.com>2016-10-13 00:24:54 -0700
commit9770dfb1bcfac32f05dd848a560c1e1824f2f7b9 (patch)
tree6b73fde540e7d6d2929c12dde62197892e209de1 /packages/base
parent58ac011d5622d6a6aa0de4060eccf7ed37baeb0e (diff)
fixed documentation
Diffstat (limited to 'packages/base')
-rw-r--r--packages/base/src/Internal/Algorithms.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/base/src/Internal/Algorithms.hs b/packages/base/src/Internal/Algorithms.hs
index 7f757d7..1ccd3a2 100644
--- a/packages/base/src/Internal/Algorithms.hs
+++ b/packages/base/src/Internal/Algorithms.hs
@@ -294,7 +294,7 @@ fromList [35.18264833189422,1.4769076999800903]
294compactSVD :: Field t => Matrix t -> (Matrix t, Vector Double, Matrix t) 294compactSVD :: Field t => Matrix t -> (Matrix t, Vector Double, Matrix t)
295compactSVD = compactSVDTol 1 295compactSVD = compactSVDTol 1
296 296
297-- | @compactSVDTol r@ is similar to `compactSVDTol`, but uses tolerance @tol=r*g*eps*(max rows cols)@ to distinguish nonzero singular values, where @g@ is the greatest singular value. 297-- | @compactSVDTol r@ is similar to 'compactSVDTol', but uses tolerance @tol=r*g*eps*(max rows cols)@ to distinguish nonzero singular values, where @g@ is the greatest singular value.
298compactSVDTol :: Field t => Double -> Matrix t -> (Matrix t, Vector Double, Matrix t) 298compactSVDTol :: Field t => Double -> Matrix t -> (Matrix t, Vector Double, Matrix t)
299compactSVDTol r m = (u', subVector 0 d s, v') where 299compactSVDTol r m = (u', subVector 0 d s, v') where
300 (u,s,v) = thinSVD m 300 (u,s,v) = thinSVD m