SRC/zunm2r.f(3)
π
SRC/zunm2r.f(3) β the Library Functions Manual page, bestie β¨
okay so you opened the Library Functions Manual entry for SRC/zunm2r.f, and it is literally all about one subroutine. Letβs go π«Ά
πΈ NAME πΈ
SRC/zunm2r.f
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine zunm2r (side, trans, m, n, k, a, lda, tau, c, ldc, work, info)βZUNM2Rmultiplies a general matrix by the unitary matrix from a QR factorization determined bycgeqrf(unblocked algorithm).
π Function/Subroutine Documentation π
π¦ subroutine zunm2r (...)
subroutine zunm2r (character side, character trans, integer m, integer n,
integer k, complex*16, dimension( lda, * ) a, integer lda, complex*16,
dimension( * ) tau, complex*16, dimension( ldc, * ) c, integer ldc,
complex*16, dimension( * ) work, integer info)
ZUNM2R multiplies a general matrix by the unitary matrix from a QR factorization determined by cgeqrf (unblocked algorithm).
π Purpose π
okay so hereβs the whole point, no cap:
ZUNM2R overwrites the general complex m-by-n matrix C with
Q * C if SIDE = 'L' and TRANS = 'N', or
Q**H* C if SIDE = 'L' and TRANS = 'C', or
C * Q if SIDE = 'R' and TRANS = 'N', or
C * Q**H if SIDE = 'R' and TRANS = 'C',
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 ZGEQRF. Q is of order m if SIDE = 'L' and of order n if SIDE = 'R'.
π Parameters π
SIDEβSIDE is CHARACTER*1.= 'L': applyQorQ**Hfrom the Left.= 'R': applyQorQ**Hfrom the Right.TRANSβTRANS is CHARACTER*1.= 'N': applyQ(No transpose).= 'C': applyQ**H(Conjugate transpose).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*16 array, dimension (LDA,K). The i-th column must contain the vector which defines the elementary reflectorH(i), fori = 1,2,...,k, as returned byZGEQRFin the firstkcolumns of its array argumentA.Ais modified by the routine but restored on exit.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*16 array, dimension (K).TAU(i)must contain the scalar factor of the elementary reflectorH(i), as returned byZGEQRF.CβC is COMPLEX*16 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*16 array, dimension (N) if SIDE = 'L', (M) if SIDE = 'R'.INFOβINFO is INTEGER.= 0: successful exit.< 0: ifINFO = -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 157 of file zunm2r.f. π
Definition at line 157 of file zunm2r.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
and thatβs the whole vibe, bestie β this page is from LAPACK, Version 3.12.0, source SRC/zunm2r.f(3). periodt π
β¨π¦
π¦ 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