summaryrefslogtreecommitdiff
path: root/lib/Numeric/LinearAlgebra/Algorithms.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/LinearAlgebra/Algorithms.hs')
-rw-r--r--lib/Numeric/LinearAlgebra/Algorithms.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Numeric/LinearAlgebra/Algorithms.hs b/lib/Numeric/LinearAlgebra/Algorithms.hs
index 1de018c..bbc5986 100644
--- a/lib/Numeric/LinearAlgebra/Algorithms.hs
+++ b/lib/Numeric/LinearAlgebra/Algorithms.hs
@@ -300,12 +300,12 @@ multiplicative factor of the default tolerance used by GNU-Octave (see 'pinv').
300@\> let m = 'fromLists' [[1,0, 0] 300@\> let m = 'fromLists' [[1,0, 0]
301 ,[0,1, 0] 301 ,[0,1, 0]
302 ,[0,0,1e-10]] 302 ,[0,0,1e-10]]
303\ 303\ --
304\> 'pinv' m 304\> 'pinv' m
3051. 0. 0. 3051. 0. 0.
3060. 1. 0. 3060. 1. 0.
3070. 0. 10000000000. 3070. 0. 10000000000.
308\ 308\ --
309\> pinvTol 1E8 m 309\> pinvTol 1E8 m
3101. 0. 0. 3101. 0. 0.
3110. 1. 0. 3110. 1. 0.