TESTING/LIN/cqrt03.f(3)
NAME
TESTING/LIN/cqrt03.f β bestie, this is the CQRT03 test routine page, and it's brought to you by the Library Functions Manual π
β¨
SYNOPSIS
Functions/Subroutines
subroutine cqrt03 (m, n, k, af, c, cc, q, lda, tau, work, lwork, rwork,
result)
CQRT03
π§ͺ Function/Subroutine Documentation π§ͺ
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
π― Purpose:
Okay so CQRT03 tests CUNMQR, which computes Q*C, Q'*C, C*Q or C*Q' π
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. That's the whole plot, no cap π«Ά
πΈ Parameters πΈ
MβM is INTEGER. It's the order of the orthogonal matrixQ.M >= 0. πNβN is 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βK is INTEGER. The number of elementary reflectors whose product defines the orthogonal matrixQ.M >= K >= 0. πAFβAF is COMPLEX array, dimension (LDA,N). Details of the QR factorization of anm-by-nmatrix, as returned byCGEQRF. SeeCGEQRFfor further details. π¦CβC is COMPLEX array, dimension (LDA,N). She's the matrixC, main character energy πCCβCC is COMPLEX array, dimension (LDA,N). AnotherCOMPLEXarray of dimension(LDA,N), periodt πQβQ is COMPLEX array, dimension (LDA,M). The orthogonal matrixQgets her own array, as she should πLDAβLDA is INTEGER. The leading dimension of the arraysAF,C,CC, andQ. π₯TAUβTAU is COMPLEX array, dimension (min(M,N)). The scalar factors of the elementary reflectors corresponding to the QR factorization inAF. πWORKβWORK is COMPLEX array, dimension (LWORK). Workspace says hi πLWORKβLWORK is INTEGER. The length ofWORK.LWORKmust be at leastM, and should beM*NB, whereNBis the blocksize for this environment. βRWORKβRWORK is REAL array, dimension (M). Real array, real useful, real(M)πRESULTβRESULT is 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.
Yep, that's literally where she's defined: line 134 of file cqrt03.f πβ¨
Generated automatically by Doxygen for LAPACK from the source code. LAPACK Version 3.12.0 Β· TESTING/LIN/cqrt03.f(3) β later, bestie! ππ«Ά
π¦ 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