SRC/cungql.f(3)
π SRC/cungql.f π
okay bestie, we're in the Library Functions Manual, and this is the page for SRC/cungql.f β the CUNGQL subroutine. Grab your iced coffee, because we're doing complex linear algebra and it's honestly iconic. β¨
π NAME π
SRC/cungql.f β that's the name, periodt. π
β¨ SYNOPSIS β¨
π¦ Functions/Subroutines π¦
subroutine cungql (m, n, k, a, lda, tau, work, lwork, info)βCUNGQL
π Function/Subroutine Documentation π
Here's the full signature, bestie β every type and dimension exactly as it appears:
subroutine cungql (integer m, integer n, integer k, complex, dimension( lda, * ) a, integer lda, complex, dimension( * ) tau, complex, dimension( * ) work, integer lwork, integer info)
CUNGQL π«Ά
π«Ά Purpose π«Ά
Okay so CUNGQL generates an M-by-N complex matrix Q with orthonormal columns. That matrix Q is defined as the last N columns of a product of K elementary reflectors of order M, like:
Q = H(k) . . . H(2) H(1)
...as returned by CGEQLF. Slay. π
π Parameters π
M
M is INTEGER. It's the number of rows of the matrix Q. Constraint: M >= 0. No cap.
N
N is INTEGER. It's the number of columns of the matrix Q. Constraint: M >= N >= 0.
K
K is INTEGER. It's the number of elementary reflectors whose product defines the matrix Q. Constraint: N >= K >= 0.
A
A is a COMPLEX array, dimension (LDA,N).
On entry, the (n-k+i)-th column must contain the vector which defines the elementary reflector H(i), for i = 1,2,...,k, as returned by CGEQLF in the last k columns of its array argument A.
On exit, it holds the M-by-N matrix Q. π
LDA
LDA is INTEGER. It's the first dimension of the array A. Constraint: LDA >= max(1,M).
TAU
TAU is a COMPLEX array, dimension (K). TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by CGEQLF.
WORK
WORK is a COMPLEX array, dimension (MAX(1,LWORK)). On exit, if INFO = 0, WORK(1) returns the optimal LWORK. π«Ά
LWORK
LWORK is INTEGER. It's the dimension of the array WORK. Constraint: LWORK >= max(1,N). For optimum performance, LWORK >= N*NB, where NB is the optimal blocksize.
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. Important!! β οΈ
INFO
INFO is INTEGER.
= 0: successful exit β we love a clean win. β< 0: ifINFO = -i, thei-th argument has an illegal value. π¨
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 127 of file cungql.f.
β Author β (generated edition)
Generated automatically by Doxygen for LAPACK from the source code.
That's the whole page, bestie! Sending you off with LAPACK Version 3.12.0 and this page from SRC/cungql.f(3) β mwah πβ¨
π¦ 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