summaryrefslogtreecommitdiff
path: root/packages/base
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2014-06-13 06:35:28 +0200
committerAlberto Ruiz <aruiz@um.es>2014-06-13 06:35:28 +0200
commit1c1fc3f1ba1781e087d84373b29633a0dc43c8fb (patch)
tree9139617619e62829a29ee2a199990ba107e9a270 /packages/base
parent77066f8f2c7c41a6e472978c8d70994f07cc46ec (diff)
fix missing conj in nullspace
introduced in the recent change, detected by quickcheck
Diffstat (limited to 'packages/base')
-rw-r--r--packages/base/src/Numeric/LinearAlgebra/Algorithms.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/base/src/Numeric/LinearAlgebra/Algorithms.hs b/packages/base/src/Numeric/LinearAlgebra/Algorithms.hs
index fd9177c..21faf6e 100644
--- a/packages/base/src/Numeric/LinearAlgebra/Algorithms.hs
+++ b/packages/base/src/Numeric/LinearAlgebra/Algorithms.hs
@@ -472,7 +472,7 @@ nullspaceSVD hint a (s,v) = vs where
472 k = case hint of 472 k = case hint of
473 Right t -> t 473 Right t -> t
474 _ -> rankSVD tol a s 474 _ -> rankSVD tol a s
475 vs = dropColumns k v 475 vs = conj (dropColumns k v)
476 476
477 477
478-- | The nullspace of a matrix. See also 'nullspaceSVD'. 478-- | The nullspace of a matrix. See also 'nullspaceSVD'.