CQRT03(3)
π CQRT03(3) π
okay so this page is from the Library Functions Manual, and it's serving pure LAPACK testing-subroutine energy. no cap, it's a CQRT03 page and it wants you to know exactly what it does π
β¨ NAME β¨
the name here is literally this file path, bestie:
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/cqrt03.f
β¨ SYNOPSIS β¨
Functions/Subroutines
subroutine CQRT03 (m, n, k, af, c, cc, q, lda, tau, work, lwork, rwork,
result)
CQRT03 β that's the whole vibe π«Ά
π Function/Subroutine Documentation π
the subroutine signature is giving main-character energy:
subroutine CQRT03 (integer m, integer n, integer k, complex, dimension( lda,
* ) af, complex, dimension( lda, * ) c, complex, dimension( lda, * ) cc,
complex, dimension( lda, * ) q, integer lda, complex, dimension( * )
tau, complex, dimension( lwork ) work, integer lwork, real, dimension( *
) rwork, real, dimension( * ) result)
CQRT03 again, obviously. we love a consistent queen π
Purpose
ok so CQRT03 tests CUNMQR, which computes Q*C, Q'*C, C*Q or C*Q'.
and then CQRT03 compares the results of a call to CUNMQR with the results of forming Q explicitly by a call to CUNGQR and then performing matrix multiplication by a call to CGEMM. literally the whole point π
Parameters
MβMis INTEGER. The order of the orthogonal matrixQ.M >= 0. β¨NβNis INTEGER. The number of rows or columns of the matrixC;Cism-by-nifQis applied from the left, orn-by-mifQis applied from the right.N >= 0. π¦KβKis INTEGER. The number of elementary reflectors whose product defines the orthogonal matrixQ.M >= K >= 0. πAFβAFis COMPLEX array, dimension(LDA,N). Details of the QR factorization of anm-by-nmatrix, as returned byCGEQRF. SeeCGEQRFfor further details. πCβCis COMPLEX array, dimension(LDA,N). that's the whole note, no extra lore πCCβCCis COMPLEX array, dimension(LDA,N). yep, again π«ΆQβQis COMPLEX array, dimension(LDA,M). iconic array behavior πLDAβLDAis INTEGER. The leading dimension of the arraysAF,C,CC, andQ. βTAUβTAUis COMPLEX array, dimension(min(M,N)). The scalar factors of the elementary reflectors corresponding to the QR factorization inAF. πWORKβWORKis COMPLEX array, dimension(LWORK). short and sweet πLWORKβLWORKis INTEGER. The length ofWORK.LWORKmust be at leastM, and should beM*NB, whereNBis the blocksize for this environment. π₯RWORKβRWORKis REAL array, dimension(M). real ones know πRESULTβRESULTis REAL array, dimension(4). The test ratios compare two techniques for multiplying a random matrixCby anm-by-morthogonal matrixQ.
RESULT(1) = norm( Q*C - Q*C ) / ( M * norm(C) * EPS )
RESULT(2) = norm( C*Q - C*Q ) / ( M * norm(C) * EPS )
RESULT(3) = norm( Q'*C - Q'*C )/ ( M * norm(C) * EPS )
RESULT(4) = norm( C*Q' - C*Q' )/ ( M * norm(C) * EPS )
Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 134 of file cqrt03.f.
Author
Generated automatically by Doxygen for LAPACK from the source code.
π byeeee, bestie! this footer/source situation is LAPACK Version 3.12.0, path /home/abui...IN/cqrt03.f(3). there's no explicit date line in the footer, so I'm not inventing one π. and yes, it was generated automatically by Doxygen for LAPACK from the source code. π«Άβ¨
π¦ where this page comes from
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms