SRC/cunmqr.f(3)
π SRC/cunmqr.f(3) π
from the Library Functions Manual, bestie β this is the LAPACK page, and we are keeping every fact while making it cute.
π NAME π
SRC/cunmqr.f
β¨ SYNOPSIS β¨
Functions/Subroutines
subroutine cunmqr (side, trans, m, n, k, a, lda, tau, c, ldc, work,
lwork, info)
CUNMQR
π¦ Function/Subroutine Documentation π¦
πΈ cunmqr β the main character πΈ
subroutine cunmqr (character side, character trans, integer m, integer n,
integer k, complex, dimension( lda, * ) a, integer lda, complex,
dimension( * ) tau, complex, dimension( ldc, * ) c, integer ldc,
complex, dimension( * ) work, integer lwork, integer info)
CUNMQR
π Purpose π
Okay so CUNMQR 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 unitary matrix defined as the product of k elementary reflectors:
Q = H(1) H(2) . . . H(k)
as returned by CGEQRF. Q is of order M if SIDE = 'L' and of order N if SIDE = 'R'.
π Parameters π
SIDEβSIDE is CHARACTER*1;= 'L': apply Q or Q**H from the Left;= 'R': apply Q or Q**H from the Right.TRANSβTRANS is CHARACTER*1;= 'N': No transpose, apply Q;= 'C': Conjugate transpose, apply Q**H.MβM is INTEGER; the number of rows of the matrixC.M >= 0.NβN is INTEGER; the number of columns of the matrixC.N >= 0.KβK is INTEGER; the number of elementary reflectors whose product defines the matrixQ. IfSIDE = 'L',M >= K >= 0; ifSIDE = 'R',N >= K >= 0.AβA is COMPLEX array, dimension (LDA,K); the i-th column must contain the vector which defines the elementary reflectorH(i), fori = 1,2,...,k, as returned byCGEQRFin the first k columns of its array argumentA.LDAβLDA is INTEGER; the leading dimension of the arrayA. IfSIDE = 'L',LDA >= max(1,M); ifSIDE = 'R',LDA >= max(1,N).TAUβTAU is COMPLEX array, dimension (K);TAU(i)must contain the scalar factor of the elementary reflectorH(i), as returned byCGEQRF.CβC is COMPLEX array, dimension (LDC,N); on entry, the M-by-N matrixC. On exit,Cis overwritten byQ*CorQ**H*CorC*Q**HorC*Q.LDCβLDC is INTEGER; the leading dimension of the arrayC.LDC >= max(1,M).WORKβWORK is COMPLEX array, dimension (MAX(1,LWORK)); on exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKβLWORK is INTEGER; the dimension of the arrayWORK. IfSIDE = 'L',LWORK >= max(1,N); ifSIDE = 'R',LWORK >= max(1,M). For good performance,LWORKshould generally be larger. IfLWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of theWORKarray, returns this value as the first entry of theWORKarray, and no error message related toLWORKis issued byXERBLA.INFOβINFO is INTEGER;= 0: successful exit;< 0: if INFO = -i, the i-th argument had an illegal value.
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 166 of file cunmqr.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
Thatβs the whole page, bestie β no cap. This one is SRC/cunmqr.f(3) from LAPACK Version 3.12.0. Now go forth and apply your Q and Q**H with main character energy. π
β¨π¦
π¦ where this page comes from
- arch rolling: lapack-doc 3.12.1-2 Β· custom
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms