From 015c331252a3b99c187b5607572f1cec531a4d1e Mon Sep 17 00:00:00 2001 From: karturov Date: Mon, 5 Dec 2011 14:52:21 +0700 Subject: Intel(R) MKL support added. * * * License disclaimer changed to BSD license for MKL_support.h * * * Pardiso support fixed, test added. blas/lapack tests fixed: Scalar parameter was added in Cholesky, product_matrix_vector_triangular remaned to triangular_matrix_vector_product. * * * PARDISO test was added physically. --- lapack/cholesky.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lapack') diff --git a/lapack/cholesky.cpp b/lapack/cholesky.cpp index c3a72c3c5..c51a8a29b 100644 --- a/lapack/cholesky.cpp +++ b/lapack/cholesky.cpp @@ -41,8 +41,8 @@ EIGEN_LAPACK_FUNC(potrf,(char* uplo, int *n, RealScalar *pa, int *lda, int *info Scalar* a = reinterpret_cast(pa); MatrixType A(a,*n,*n,*lda); int ret; - if(UPLO(*uplo)==UP) ret = internal::llt_inplace::blocked(A); - else ret = internal::llt_inplace::blocked(A); + if(UPLO(*uplo)==UP) ret = internal::llt_inplace::blocked(A); + else ret = internal::llt_inplace::blocked(A); if(ret>=0) *info = ret+1; -- cgit v1.2.3