TESTING/LIN/drqt01.f(3)
πΈ NAME πΈ
TESTING/LIN/drqt01.f β bestie, this page is straight out of the Library Functions Manual, and itβs serving full Fortran testing-routine energy. π
β¨ SYNOPSIS β¨
π« Functions/Subroutines π«
Okay so the function roster is giving exactly one iconic subroutine:
subroutine drqt01 (m, n, a, af, q, r, lda, tau, work, lwork, rwork,
result)
DRQT01
π Function/Subroutine Documentation π
Hereβs the full signature in all its glory, no crumbs:
subroutine drqt01 (integer m, integer n, double precision, dimension( lda, *
) a, double precision, dimension( lda, * ) af, double precision,
dimension( lda, * ) q, double precision, dimension( lda, * ) r, integer
lda, double precision, dimension( * ) tau, double precision, dimension(
lwork ) work, integer lwork, double precision, dimension( * ) rwork,
double precision, dimension( * ) result)
DRQT01
Itβs DRQT01, periodt. π
π¦ Purpose π¦
Okay so DRQT01 tests DGERQF, which computes the RQ factorization of an m-by-n matrix A, and partially tests DORGRQ which forms the n-by-n orthogonal matrix Q.
DRQT01 compares R with A*Q', and checks that Q is orthogonal. Math vibe check unlocked. β¨
π Parameters π
MβINTEGER. The number of rows of the matrixA.M >= 0. Respect the bound, bestie.NβINTEGER. The number of columns of the matrixA.N >= 0.AβDOUBLE PRECISIONarray, dimension(LDA,N). Them-by-nmatrixA.AFβDOUBLE PRECISIONarray, dimension(LDA,N). Details of the RQ factorization ofA, as returned byDGERQF. SeeDGERQFfor further details.QβDOUBLE PRECISIONarray, dimension(LDA,N). Then-by-northogonal matrixQ.RβDOUBLE PRECISIONarray, dimension(LDA,max(M,N)).LDAβINTEGER. The leading dimension of the arraysA,AF,QandL.LDA >= max(M,N).TAUβDOUBLE PRECISIONarray, dimension(min(M,N)). The scalar factors of the elementary reflectors, as returned byDGERQF.WORKβDOUBLE PRECISIONarray, dimension(LWORK).LWORKβINTEGER. The dimension of the arrayWORK.RWORKβDOUBLE PRECISIONarray, dimension(max(M,N)).RESULTβDOUBLE PRECISIONarray, dimension(2). The test ratios:RESULT(1) = norm( R - A*Q' ) / ( N * norm(A) * EPS )RESULT(2) = norm( I - Q*Q' ) / ( N * EPS )
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 124 of file drqt01.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
Thatβs the whole page, bestie β cute little sign-off from LAPACK Version 3.12.0 for TESTING/LIN/drqt01.f(3). The footer doesnβt list a date, so no fake date energy here. π«Άβ¨
π¦ 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