SRC/cgelqf.f(3)
okay bestie, welcome to the SRC/cgelqf.f(3) page from the Library Functions Manual π this one is all about the CGELQF subroutine and it is lowkey iconic β¨
πΈ NAME πΈ
SRC/cgelqf.f β the source page for the CGELQF subroutine, no cap π«Ά
β¨ SYNOPSIS β¨
π§ Functions/Subroutines π§
subroutine cgelqf (m, n, a, lda, tau, work, lwork, info)
CGELQF
π Function/Subroutine Documentation π
subroutine cgelqf (integer m, integer n, complex, dimension( lda, * ) a,
integer lda, complex, dimension( * ) tau, complex, dimension( * ) work,
integer lwork, integer info)
CGELQF
π Purpose π
CGELQF computes an LQ factorization of a complex M-by-N matrix A, and the factorization is giving this exact energy:
A = ( L 0 ) * Q
where:
Qis a N-by-N orthogonal matrix;Lis a lower-triangular M-by-M matrix;0is a M-by-(N-M) zero matrix, if M < N.
π Parameters π
MβM is INTEGER. The number of rows of the matrixA.M >= 0.NβN is INTEGER. The number of columns of the matrixA.N >= 0.AβA is COMPLEX array, dimension (LDA,N). On entry, theM-by-NmatrixA. On exit, the elements on and below the diagonal of the array contain them-by-min(m,n)lower trapezoidal matrixL(Lis lower triangular ifm <= n); the elements above the diagonal, with the arrayTAU, represent the unitary matrixQas a product of elementary reflectors (see Further Details).LDAβLDA is INTEGER. The leading dimension of the arrayA.LDA >= max(1,M).TAUβTAU is COMPLEX array, dimension (min(M,N)). The scalar factors of the elementary reflectors (see Further Details).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.LWORK >= 1, ifMIN(M,N) = 0, andLWORK >= M, otherwise. For optimum performanceLWORK >= M*NB, whereNBis 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.INFOβINFO is INTEGER.= 0: successful exit.< 0: ifINFO = -i, thei-th argument had an illegal value.
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π¦ Further Details π¦
The matrix Q is represented as a product of elementary reflectors:
Q = H(k)**H . . . H(2)**H H(1)**H, where k = min(m,n).
Each H(i) has the form:
H(i) = I - tau * v * v**H
where tau is a complex scalar, and v is a complex vector with v(1:i-1) = 0 and v(i) = 1; conjg(v(i+1:n)) is stored on exit in A(i,i+1:n), and tau in TAU(i).
Definition at line 143 of file cgelqf.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
thatβs the whole tea, bestie π: LAPACK Version 3.12.0, source page SRC/cgelqf.f(3), and the footer didnβt print a date so weβre calling it timeless β¨π
π¦ 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