LINEAR++ library: AFF to LAPACK

◆ LaLinearSolve()

void LaLinearSolve ( LaSpdFactDouble AF,
LaGenMatDouble &  X,
LaGenMatDouble &  B 
)
inline

Definition at line 100 of file spdfd.h.

References dpotrs(), F77NAME, LaSpdFactDouble::gdim(), LaSpdFactDouble::S(), and LaSpdFactDouble::size().

102 {
103  char uplo = 'L';
104  integer N = AF.size(), nrhs = X.size(1), lda = AF.gdim(),
105  ldb = B.size(0), info = 0;
106 
107  X.inject(B);
108  F77NAME(dpotrs)(&uplo, &N, &nrhs, &(AF.S()(0,0)), &lda, &X(0,0),
109  &ldb, &info);
110 }
LaSpdMatDouble & S()
Definition: spdfd.h:31
long int integer
Definition: f77lapack.h:61
int gdim()
Definition: spdfd.h:33
int size()
Definition: spdfd.h:32
void F77NAME() dpotrs(char *UPLO, integer *N, integer *nrhs, doublereal *A, integer *LDA, doublereal *b, integer *ldb, integer *info)
#define F77NAME(x)
Definition: arch.h:17
Here is the call graph for this function: