TESTING/EIG/zgrqts.f(3)

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

🌸 NAME 🌸

TESTING/EIG/zgrqts.f β€” okay bestie, this is the page for that file, and the manual it belongs to is the Library Functions Manual. It's all about the zgrqts subroutine β€” a.k.a. the ZGRQTS function/subroutine situation. πŸ’…

✨ SYNOPSIS ✨

Functions/Subroutines

   Functions/Subroutines
       subroutine zgrqts (m, p, n, a, af, q, r, lda, taua, b, bf, z, t, bwk,
           ldb, taub, work, lwork, rwork, result)
           ZGRQTS

πŸ¦‹ Function/Subroutine Documentation πŸ¦‹

   subroutine zgrqts (integer m, integer p, integer n, complex*16, dimension(
       lda, * ) a, complex*16, dimension( lda, * ) af, complex*16, dimension(
       lda, * ) q, complex*16, dimension( lda, * ) r, integer lda, complex*16,
       dimension( * ) taua, complex*16, dimension( ldb, * ) b, complex*16,
       dimension( ldb, * ) bf, complex*16, dimension( ldb, * ) z, complex*16,
       dimension( ldb, * ) t, complex*16, dimension( ldb, * ) bwk, integer ldb,
       complex*16, dimension( * ) taub, complex*16, dimension( lwork ) work,
       integer lwork, double precision, dimension( * ) rwork, double precision,
       dimension( 4 ) result)
       ZGRQTS

🎯 Purpose

ZGRQTS tests ZGGRQF, which computes the GRQ factorization of an M-by-N matrix A and a P-by-N matrix B: A = R*Q and B = Z*T*Q.

πŸ” Parameters

  • M β€” M is INTEGER; the number of rows of the matrix A. Constraint: M >= 0.
  • P β€” P is INTEGER; the number of rows of the matrix B. Constraint: P >= 0.
  • N β€” N is INTEGER; the number of columns of the matrices A and B. Constraint: N >= 0.
  • A β€” A is COMPLEX*16 array, dimension (LDA,N); the M-by-N matrix A.
  • AF β€” AF is COMPLEX*16 array, dimension (LDA,N); details of the GRQ factorization of A and B, as returned by ZGGRQF, see CGGRQF for further details.
  • Q β€” Q is COMPLEX*16 array, dimension (LDA,N); the N-by-N unitary matrix Q.
  • R β€” R is COMPLEX*16 array, dimension (LDA,MAX(M,N)).
  • LDA β€” LDA is INTEGER; the leading dimension of the arrays A, AF, R and Q. Constraint: LDA >= max(M,N).
  • TAUA β€” TAUA is COMPLEX*16 array, dimension (min(M,N)); the scalar factors of the elementary reflectors, as returned by DGGQRC.
  • B β€” B is COMPLEX*16 array, dimension (LDB,N); on entry, the P-by-N matrix A.
  • BF β€” BF is COMPLEX*16 array, dimension (LDB,N); details of the GQR factorization of A and B, as returned by ZGGRQF, see CGGRQF for further details.
  • Z β€” Z is DOUBLE PRECISION array, dimension (LDB,P); the P-by-P unitary matrix Z.
  • T β€” T is COMPLEX*16 array, dimension (LDB,max(P,N)).
  • BWK β€” BWK is COMPLEX*16 array, dimension (LDB,N).
  • LDB β€” LDB is INTEGER; the leading dimension of the arrays B, BF, Z and T. Constraint: LDB >= max(P,N).
  • TAUB β€” TAUB is COMPLEX*16 array, dimension (min(P,N)); the scalar factors of the elementary reflectors, as returned by DGGRQF.
  • WORK β€” WORK is COMPLEX*16 array, dimension (LWORK).
  • LWORK β€” LWORK is INTEGER; the dimension of the array WORK, LWORK >= max(M,P,N)**2.
  • RWORK β€” RWORK is DOUBLE PRECISION array, dimension (M).
  • RESULT β€” RESULT is DOUBLE PRECISION array, dimension (4); the test ratios:
RESULT(1) = norm( R - A*Q' ) / ( MAX(M,N)*norm(A)*ULP)
RESULT(2) = norm( T*Q - Z'*B ) / (MAX(P,N)*norm(B)*ULP)
RESULT(3) = norm( I - Q'*Q ) / ( N*ULP )
RESULT(4) = norm( I - Z'*Z ) / ( P*ULP )

πŸ‘‘ Author

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

Definition at line 174 of file zgrqts.f.


πŸŽ€ Author πŸŽ€

Generated automatically by Doxygen for LAPACK from the source code.

mwah πŸ’‹ β€” signing off with the footer details: LAPACK, Version 3.12.0, TESTING/EIG/zgrqts.f(3). That's the whole vibe, bestie. 🫢

πŸ“¦ where this page comes from