TESTING/LIN/crqt03.f(3)
π NAME π
Okay bestie, this page is for TESTING/LIN/crqt03.f in the LAPACK manual β the whole title/manual-name thing is folded right here near the top, so we are not copying that header line like an NPC. It's all about CRQT03, a test subroutine, and it's giving "I verify your RQ vibes" energy. π¦
β¨ SYNOPSIS β¨
πΈ Functions/Subroutines
subroutine crqt03 (m, n, k, af, c, cc, q, lda, tau, work, lwork, rwork,
result)
CRQT03
π¦ Function/Subroutine Documentation
subroutine crqt03 (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)
CRQT03
π Purpose:
CRQT03 is the bestie that tests CUNMRQ, which computes Q*C, Q'*C, C*Q or C*Q'. No cap.
It compares the results of a call to CUNMRQ with the results of forming Q explicitly by a call to CUNGRQ and then performing matrix multiplication by a call to CGEMM. Iconic cross-check behavior, honestly. β¨
π Parameters
MβMisINTEGER. It's the number of rows or columns of the matrixC;Cisn-by-mifQis applied from the left, orm-by-nifQis applied from the right.M >= 0.NβNisINTEGER. The order of the orthogonal matrixQ.N >= 0.KβKisINTEGER. The number of elementary reflectors whose product defines the orthogonal matrixQ.N >= K >= 0.AFβAFisCOMPLEX array, dimension (LDA,N). Details of the RQ factorization of anm-by-nmatrix, as returned byCGERQF. SeeCGERQFfor further details.CβCisCOMPLEX array, dimension (LDA,N).CCβCCisCOMPLEX array, dimension (LDA,N).QβQisCOMPLEX array, dimension (LDA,N).LDAβLDAisINTEGER. The leading dimension of the arraysAF,C,CC, andQ.TAUβTAUisCOMPLEX array, dimension (min(M,N)). The scalar factors of the elementary reflectors corresponding to the RQ factorization inAF.WORKβWORKisCOMPLEX array, dimension (LWORK).LWORKβLWORKisINTEGER. The length ofWORK.LWORKmust be at leastM, and should beM*NB, whereNBis the blocksize for this environment.RWORKβRWORKisREAL array, dimension (M).RESULTβRESULTisREAL array, dimension (4). The test ratios compare two techniques for multiplying a random matrixCby ann-by-northogonal matrixQ.
RESULT(1) = norm( Q*C - Q*C ) / ( N * norm(C) * EPS )
RESULT(2) = norm( C*Q - C*Q ) / ( N * norm(C) * EPS )
RESULT(3) = norm( Q'*C - Q'*C )/ ( N * norm(C) * EPS )
RESULT(4) = norm( C*Q' - C*Q' )/ ( N * norm(C) * EPS )
periodt. π
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Definition at line 134 of file crqt03.f.
π Author
Generated automatically by Doxygen for LAPACK from the source code.
Cute sign-off time, bestie: this footer situation is LAPACK, Version 3.12.0, source page TESTING/LIN/crqt03.f(3) β and no date is listed in this footer, so I'm not inventing one, okay? πβ¨ππ¦
π¦ 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