cgemqrt.f(3) LAPACK cgemqrt.f(3)
subroutine cgemqrt (SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, C, LDC, WORK, INFO)
subroutine cgemqrt (characterSIDE, characterTRANS, integerM, integerN, integerK, integerNB,
complex, dimension( ldv, * )V, integerLDV, complex, dimension( ldt, * )T, integerLDT,
complex, dimension( ldc, * )C, integerLDC, complex, dimension( * )WORK, integerINFO)
CGEMQRT overwrites the general complex M-by-N matrix C with
SIDE = 'L' SIDE = 'R'
TRANS = 'N': Q C C Q
TRANS = 'C': Q**H C C Q**H
where Q is a complex orthogonal matrix defined as the product of K
Q = H(1) H(2) . . . H(K) = I - V T V**H
generated using the compact WY representation as returned by CGEQRT.
Q is of order M if SIDE = 'L' and of order N if SIDE = 'R'.
SIDE is CHARACTER*1
= 'L': apply Q or Q**H from the Left;
= 'R': apply Q or Q**H from the Right.
TRANS is CHARACTER*1
= 'N': No transpose, apply Q;
= 'C': Transpose, apply Q**H.
M is INTEGER
The number of rows of the matrix C. M >= 0.
N is INTEGER
The number of columns of the matrix C. N >= 0.
K is INTEGER
The number of elementary reflectors whose product defines
the matrix Q.
If SIDE = 'L', M >= K >= 0;
if SIDE = 'R', N >= K >= 0.
NB is INTEGER
The block size used for the storage of T. K >= NB >= 1.
This must be the same value of NB used to generate T
V is COMPLEX array, dimension (LDV,K)
The i-th column must contain the vector which defines the
elementary reflector H(i), for i = 1,2,...,k, as returned by
CGEQRT in the first K columns of its array argument A.
LDV is INTEGER
The leading dimension of the array V.
If SIDE = 'L', LDA >= max(1,M);
if SIDE = 'R', LDA >= max(1,N).
T is COMPLEX array, dimension (LDT,K)
The upper triangular factors of the block reflectors
as returned by CGEQRT, stored as a NB-by-N matrix.
LDT is INTEGER
The leading dimension of the array T. LDT >= NB.
C is COMPLEX array, dimension (LDC,N)
On entry, the M-by-N matrix C.
On exit, C is overwritten by Q C, Q**H C, C Q**H or C Q.
LDC is INTEGER
The leading dimension of the array C. LDC >= max(1,M).
WORK is COMPLEX array. The dimension of WORK is
N*NB if SIDE = 'L', or M*NB if SIDE = 'R'.
INFO is INTEGER
= 0: successful exit
< 0: if INFO = -i, the i-th argument had an illegal value
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
Definition at line 168 of file cgemqrt.f.
Generated automatically by Doxygen for LAPACK from the source code.
Version 3.4.2 Tue Sep 25 2012 cgemqrt.f(3)