summaryrefslogtreecommitdiff
path: root/lib/Numeric/LinearAlgebra/Algorithms.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2008-02-23 19:35:51 +0000
committerAlberto Ruiz <aruiz@um.es>2008-02-23 19:35:51 +0000
commit500f5fca244dadab494655aa73d7183df1c87c50 (patch)
treee02abfcf4db24a538646c6f0982c58dabb3adc63 /lib/Numeric/LinearAlgebra/Algorithms.hs
parentda54e2f2c27f68c08f4db7551c57b2c1136dc778 (diff)
working on tests
Diffstat (limited to 'lib/Numeric/LinearAlgebra/Algorithms.hs')
-rw-r--r--lib/Numeric/LinearAlgebra/Algorithms.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Numeric/LinearAlgebra/Algorithms.hs b/lib/Numeric/LinearAlgebra/Algorithms.hs
index 79cc64d..1de018c 100644
--- a/lib/Numeric/LinearAlgebra/Algorithms.hs
+++ b/lib/Numeric/LinearAlgebra/Algorithms.hs
@@ -142,7 +142,7 @@ eigSH m | m `equal` ctrans m = eigSH' m
142 142
143-- | Cholesky factorization of a positive definite hermitian or symmetric matrix using lapack's dpotrf or zportrf. 143-- | Cholesky factorization of a positive definite hermitian or symmetric matrix using lapack's dpotrf or zportrf.
144-- 144--
145-- If @c = chol m@ then @m == c \<> ctrans c@. 145-- If @c = chol m@ then @m == ctrans c \<> c@.
146chol :: Field t => Matrix t -> Matrix t 146chol :: Field t => Matrix t -> Matrix t
147chol m | m `equal` ctrans m = cholSH m 147chol m | m `equal` ctrans m = cholSH m
148 | otherwise = error "chol requires positive definite complex hermitian or real symmetric matrix" 148 | otherwise = error "chol requires positive definite complex hermitian or real symmetric matrix"