ggsvp3(3)
okay bestie, welcome to ggsvp3(3) from the Library Functions Manual โ and yes, itโs giving โstep in ggsvdโ energy ๐
๐ธ NAME ๐ธ
ggsvp3 โ ggsvp3: step in ggsvd
โจ SYNOPSIS โจ
โจ Functions โจ
CGGSVP3โsubroutine cggsvp3 (jobu, jobv, jobq, m, p, n, a, lda, b, ldb, tola, tolb, k, l, u, ldu, v, ldv, q, ldq, iwork, rwork, tau, work, lwork, info)DGGSVP3โsubroutine dggsvp3 (jobu, jobv, jobq, m, p, n, a, lda, b, ldb, tola, tolb, k, l, u, ldu, v, ldv, q, ldq, iwork, tau, work, lwork, info)SGGSVP3โsubroutine sggsvp3 (jobu, jobv, jobq, m, p, n, a, lda, b, ldb, tola, tolb, k, l, u, ldu, v, ldv, q, ldq, iwork, tau, work, lwork, info)ZGGSVP3โsubroutine zggsvp3 (jobu, jobv, jobq, m, p, n, a, lda, b, ldb, tola, tolb, k, l, u, ldu, v, ldv, q, ldq, iwork, rwork, tau, work, lwork, info)
๐ Detailed Description ๐
No extra little summary here, bestie โ it jumps straight into the function docs.
๐ Function Documentation ๐
๐ subroutine cggsvp3 ๐
subroutine cggsvp3 (character jobu, character jobv, character jobq, integer
m, integer p, integer n, complex, dimension( lda, * ) a, integer lda,
complex, dimension( ldb, * ) b, integer ldb, real tola, real tolb,
integer k, integer l, complex, dimension( ldu, * ) u, integer ldu,
complex, dimension( ldv, * ) v, integer ldv, complex, dimension( ldq, *
) q, integer ldq, integer, dimension( * ) iwork, real, dimension( * )
rwork, complex, dimension( * ) tau, complex, dimension( * ) work,
integer lwork, integer info)
CGGSVP3
๐ Purpose ๐
Okay so CGGSVP3 computes unitary matrices U, V and Q such that:
N-K-L K L
U**H*A*Q = K ( 0 A12 A13 ) if M-K-L >= 0;
L ( 0 0 A23 )
M-K-L ( 0 0 0 )
N-K-L K L
= K ( 0 A12 A13 ) if M-K-L < 0;
M-K ( 0 0 A23 )
N-K-L K L
V**H*B*Q = L ( 0 0 B13 )
P-L ( 0 0 0 )
Where the K-by-K matrix A12 and L-by-L matrix B13 are nonsingular upper triangular; A23 is L-by-L upper triangular if M-K-L >= 0, otherwise A23 is (M-K)-by-L upper trapezoidal. K+L = the effective numerical rank of the (M+P)-by-N matrix (A**H,B**H)**H.
This decomposition is the preprocessing step for computing the Generalized Singular Value Decomposition (GSVD), see subroutine CGGSVD3.
๐งธ Parameters ๐งธ
JOBUโJOBUisCHARACTER*1;'U': Unitary matrixUis computed;'N':Uis not computed.JOBVโJOBVisCHARACTER*1;'V': Unitary matrixVis computed;'N':Vis not computed.JOBQโJOBQisCHARACTER*1;'Q': Unitary matrixQis computed;'N':Qis not computed.MโMisINTEGER. The number of rows of the matrixA.M >= 0.PโPisINTEGER. The number of rows of the matrixB.P >= 0.NโNisINTEGER. The number of columns of the matricesAandB.N >= 0.AโAisCOMPLEXarray, dimension(LDA,N). On entry, the M-by-N matrixA. On exit,Acontains the triangular (or trapezoidal) matrix described in the Purpose section.LDAโLDAisINTEGER. The leading dimension of the arrayA.LDA >= max(1,M).BโBisCOMPLEXarray, dimension(LDB,N). On entry, the P-by-N matrixB. On exit,Bcontains the triangular matrix described in the Purpose section.LDBโLDBisINTEGER. The leading dimension of the arrayB.LDB >= max(1,P).TOLAโTOLAisREAL.TOLBโTOLBisREAL.
TOLA and TOLB are the thresholds to determine the effective numerical rank of matrix B and a subblock of A. Generally, they are set to TOLA = MAX(M,N)*norm(A)*MACHEPS, TOLB = MAX(P,N)*norm(B)*MACHEPS. The size of TOLA and TOLB may affect the size of backward errors of the decomposition.
KโKisINTEGER.LโLisINTEGER. On exit,KandLspecify the dimension of the subblocks described in the Purpose section.K + L= effective numerical rank of(A**H,B**H)**H.UโUisCOMPLEXarray, dimension(LDU,M). IfJOBU = 'U',Ucontains the unitary matrixU. IfJOBU = 'N',Uis not referenced.LDUโLDUisINTEGER. The leading dimension of the arrayU.LDU >= max(1,M)ifJOBU = 'U';LDU >= 1otherwise.VโVisCOMPLEXarray, dimension(LDV,P). IfJOBV = 'V',Vcontains the unitary matrixV. IfJOBV = 'N',Vis not referenced.LDVโLDVisINTEGER. The leading dimension of the arrayV.LDV >= max(1,P)ifJOBV = 'V';LDV >= 1otherwise.QโQisCOMPLEXarray, dimension(LDQ,N). IfJOBQ = 'Q',Qcontains the unitary matrixQ. IfJOBQ = 'N',Qis not referenced.LDQโLDQisINTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N)ifJOBQ = 'Q';LDQ >= 1otherwise.IWORKโIWORKisINTEGERarray, dimension(N).RWORKโRWORKisREALarray, dimension(2*N).TAUโTAUisCOMPLEXarray, dimension(N).WORKโWORKisCOMPLEXarray, dimension(MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKโLWORKisINTEGER. The dimension of the arrayWORK.LWORK >= 1. IfLWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of theWORKarray, returns this value as the first entry of theWORKarray, and no error message related toLWORKis issued byXERBLA.INFOโINFOisINTEGER;= 0: successful exit;< 0: ifINFO = -i, the i-th argument had an illegal value.
๐ Author ๐
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
๐ฅ Further Details ๐ฅ
The subroutine uses LAPACK subroutine CGEQP3 for the QR factorization with column pivoting to detect the effective numerical rank of a matrix. It may be replaced by a better rank determination strategy.
CGGSVP3 replaces the deprecated subroutine CGGSVP.
Definition at line 275 of file cggsvp3.f.
๐ subroutine dggsvp3 ๐
subroutine dggsvp3 (character jobu, character jobv, character jobq, integer
m, integer p, integer n, double precision, dimension( lda, * ) a,
integer lda, double precision, dimension( ldb, * ) b, integer ldb,
double precision tola, double precision tolb, integer k, integer l,
double precision, dimension( ldu, * ) u, integer ldu, double precision,
dimension( ldv, * ) v, integer ldv, double precision, dimension( ldq, *
) q, integer ldq, integer, dimension( * ) iwork, double precision,
dimension( * ) tau, double precision, dimension( * ) work, integer
lwork, integer info)
DGGSVP3
๐ Purpose ๐
Okay so DGGSVP3 computes orthogonal matrices U, V and Q such that:
N-K-L K L
U**T*A*Q = K ( 0 A12 A13 ) if M-K-L >= 0;
L ( 0 0 A23 )
M-K-L ( 0 0 0 )
N-K-L K L
= K ( 0 A12 A13 ) if M-K-L < 0;
M-K ( 0 0 A23 )
N-K-L K L
V**T*B*Q = L ( 0 0 B13 )
P-L ( 0 0 0 )
Where the K-by-K matrix A12 and L-by-L matrix B13 are nonsingular upper triangular; A23 is L-by-L upper triangular if M-K-L >= 0, otherwise A23 is (M-K)-by-L upper trapezoidal. K+L = the effective numerical rank of the (M+P)-by-N matrix (A**T,B**T)**T.
This decomposition is the preprocessing step for computing the Generalized Singular Value Decomposition (GSVD), see subroutine DGGSVD3.
๐งธ Parameters ๐งธ
JOBUโJOBUisCHARACTER*1;'U': Orthogonal matrixUis computed;'N':Uis not computed.JOBVโJOBVisCHARACTER*1;'V': Orthogonal matrixVis computed;'N':Vis not computed.JOBQโJOBQisCHARACTER*1;'Q': Orthogonal matrixQis computed;'N':Qis not computed.MโMisINTEGER. The number of rows of the matrixA.M >= 0.PโPisINTEGER. The number of rows of the matrixB.P >= 0.NโNisINTEGER. The number of columns of the matricesAandB.N >= 0.AโAisDOUBLE PRECISIONarray, dimension(LDA,N). On entry, the M-by-N matrixA. On exit,Acontains the triangular (or trapezoidal) matrix described in the Purpose section.LDAโLDAisINTEGER. The leading dimension of the arrayA.LDA >= max(1,M).BBโDOUBLE PRECISIONarray, dimension(LDB,N). On entry, itโs theP-by-NmatrixB. On exit,Bcontains the triangular matrix described in the Purpose section. ๐ซถLDBโINTEGER. The leading dimension of the arrayB.LDB >= max(1,P). no cap.TOLAโDOUBLE PRECISION.TOLBโDOUBLE PRECISION.
TOLA and TOLB are the thresholds that determine the effective numerical rank of matrix B and a subblock of A. Generally, theyโre set to:
TOLA = MAX(M,N)*norm(A)*MACHEPS
TOLB = MAX(P,N)*norm(B)*MACHEPS
The size of TOLA and TOLB may affect the size of backward errors of the decomposition. ๐
KโINTEGER.LโINTEGER. On exit,KandLspecify the dimension of the subblocks described in the Purpose section.K + L= effective numerical rank of(A**T,B**T)**T. โจUโDOUBLE PRECISIONarray, dimension(LDU,M). IfJOBU = 'U',Ucontains the orthogonal matrixU. IfJOBU = 'N',Uis not referenced. ๐LDUโINTEGER. The leading dimension of the arrayU.LDU >= max(1,M)ifJOBU = 'U';LDU >= 1otherwise.VโDOUBLE PRECISIONarray, dimension(LDV,P). IfJOBV = 'V',Vcontains the orthogonal matrixV. IfJOBV = 'N',Vis not referenced. ๐ฆLDVโINTEGER. The leading dimension of the arrayV.LDV >= max(1,P)ifJOBV = 'V';LDV >= 1otherwise.QโDOUBLE PRECISIONarray, dimension(LDQ,N). IfJOBQ = 'Q',Qcontains the orthogonal matrixQ. IfJOBQ = 'N',Qis not referenced. ๐ธLDQโINTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N)ifJOBQ = 'Q';LDQ >= 1otherwise.IWORKโINTEGERarray, dimension(N).TAUโDOUBLE PRECISIONarray, dimension(N).WORKโDOUBLE PRECISIONarray, dimension(MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK. ๐LWORKโINTEGER. The dimension of the arrayWORK.LWORK >= 1.
If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. ๐
INFOโINTEGER.= 0: successful exit.< 0: ifINFO = -i, the i-th argument had an illegal value.
๐ Author ๐
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
๐ซถ Further Details: ๐ซถ
The subroutine uses LAPACK subroutine DGEQP3 for the QR factorization with column pivoting to detect the effective numerical rank of the a matrix. It may be replaced by a better rank determination strategy.
DGGSVP3 replaces the deprecated subroutine DGGSVP. periodt.
Definition at line 269 of file dggsvp3.f.
๐ subroutine sggsvp3 ๐
subroutine sggsvp3 (character jobu, character jobv, character jobq, integer
m, integer p, integer n, real, dimension( lda, * ) a, integer lda, real,
dimension( ldb, * ) b, integer ldb, real tola, real tolb, integer k,
integer l, real, dimension( ldu, * ) u, integer ldu, real, dimension(
ldv, * ) v, integer ldv, real, dimension( ldq, * ) q, integer ldq,
integer, dimension( * ) iwork, real, dimension( * ) tau, real,
dimension( * ) work, integer lwork, integer info)
SGGSVP3
๐ฏ Purpose: ๐ฏ
SGGSVP3 computes orthogonal matrices U, V and Q such that:
N-K-L K L
U**T*A*Q = K ( 0 A12 A13 ) if M-K-L >= 0;
L ( 0 0 A23 )
M-K-L ( 0 0 0 )
N-K-L K L
= K ( 0 A12 A13 ) if M-K-L < 0;
M-K ( 0 0 A23 )
N-K-L K L
V**T*B*Q = L ( 0 0 B13 )
P-L ( 0 0 0 )
where the K-by-K matrix A12 and L-by-L matrix B13 are nonsingular upper triangular; A23 is L-by-L upper triangular if M-K-L >= 0, otherwise A23 is (M-K)-by-L upper trapezoidal. K+L = the effective numerical rank of the (M+P)-by-N matrix (A**T,B**T)**T.
This decomposition is the preprocessing step for computing the Generalized Singular Value Decomposition (GSVD), see subroutine SGGSVD3. ๐
๐งฎ Parameters ๐งฎ
JOBUโCHARACTER*1.= 'U': Orthogonal matrixUis computed;= 'N':Uis not computed.
JOBVโCHARACTER*1.= 'V': Orthogonal matrixVis computed;= 'N':Vis not computed.
JOBQโCHARACTER*1.= 'Q': Orthogonal matrixQis computed;= 'N':Qis not computed.
MโINTEGER. The number of rows of the matrixA.M >= 0.PโINTEGER. The number of rows of the matrixB.P >= 0.NโINTEGER. The number of columns of the matricesAandB.N >= 0.AโREALarray, dimension(LDA,N). On entry, theM-by-NmatrixA. On exit,Acontains the triangular (or trapezoidal) matrix described in the Purpose section. ๐LDAโINTEGER. The leading dimension of the arrayA.LDA >= max(1,M).BโREALarray, dimension(LDB,N). On entry, theP-by-NmatrixB. On exit,Bcontains the triangular matrix described in the Purpose section.LDBโINTEGER. The leading dimension of the arrayB.LDB >= max(1,P).TOLAโREAL.TOLBโREAL.
TOLA and TOLB are the thresholds to determine the effective numerical rank of matrix B and a subblock of A. Generally, they are set to:
TOLA = MAX(M,N)*norm(A)*MACHEPS
TOLB = MAX(P,N)*norm(B)*MACHEPS
The size of TOLA and TOLB may affect the size of backward errors of the decomposition.
KโINTEGER.LโINTEGER. On exit,KandLspecify the dimension of the subblocks described in Purpose section.K + L= effective numerical rank of(A**T,B**T)**T. โจUโREALarray, dimension(LDU,M). IfJOBU = 'U',Ucontains the orthogonal matrixU. IfJOBU = 'N',Uis not referenced. ๐LDUโINTEGER. The leading dimension of the arrayU.LDU >= max(1,M)ifJOBU = 'U';LDU >= 1otherwise.VโREALarray, dimension(LDV,P). IfJOBV = 'V',Vcontains the orthogonal matrixV. IfJOBV = 'N',Vis not referenced. ๐ฆLDVโINTEGER. The leading dimension of the arrayV.LDV >= max(1,P)ifJOBV = 'V';LDV >= 1otherwise.QโREALarray, dimension(LDQ,N). IfJOBQ = 'Q',Qcontains the orthogonal matrixQ. IfJOBQ = 'N',Qis not referenced. ๐ธLDQโINTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N)ifJOBQ = 'Q';LDQ >= 1otherwise.IWORKโINTEGERarray, dimension(N).TAUโREALarray, dimension(N).WORKโREALarray, dimension(MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK. ๐LWORKโINTEGER. The dimension of the arrayWORK.LWORK >= 1.
If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. ๐
INFOโINTEGER.= 0: successful exit.< 0: ifINFO = -i, the i-th argument had an illegal value.
๐ Author ๐
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
๐ซถ Further Details: ๐ซถ
The subroutine uses LAPACK subroutine SGEQP3 for the QR factorization with column pivoting to detect the effective numerical rank of the a matrix. It may be replaced by a better rank determination strategy.
SGGSVP3 replaces the deprecated subroutine SGGSVP. periodt.
Definition at line 269 of file sggsvp3.f.
okay bestie, no intro needed โ here's the exact signature for ZGGSVP3, and yes you can copy-paste this, it's precious:
subroutine zggsvp3 (character jobu, character jobv, character jobq, integer
m, integer p, integer n, complex*16, dimension( lda, * ) a, integer lda,
complex*16, dimension( ldb, * ) b, integer ldb, double precision tola,
double precision tolb, integer k, integer l, complex*16, dimension( ldu,
* ) u, integer ldu, complex*16, dimension( ldv, * ) v, integer ldv,
complex*16, dimension( ldq, * ) q, integer ldq, integer, dimension( * )
iwork, double precision, dimension( * ) rwork, complex*16, dimension( *
) tau, complex*16, dimension( * ) work, integer lwork, integer info)
the routine is literally called ZGGSVP3 โ all caps, main character energy, periodt.
โจ Purpose โจ
ZGGSVP3 computes unitary matrices U, V and Q such that
N-K-L K L
U**H*A*Q = K ( 0 A12 A13 ) if M-K-L >= 0;
L ( 0 0 A23 )
M-K-L ( 0 0 0 )
N-K-L K L
= K ( 0 A12 A13 ) if M-K-L < 0;
M-K ( 0 0 A23 )
N-K-L K L
V**H*B*Q = L ( 0 0 B13 )
P-L ( 0 0 0 )
where the K-by-K matrix A12 and L-by-L matrix B13 are nonsingular upper triangular; A23 is L-by-L upper triangular if M-K-L >= 0, otherwise A23 is (M-K)-by-L upper trapezoidal. K+L = the effective numerical rank of the (M+P)-by-N matrix (A**H,B**H)**H.
This decomposition is the preprocessing step for computing the Generalized Singular Value Decomposition (GSVD), see subroutine ZGGSVD3.
๐ซถ Parameters ๐ซถ
okay, parameter dump time โ every single one matters, no skipping ๐
JOBUโCHARACTER*1.= 'U': unitary matrixUis computed;= 'N':Uis not computed.JOBVโCHARACTER*1.= 'V': unitary matrixVis computed;= 'N':Vis not computed.JOBQโCHARACTER*1.= 'Q': unitary matrixQis computed;= 'N':Qis not computed.MโINTEGER. The number of rows of the matrixA.M >= 0.PโINTEGER. The number of rows of the matrixB.P >= 0.NโINTEGER. The number of columns of the matricesAandB.N >= 0.AโCOMPLEX*16array, dimension(LDA,N). On entry, theM-by-NmatrixA. On exit,Acontains the triangular (or trapezoidal) matrix described in the Purpose section.LDAโINTEGER. The leading dimension of the arrayA.LDA >= max(1,M).BโCOMPLEX*16array, dimension(LDB,N). On entry, theP-by-NmatrixB. On exit,Bcontains the triangular matrix described in the Purpose section.LDBโINTEGER. The leading dimension of the arrayB.LDB >= max(1,P).TOLAโDOUBLE PRECISION.TOLBโDOUBLE PRECISION.TOLAandTOLBare the thresholds to determine the effective numerical rank of matrixBand a subblock ofA. Generally, they are set toTOLA = MAX(M,N)*norm(A)*MAZHEPS,TOLB = MAX(P,N)*norm(B)*MAZHEPS. The size ofTOLAandTOLBmay affect the size of backward errors of the decomposition.KโINTEGER.LโINTEGER. On exit,KandLspecify the dimension of the subblocks described in the Purpose section.K + L= effective numerical rank of(A**H,B**H)**H.UโCOMPLEX*16array, dimension(LDU,M). IfJOBU = 'U',Ucontains the unitary matrixU. IfJOBU = 'N',Uis not referenced.LDUโINTEGER. The leading dimension of the arrayU.LDU >= max(1,M)ifJOBU = 'U';LDU >= 1otherwise.VโCOMPLEX*16array, dimension(LDV,P). IfJOBV = 'V',Vcontains the unitary matrixV. IfJOBV = 'N',Vis not referenced.LDVโINTEGER. The leading dimension of the arrayV.LDV >= max(1,P)ifJOBV = 'V';LDV >= 1otherwise.QโCOMPLEX*16array, dimension(LDQ,N). IfJOBQ = 'Q',Qcontains the unitary matrixQ. IfJOBQ = 'N',Qis not referenced.LDQโINTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N)ifJOBQ = 'Q';LDQ >= 1otherwise.IWORKโINTEGERarray, dimension(N).RWORKโDOUBLE PRECISIONarray, dimension(2*N).TAUโCOMPLEX*16array, dimension(N).WORKโCOMPLEX*16array, dimension(MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKโINTEGER. The dimension of the arrayWORK.LWORK >= 1. IfLWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of theWORKarray, returns this value as the first entry of theWORKarray, and no error message related toLWORKis issued byXERBLA.INFOโINTEGER.= 0: successful exit;< 0: ifINFO = -i, thei-th argument had an illegal value.
๐ Author ๐
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
๐ฅ Further Details ๐ฅ
The subroutine uses LAPACK subroutine ZGEQP3 for the QR factorization with column pivoting to detect the effective numerical rank of the a matrix. It may be replaced by a better rank determination strategy.
ZGGSVP3 replaces the deprecated subroutine ZGGSVP.
deprecated means don't use the old one, bestie โ she's been replaced ๐
๐ Definition at line ๐
Definition at line 275 of file zggsvp3.f.
๐ Author (generated) ๐
Generated automatically by Doxygen for LAPACK from the source code.
that's the whole page, bestie โ LAPACK Version 3.12.0, page ggsvp3(3), signed sealed and slaying ๐๐
๐ฆ 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