LINEAR++ library: AFF to LAPACK

◆ LaTridiagMatFactorize()

void LaTridiagMatFactorize ( LaTridiagMatDouble &  A,
LaTridiagFactDouble AF 
)
inline

Definition at line 107 of file trfd.h.

References LaTridiagFactDouble::copy(), dgttrf(), LaTridiagFactDouble::diag(), F77NAME, and LaTridiagFactDouble::pivot().

109 {
110  integer N = A.size(), info = 0;
111  AF.copy(A);
112  double *DL = &AF.diag(-1)(0), *D = &AF.diag(0)(0),
113  *DU = &AF.diag(1)(0), *DU2 = &AF.diag(2)(0);
114 
115 cerr << " \t*\n";
116 
117  F77NAME(dgttrf)(&N, DL, D, DU, DU2, &(AF.pivot()(0)), &info);
118 
119 cerr << " \t\t**\n";
120 }
LaVectorDouble diag(int)
Definition: trfd.h:67
LaVectorLongInt & pivot()
Definition: trfd.h:30
long int integer
Definition: f77lapack.h:61
void F77NAME() dgttrf(integer *N, doublereal *DL, doublereal *D, doublereal *DU, doublereal *DU2, integer *ipiv, integer *info)
LaTridiagFactDouble & copy(const LaTridiagMatDouble &)
Definition: trfd.h:100
#define F77NAME(x)
Definition: arch.h:17
Here is the call graph for this function: