TESTING/LIN/sqlt03.f(3)

📦
version 3.12.1 · 3 versions
, in arch rolling

💖 TESTING/LIN/sqlt03.f 💖

okay so bestie, this is the LAPACK manual page for TESTING/LIN/sqlt03.f — a Fortran test subroutine situation, and it's honestly giving “math girlie runs the vibe check on matrix multiplication.” 🧚✨

✨ NAME ✨

TESTING/LIN/sqlt03.f — the file, the legend, the whole SQLT03 moment. 💅

🌸 SYNOPSIS 🌸

Functions/Subroutines

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

🫶 Function/Subroutine Documentation 🫶

subroutine sqlt03 (integer m, integer n, integer k, real, dimension( lda, * ) af, real, dimension( lda, * ) c, real, dimension( lda, * ) cc, real, dimension( lda, * ) q, integer lda, real, dimension( * ) tau, real, dimension( lwork ) work, integer lwork, real, dimension( * ) rwork, real, dimension( * ) result)
SQLT03

🎀 Purpose 🎀

SQLT03 tests SORMQL, which computes Q*C, Q'*C, C*Q or C*Q'. 🦋

It compares the results of a call to SORMQL with the results of forming Q explicitly by a call to SORGQL and then performing matrix multiplication by a call to SGEMM. no cap, that's the whole tea. ☕✨

💖 Parameters 💖

  • M — M is INTEGER; the order of the orthogonal matrix Q. M >= 0. 👑
  • N — N is INTEGER; the number of rows or columns of the matrix C; C is m-by-n if Q is applied from the left, or n-by-m if Q is applied from the right. N >= 0. 🌈
  • K — K is INTEGER; the number of elementary reflectors whose product defines the orthogonal matrix Q. M >= K >= 0. 💫
  • AF — AF is REAL array, dimension (LDA,N); details of the QL factorization of an m-by-n matrix, as returned by SGEQLF. See SGEQLF for further details. 🎀
  • C — C is REAL array, dimension (LDA,N). 🍓
  • CC — CC is REAL array, dimension (LDA,N). 🍓
  • Q — Q is REAL array, dimension (LDA,M). 💜
  • LDA — LDA is INTEGER; the leading dimension of the arrays AF, C, CC, and Q. 🔥
  • TAU — TAU is REAL array, dimension (min(M,N)); the scalar factors of the elementary reflectors corresponding to the QL factorization in AF. 🦋
  • WORK — WORK is REAL 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 m-by-m orthogonal matrix Q. 🫶

the formulas are exactly these — yes, bestie, literally copy them exactly:

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 sqlt03.f. 💀✨

🌈 Author 🌈

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

xoxo, bestie 💋 — this whole page is LAPACK Version 3.12.0, footer path TESTING/LIN/sqlt03.f(3), and it was generated automatically by Doxygen for LAPACK from the source code. 🫶✨

📦 where this page comes from