zpttrf - compute the L*D*L' factorization of a complex Hermitian positive definite tridiagonal matrix A
SUBROUTINE ZPTTRF( N, DIAG, OFFD, INFO) DOUBLE COMPLEX OFFD(*) INTEGER N, INFO DOUBLE PRECISION DIAG(*)
SUBROUTINE ZPTTRF_64( N, DIAG, OFFD, INFO) DOUBLE COMPLEX OFFD(*) INTEGER*8 N, INFO DOUBLE PRECISION DIAG(*)
SUBROUTINE PTTRF( [N], DIAG, OFFD, [INFO]) COMPLEX(8), DIMENSION(:) :: OFFD INTEGER :: N, INFO REAL(8), DIMENSION(:) :: DIAG
SUBROUTINE PTTRF_64( [N], DIAG, OFFD, [INFO]) COMPLEX(8), DIMENSION(:) :: OFFD INTEGER(8) :: N, INFO REAL(8), DIMENSION(:) :: DIAG
#include <sunperf.h>
void zpttrf(int n, double *diag, doublecomplex *offd, int *info);
void zpttrf_64(long n, double *diag, doublecomplex *offd, long *info);
zpttrf computes the L*D*L' factorization of a complex Hermitian 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.