From d8639b28ec9e83b54b45c987508d270d5469451c Mon Sep 17 00:00:00 2001
From: Reiner Pope <unknown>
Date: Fri, 24 Oct 2008 08:59:02 +0000
Subject: added dgetrs support for solving linear systems from LU factorization

---
 lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h')

diff --git a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h
index 79e52be..e98e9dc 100644
--- a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h
+++ b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h
@@ -84,3 +84,5 @@ int schur_l_C(KCMAT(a), CMAT(u), CMAT(s));
 
 int lu_l_R(KDMAT(a), DVEC(ipiv), DMAT(r));
 int lu_l_C(KCMAT(a), DVEC(ipiv), CMAT(r));
+
+int luS_l_R(DMAT(a), KDVEC(ipiv), KDMAT(b), DMAT(x));
-- 
cgit v1.2.3