TESTING/LIN/crqt02.f(3)

πŸ“¦
version 3.12.1 Β· 3 versions
, in arch rolling

πŸ’… TESTING/LIN/crqt02.f πŸ’…

okay bestie, welcome to the Library Functions Manual β€” this page is literally TESTING/LIN/crqt02.f, and it's all about the crqt02 subroutine. no cap, it's a LAPACK testing routine and it's giving β€œI check the math so you don't have to.” πŸ’–

✨ NAME ✨

TESTING/LIN/crqt02.f β€” that's the file, bestie. πŸŽ€

πŸ¦‹ SYNOPSIS πŸ¦‹

🌼 Functions/Subroutines 🌼

subroutine crqt02 (m, n, k, a, af, q, r, lda, tau, work, lwork, rwork,
    result)

CRQT02 πŸ”₯

πŸ’– Function/Subroutine Documentation πŸ’–

subroutine crqt02 (integer m, integer n, integer k, complex, dimension( lda,
    * ) a, complex, dimension( lda, * ) af, complex, dimension( lda, * ) q,
    complex, dimension( lda, * ) r, integer lda, complex, dimension( * )
    tau, complex, dimension( lwork ) work, integer lwork, real, dimension( *
    ) rwork, real, dimension( * ) result)

CRQT02 ✨

🌸 Purpose 🌸

bestie, here's the tea: CRQT02 tests CUNGRQ, which generates an m-by-n matrix Q with orthonormal rows that is defined as the product of k elementary reflectors. πŸ‘‘

Given the RQ factorization of an m-by-n matrix A, CRQT02 generates the orthogonal matrix Q defined by the factorization of the last k rows of A; it compares R(m-k+1:m,n-m+1:n) with A(m-k+1:m,1:n)*Q(n-m+1:n,1:n)', and checks that the rows of Q are orthonormal. periodt. πŸ’…

πŸŽ€ Parameters πŸŽ€

  • M β€” M is INTEGER β€” the number of rows of the matrix Q to be generated. M >= 0. πŸ“
  • N β€” N is INTEGER β€” the number of columns of the matrix Q to be generated. N >= M >= 0. πŸ“
  • K β€” K is INTEGER β€” the number of elementary reflectors whose product defines the matrix Q. M >= K >= 0. πŸ“
  • A β€” A is COMPLEX array, dimension (LDA,N) β€” the m-by-n matrix A which was factorized by CRQT01. πŸ¦‹
  • AF β€” AF is COMPLEX array, dimension (LDA,N) β€” details of the RQ factorization of A, as returned by CGERQF. See CGERQF for further details. πŸ¦‹
  • Q β€” Q is COMPLEX array, dimension (LDA,N) β€” that's the array itself, no extra notes. πŸ’–
  • R β€” R is COMPLEX array, dimension (LDA,M) β€” the R array itself, living its best life. πŸ’–
  • LDA β€” LDA is INTEGER β€” the leading dimension of the arrays A, AF, Q and L. LDA >= N. πŸ‘‘
  • TAU β€” TAU is COMPLEX array, dimension (M) β€” the scalar factors of the elementary reflectors corresponding to the RQ factorization in AF. 🌈
  • WORK β€” WORK is COMPLEX array, dimension (LWORK) β€” that's the spec, bestie. ⭐
  • LWORK β€” LWORK is INTEGER β€” the dimension of the array WORK. ⭐
  • RWORK β€” RWORK is REAL array, dimension (M) β€” that's the whole spec. 🌸
  • RESULT β€” RESULT is REAL array, dimension (2) β€” the test ratios, and they are:
RESULT(1) = norm( R - A*Q' ) / ( N * norm(A) * EPS )
RESULT(2) = norm( I - Q*Q' ) / ( N * EPS )

those are the exact ratios, no cap. πŸ”₯

πŸ‘‘ Author πŸ‘‘

  • Univ. of Tennessee
  • Univ. of California Berkeley
  • Univ. of Colorado Denver
  • NAG Ltd.

Definition at line 134 of file crqt02.f. πŸ’€

🌈 Author 🌈

Generated automatically by Doxygen for LAPACK from the source code. 🫢


mwah πŸ’‹ β€” that's the whole page, bestie! the footer says LAPACK Version 3.12.0 and TESTING/LIN/crqt02.f(3); no date listed, so I'm not inventing one. πŸŽ€βœ¨

πŸ“¦ where this page comes from