TESTING/EIG/zgsvts3.f(3)
okay bestie, welcome to TESTING/EIG/zgsvts3.f(3) π β that's the page title, and it's living in the Library Functions Manual. This is the LAPACK reference page for the zgsvts3 subroutine, and we're gonna go through every detail like it's a group-chat receipt check. no cap. β¨
π NAME π
TESTING/EIG/zgsvts3.f β that's the name, periodt. Not me being a whole file path, but yes. π
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine zgsvts3 (m, p, n, a, af, lda, b, bf, ldb, u, ldu, v, ldv, q,
ldq, alpha, beta, r, ldr, iwork, work, lwork, rwork, result)
The label under it is ZGSVTS3, iconic. π
π Function/Subroutine Documentation π
subroutine zgsvts3 (integer m, integer p, integer n, complex*16, dimension(
lda, * ) a, complex*16, dimension( lda, * ) af, integer lda, complex*16,
dimension( ldb, * ) b, complex*16, dimension( ldb, * ) bf, integer ldb,
complex*16, dimension( ldu, * ) u, integer ldu, complex*16, dimension(
ldv, * ) v, integer ldv, complex*16, dimension( ldq, * ) q, integer ldq,
double precision, dimension( * ) alpha, double precision, dimension( * )
beta, complex*16, dimension( ldr, * ) r, integer ldr, integer,
dimension( * ) iwork, complex*16, dimension( lwork ) work, integer
lwork, double precision, dimension( * ) rwork, double precision,
dimension( 6 ) result)
ZGSVTS3 β main character energy, honestly. π
π Purpose π
!>
!> ZGSVTS3 tests ZGGSVD3, which computes the GSVD of an M-by-N matrix A
!> and a P-by-N matrix B:
!> U'*A*Q = D1*R and V'*B*Q = D2*R.
!>
π Parameters π
MβM is INTEGER. The number of rows of the matrixA.M >= 0. π«ΆPβP is INTEGER. The number of rows of the matrixB.P >= 0.NβN is INTEGER. The number of columns of the matricesAandB.N >= 0.AβA is COMPLEX*16 array, dimension (LDA,M). TheM-by-NmatrixA.AFβAF is COMPLEX*16 array, dimension (LDA,N). Details of the GSVD ofAandB, as returned byZGGSVD3, seeZGGSVD3for further details.LDAβLDA is INTEGER. The leading dimension of the arraysAandAF.LDA >= max( 1,M ).BβB is COMPLEX*16 array, dimension (LDB,P). On entry, theP-by-NmatrixB.BFβBF is COMPLEX*16 array, dimension (LDB,N). Details of the GSVD ofAandB, as returned byZGGSVD3, seeZGGSVD3for further details.LDBβLDB is INTEGER. The leading dimension of the arraysBandBF.LDB >= max(1,P).UβU is COMPLEX*16 array, dimension(LDU,M). TheM by Munitary matrixU.LDUβLDU is INTEGER. The leading dimension of the arrayU.LDU >= max(1,M).VβV is COMPLEX*16 array, dimension(LDV,M). TheP by Punitary matrixV.LDVβLDV is INTEGER. The leading dimension of the arrayV.LDV >= max(1,P).QβQ is COMPLEX*16 array, dimension(LDQ,N). TheN by Nunitary matrixQ.LDQβLDQ is INTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N).ALPHAβALPHA is DOUBLE PRECISION array, dimension (N).BETAβBETA is DOUBLE PRECISION array, dimension (N). The generalized singular value pairs ofAandB, the ``diagonal'' matricesD1andD2are constructed fromALPHAandBETA, see subroutineZGGSVD3for details.RβR is COMPLEX*16 array, dimension(LDQ,N). The upper triangular matrixR.LDRβLDR is INTEGER. The leading dimension of the arrayR.LDR >= max(1,N).IWORKβIWORK is INTEGER array, dimension (N).WORKβWORK is COMPLEX*16 array, dimension (LWORK).LWORKβLWORK is INTEGER. The dimension of the arrayWORK,LWORK >= max(M,P,N)*max(M,P,N).RWORKβRWORK is DOUBLE PRECISION array, dimension (max(M,P,N)).RESULTβRESULT is DOUBLE PRECISION array, dimension (6). The test ratios:
RESULT(1) = norm( U'*A*Q - D1*R ) / ( MAX(M,N)*norm(A)*ULP)
RESULT(2) = norm( V'*B*Q - D2*R ) / ( MAX(P,N)*norm(B)*ULP)
RESULT(3) = norm( I - U'*U ) / ( M*ULP )
RESULT(4) = norm( I - V'*V ) / ( P*ULP )
RESULT(5) = norm( I - Q'*Q ) / ( N*ULP )
RESULT(6) = 0 if ALPHA is in decreasing order;
= ULPINV otherwise.
π Author π
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Definition at line 206 of file zgsvts3.f. β exact, bestie. π¦
π¦ Author π¦
Generated automatically by Doxygen for LAPACK from the source code. β the bot did its thing, no cap. π€β¨
okay that's the whole thing bestie π source/version check: LAPACK Version 3.12.0, and the page is TESTING/EIG/zgsvts3.f(3). bye diva πβ¨
π¦ 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