spttrf - compute the L*D*L' factorization of a real symmetric positive definite tridiagonal matrix A
SUBROUTINE SPTTRF( N, DIAG, OFFD, INFO) INTEGER N, INFO REAL DIAG(*), OFFD(*)
SUBROUTINE SPTTRF_64( N, DIAG, OFFD, INFO) INTEGER*8 N, INFO REAL DIAG(*), OFFD(*)
SUBROUTINE PTTRF( [N], DIAG, OFFD, [INFO]) INTEGER :: N, INFO REAL, DIMENSION(:) :: DIAG, OFFD
SUBROUTINE PTTRF_64( [N], DIAG, OFFD, [INFO]) INTEGER(8) :: N, INFO REAL, DIMENSION(:) :: DIAG, OFFD
#include <sunperf.h>
void spttrf(int n, float *diag, float *offd, int *info);
void spttrf_64(long n, float *diag, float *offd, long *info);
spttrf computes the L*D*L' factorization of a real symmetric positive definite tridiagonal matrix A. The factorization may also be regarded as having the form A = U'*D*U.
= 0: successful exit
< 0: if INFO = -k, the k-th argument had an illegal value
> 0: if INFO = k, the leading minor of order k is not positive definite; if k < N, the factorization could not be completed, while if k = N, the factorization was completed, but DIAG(N) = 0.