TESTING/LIN/clqt03.f(3)

🌸 NAME 🌸

TESTING/LIN/clqt03.f

Okay bestie, this is the Library Functions Manual page for TESTING/LIN/clqt03.f(3) — and it's giving "Fortran test subroutine for CUNMLQ" in the most iconic way. 💅✨

✨ SYNOPSIS ✨

Functions/Subroutines 🦋

subroutine clqt03 (m, n, k, af, c, cc, q, lda, tau, work, lwork, rwork, result)

CLQT03

💖 Function/Subroutine Documentation 💖

subroutine clqt03 🌈

subroutine clqt03 (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)

CLQT03

Purpose 🎀

CLQT03 tests CUNMLQ, which computes Q*C, Q'*C, C*Q or C*Q'. No cap. 🫶

CLQT03 compares the results of a call to CUNMLQ with the results of forming Q explicitly by a call to CUNGLQ and then performing matrix multiplication by a call to CGEMM. It's literally comparing the shortcut with the full main-character construction. 👑

Parameters 🍓

• M — M is INTEGER. The number of rows or columns of the matrix C; C is n-by-m if Q is applied from the left, or m-by-n if Q is applied from the right. M >= 0.
• N — N is INTEGER. The order of the orthogonal matrix Q. N >= 0.
• K — K is INTEGER. The number of elementary reflectors whose product defines the orthogonal matrix Q. N >= K >= 0.
• AF — AF is COMPLEX array, dimension (LDA,N). Details of the LQ factorization of an m-by-n matrix, as returned by CGELQF. See CGELQF for further details.
• C — C is COMPLEX array, dimension (LDA,N).
• CC — CC is COMPLEX array, dimension (LDA,N).
• Q — Q is COMPLEX array, dimension (LDA,N).
• LDA — LDA is INTEGER. The leading dimension of the arrays AF, C, CC, and Q.
• TAU — TAU is COMPLEX array, dimension (min(M,N)). The scalar factors of the elementary reflectors corresponding to the LQ factorization in AF.
• WORK — WORK is COMPLEX array, dimension (LWORK).
• LWORK — LWORK is INTEGER. The length of WORK. LWORK must be at least M, and should be M*NB, where NB is the blocksize for this environment.
• RWORK — RWORK is REAL array, dimension (M).
• RESULT — RESULT is REAL array, dimension (4). The test ratios compare two techniques for multiplying a random matrix C by an n-by-n orthogonal matrix Q.

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 )

Author 💜

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

Definition at line 134 of file clqt03.f.

Author 🤖

Generated automatically by Doxygen for LAPACK from the source code.

---

Bye bestie! 💅 This page is from LAPACK, Version 3.12.0, at TESTING/LIN/clqt03.f(3) — and the footer has no date, so we're not inventing one. Slay responsibly. 🌈✨