LAPACK
3.6.1
LAPACK: Linear Algebra PACKage
|
subroutine cung2r | ( | integer | M, |
integer | N, | ||
integer | K, | ||
complex, dimension( lda, * ) | A, | ||
integer | LDA, | ||
complex, dimension( * ) | TAU, | ||
complex, dimension( * ) | WORK, | ||
integer | INFO | ||
) |
CUNG2R
Download CUNG2R + dependencies [TGZ] [ZIP] [TXT]
CUNG2R generates an m by n complex matrix Q with orthonormal columns, which is defined as the first n columns of a product of k elementary reflectors of order m Q = H(1) H(2) . . . H(k) as returned by CGEQRF.
[in] | M | M is INTEGER The number of rows of the matrix Q. M >= 0. |
[in] | N | N is INTEGER The number of columns of the matrix Q. M >= N >= 0. |
[in] | K | K is INTEGER The number of elementary reflectors whose product defines the matrix Q. N >= K >= 0. |
[in,out] | A | A is COMPLEX array, dimension (LDA,N) On entry, the i-th column must contain the vector which defines the elementary reflector H(i), for i = 1,2,...,k, as returned by CGEQRF in the first k columns of its array argument A. On exit, the m by n matrix Q. |
[in] | LDA | LDA is INTEGER The first dimension of the array A. LDA >= max(1,M). |
[in] | TAU | TAU is COMPLEX array, dimension (K) TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by CGEQRF. |
[out] | WORK | WORK is COMPLEX array, dimension (N) |
[out] | INFO | INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument has an illegal value |
Definition at line 116 of file cung2r.f.