SRC/dgemqr.f(3)
okay bestie, buckle up: this is SRC/dgemqr.f(3) from the Library Functions Manual, and it's giving βLAPACK routine that ships Q aroundβ energy. π
β¨ NAME β¨
SRC/dgemqr.f β yes, that's the name, no cap. π¦
β¨ SYNOPSIS β¨
Functions/Subroutines
subroutine dgemqr (side, trans, m, n, k, a, lda, t, tsize, c, ldc, work,
lwork, info)
DGEMQR
πΈ Function/Subroutine Documentation πΈ
π subroutine dgemqr
subroutine dgemqr (character side, character trans, integer m, integer n,
integer k, double precision, dimension( lda, * ) a, integer lda, double
precision, dimension( * ) t, integer tsize, double precision, dimension(
ldc, * ) c, integer ldc, double precision, dimension( * ) work, integer
lwork, integer info)
DGEMQR
DGEMQR π
π Purpose π
DGEMQR overwrites the general real M-by-N matrix C with:
SIDE = 'L' SIDE = 'R'
TRANS = 'N': Q * C C * Q
TRANS = 'T': Q**T * C C * Q**T
where Q is a real orthogonal matrix defined as the product of blocked elementary reflectors computed by tall skinny QR factorization (DGEQR). β¨
π«Ά Parameters π«Ά
SIDEβSIDEisCHARACTER*1;= 'L': apply Q or QT from the Left;= 'R': apply Q or QT from the Right. πTRANSβTRANSisCHARACTER*1;= 'N': No transpose, apply Q;= 'T': Transpose, apply Q**T. π₯MβMisINTEGER; the number of rows of the matrix A.M >=0. πNβNisINTEGER; the number of columns of the matrix C.N >= 0. πΈKβKisINTEGER; the number of elementary reflectors whose product defines the matrix Q. IfSIDE = 'L',M >= K >= 0; ifSIDE = 'R',N >= K >= 0. π¦AβAisDOUBLE PRECISIONarray, dimension(LDA,K). Part of the data structure to represent Q as returned byDGEQR. πLDAβLDAisINTEGER; the leading dimension of the array A. IfSIDE = 'L',LDA >= max(1,M); ifSIDE = 'R',LDA >= max(1,N). πTβTisDOUBLE PRECISIONarray, dimension(MAX(5,TSIZE)). Part of the data structure to represent Q as returned byDGEQR. πTSIZEβTSIZEisINTEGER; the dimension of the array T.TSIZE >= 5. βCβCisDOUBLE PRECISIONarray, dimension(LDC,N). On entry, the M-by-N matrix C. On exit, C is overwritten byQ*CorQ**T*CorC*Q**TorC*Q. πLDCβLDCisINTEGER; the leading dimension of the array C.LDC >= max(1,M). π§WORKβ (workspace)DOUBLE PRECISIONarray, dimension(MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the minimalLWORK. πLWORKβLWORKisINTEGER; the dimension of the array WORK.LWORK >= 1. IfLWORK = -1, then a workspace query is assumed. The routine only calculates the size of the WORK array, returns this value asWORK(1), and no error message related to WORK is issued byXERBLA. πINFOβINFOisINTEGER;= 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.
π₯ Further Details π₯
β οΈ These details are particular for this LAPACK implementation. Users should not take them for granted. These details may change in the future, and are not likely true for another LAPACK implementation. These details are relevant if one wants to try to understand the code. They are not part of the interface. π
In this version:
T(2): row block size (MB)
T(3): column block size (NB)
T(6:TSIZE): data structure needed for Q, computed by
DLATSQR or DGEQRT
Depending on the matrix dimensions M and N, and row and column block sizes MB and NB returned by ILAENV, DGEQR will use either DLATSQR (if the matrix is tall-and-skinny) or DGEQRT to compute the QR factorization.
This version of DGEMQR will use either DLAMTSQR or DGEMQRT to multiply matrix Q by another matrix.
Further Details in DLATMSQR or DGEMQRT. β¨
π Definition at line 173 of file dgemqr.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
k bye bestie β this page is from LAPACK Version 3.12.0, source SRC/dgemqr.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