diff options
| author | Kevin Slagle <kjslag@gmail.com> | 2016-10-13 00:24:54 -0700 |
|---|---|---|
| committer | Kevin Slagle <kjslag@gmail.com> | 2016-10-13 00:24:54 -0700 |
| commit | 9770dfb1bcfac32f05dd848a560c1e1824f2f7b9 (patch) | |
| tree | 6b73fde540e7d6d2929c12dde62197892e209de1 /packages/base/src | |
| parent | 58ac011d5622d6a6aa0de4060eccf7ed37baeb0e (diff) | |
fixed documentation
Diffstat (limited to 'packages/base/src')
| -rw-r--r-- | packages/base/src/Internal/Algorithms.hs | 2 |
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] | |||
| 294 | compactSVD :: Field t => Matrix t -> (Matrix t, Vector Double, Matrix t) | 294 | compactSVD :: Field t => Matrix t -> (Matrix t, Vector Double, Matrix t) |
| 295 | compactSVD = compactSVDTol 1 | 295 | compactSVD = 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. |
| 298 | compactSVDTol :: Field t => Double -> Matrix t -> (Matrix t, Vector Double, Matrix t) | 298 | compactSVDTol :: Field t => Double -> Matrix t -> (Matrix t, Vector Double, Matrix t) |
| 299 | compactSVDTol r m = (u', subVector 0 d s, v') where | 299 | compactSVDTol r m = (u', subVector 0 d s, v') where |
| 300 | (u,s,v) = thinSVD m | 300 | (u,s,v) = thinSVD m |