SUBROUTINE ZGELQF( M, N, A, LDA, TAU, WORK, LDWORK, INFO) DOUBLE COMPLEX A(LDA,*), TAU(*), WORK(*) INTEGER M, N, LDA, LDWORK, INFO SUBROUTINE ZGELQF_64( M, N, A, LDA, TAU, WORK, LDWORK, INFO) DOUBLE COMPLEX A(LDA,*), TAU(*), WORK(*) INTEGER*8 M, N, LDA, LDWORK, INFO
SUBROUTINE GELQF( [M], [N], A, [LDA], TAU, [WORK], [LDWORK], [INFO]) COMPLEX(8), DIMENSION(:) :: TAU, WORK COMPLEX(8), DIMENSION(:,:) :: A INTEGER :: M, N, LDA, LDWORK, INFO SUBROUTINE GELQF_64( [M], [N], A, [LDA], TAU, [WORK], [LDWORK], * [INFO]) COMPLEX(8), DIMENSION(:) :: TAU, WORK COMPLEX(8), DIMENSION(:,:) :: A INTEGER(8) :: M, N, LDA, LDWORK, INFO
void zgelqf(int m, int n, doublecomplex *a, int lda, doublecomplex *tau, int *info);
void zgelqf_64(long m, long n, doublecomplex *a, long lda, doublecomplex *tau, long *info);
If LDWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LDWORK is issued by XERBLA.