SUBROUTINE ZGEQRF( M, N, A, LDA, TAU, WORK, LDWORK, INFO) DOUBLE COMPLEX A(LDA,*), TAU(*), WORK(*) INTEGER M, N, LDA, LDWORK, INFO SUBROUTINE ZGEQRF_64( M, N, A, LDA, TAU, WORK, LDWORK, INFO) DOUBLE COMPLEX A(LDA,*), TAU(*), WORK(*) INTEGER*8 M, N, LDA, LDWORK, INFO
SUBROUTINE GEQRF( [M], [N], A, [LDA], TAU, [WORK], [LDWORK], [INFO]) COMPLEX(8), DIMENSION(:) :: TAU, WORK COMPLEX(8), DIMENSION(:,:) :: A INTEGER :: M, N, LDA, LDWORK, INFO SUBROUTINE GEQRF_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 zgeqrf(int m, int n, doublecomplex *a, int lda, doublecomplex *tau, int *info);
void zgeqrf_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.