NAME

zgeqrf - compute a QR factorization of a complex M-by-N matrix A


SYNOPSIS

  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

F95 INTERFACE

  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

C INTERFACE

#include <sunperf.h>

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);


PURPOSE

zgeqrf computes a QR factorization of a complex M-by-N matrix A: A = Q * R.


ARGUMENTS


FURTHER DETAILS

The matrix Q is represented as a product of elementary reflectors

   Q  = H(1) H(2) . . . H(k), where k  = min(m,n).

Each H(i) has the form

   H(i)  = I - tau * v * v'

where tau is a complex scalar, and v is a complex vector with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in A(i+1:m,i), and tau in TAU(i).