SUBROUTINE ZGTSL( N, SUB, DIAG, SUPER, B, INFO) DOUBLE COMPLEX SUB(*), DIAG(*), SUPER(*), B(*) INTEGER N, INFO SUBROUTINE ZGTSL_64( N, SUB, DIAG, SUPER, B, INFO) DOUBLE COMPLEX SUB(*), DIAG(*), SUPER(*), B(*) INTEGER*8 N, INFO
void zgtsl(int n, doublecomplex *sub, doublecomplex *diag, doublecomplex *super, doublecomplex *b, int *info);
void zgtsl_64(long n, doublecomplex *sub, doublecomplex *diag, doublecomplex *super, doublecomplex *b, long *info);
INFO = 0 Subroutine completed normally.
INFO > 0 Returns a value k when the kth element of the diagonal becomes exactly zero.