/home/abui...RC/cgges.f(3)
okay bestie, this page is from the Library Functions Manual and it lives at /home/abui...RC/cgges.f(3) β itβs giving classic LAPACK, but make it make sense. π«Ά
π NAME
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/cgges.f
β¨ SYNOPSIS
Functions/Subroutines
subroutine CGGES (jobvsl, jobvsr, sort, selctg, n, a, lda, b, ldb, sdim,
alpha, beta, vsl, ldvsl, vsr, ldvsr, work, lwork, rwork, bwork,
info)
CGGES computes the eigenvalues, the Schur form, and, optionally, the matrix of Schur vectors for GE matrices. β¨
π«Ά Function/Subroutine Documentation
subroutine CGGES
subroutine CGGES (character jobvsl, character jobvsr, character sort,
external selctg, integer n, complex, dimension( lda, * ) a, integer lda,
complex, dimension( ldb, * ) b, integer ldb, integer sdim, complex,
dimension( * ) alpha, complex, dimension( * ) beta, complex, dimension(
ldvsl, * ) vsl, integer ldvsl, complex, dimension( ldvsr, * ) vsr,
integer ldvsr, complex, dimension( * ) work, integer lwork, real,
dimension( * ) rwork, logical, dimension( * ) bwork, integer info)
CGGES computes the eigenvalues, the Schur form, and, optionally, the matrix of Schur vectors for GE matrices. π
Purpose
Okay so CGGES computes, for a pair of N-by-N complex nonsymmetric matrices (A,B), the generalized eigenvalues, the generalized complex Schur form (S, T), and optionally left and/or right Schur vectors (VSL and VSR). This gives the generalized Schur factorization:
(A,B) = ( (VSL)*S*(VSR)**H, (VSL)*T*(VSR)**H )
where (VSR)**H is the conjugate-transpose of VSR.
Optionally, it also orders the eigenvalues so that a selected cluster of eigenvalues appears in the leading diagonal blocks of the upper triangular matrix S and the upper triangular matrix T. The leading columns of VSL and VSR then form an unitary basis for the corresponding left and right eigenspaces (deflating subspaces). π¦
(If only the generalized eigenvalues are needed, use the driver CGGEV instead, which is faster.)
A generalized eigenvalue for a pair of matrices (A,B) is a scalar w or a ratio alpha/beta = w, such that A - w*B is singular. It is usually represented as the pair (alpha,beta), as there is a reasonable interpretation for beta=0, and even for both being zero.
A pair of matrices (S,T) is in generalized complex Schur form if S and T are upper triangular and, in addition, the diagonal elements of T are non-negative real numbers. π
Parameters
JOBVSLβ isCHARACTER*1.'N': do not compute the left Schur vectors;'V': compute the left Schur vectors. πJOBVSRβ isCHARACTER*1.'N': do not compute the right Schur vectors;'V': compute the right Schur vectors. πSORTβ isCHARACTER*1. Specifies whether or not to order the eigenvalues on the diagonal of the generalized Schur form.'N': Eigenvalues are not ordered;'S': Eigenvalues are ordered (seeSELCTG).SELCTGβ is aLOGICAL FUNCTIONof twoCOMPLEXarguments.SELCTGmust be declaredEXTERNALin the calling subroutine. IfSORT = 'N',SELCTGis not referenced. IfSORT = 'S',SELCTGis used to select eigenvalues to sort to the top left of the Schur form. An eigenvalueALPHA(j)/BETA(j)is selected ifSELCTG(ALPHA(j),BETA(j))is true.
β οΈ Caveat: a selected complex eigenvalue may no longer satisfySELCTG(ALPHA(j),BETA(j)) = .TRUE.after ordering, since ordering may change the value of complex eigenvalues (especially if the eigenvalue is ill-conditioned). In this caseINFOis set toN+2(SeeINFObelow).
Nβ isINTEGER. The order of the matricesA,B,VSL, andVSR.N >= 0.Aβ isCOMPLEX array, dimension (LDA, N). On entry, the first of the pair of matrices. On exit,Ahas been overwritten by its generalized Schur formS.LDAβ isINTEGER. The leading dimension ofA.LDA >= max(1,N).Bβ isCOMPLEX array, dimension (LDB, N). On entry, the second of the pair of matrices. On exit,Bhas been overwritten by its generalized Schur formT.LDBβ isINTEGER. The leading dimension ofB.LDB >= max(1,N).SDIMβ isINTEGER. IfSORT = 'N',SDIM = 0. IfSORT = 'S',SDIM = number of eigenvalues (after sorting) for which SELCTG is true.ALPHAβ isCOMPLEX array, dimension (N).BETAβ isCOMPLEX array, dimension (N). On exit,ALPHA(j)/BETA(j),j=1,...,N, will be the generalized eigenvalues.ALPHA(j),j=1,...,NandBETA(j),j=1,...,Nare the diagonals of the complex Schur form(A,B)output byCGGES. TheBETA(j)will be non-negative real.
Note: the quotientsALPHA(j)/BETA(j)may easily over- or underflow, andBETA(j)may even be zero. Thus, the user should avoid naively computing the ratioalpha/beta. However,ALPHAwill be always less than and usually comparable withnorm(A)in magnitude, andBETAalways less than and usually comparable withnorm(B).
VSLβ isCOMPLEX array, dimension (LDVSL,N). IfJOBVSL = 'V',VSLwill contain the left Schur vectors. Not referenced ifJOBVSL = 'N'.LDVSLβ isINTEGER. The leading dimension of the matrixVSL.LDVSL >= 1, and ifJOBVSL = 'V',LDVSL >= N.VSRβ isCOMPLEX array, dimension (LDVSR,N). IfJOBVSR = 'V',VSRwill contain the right Schur vectors. Not referenced ifJOBVSR = 'N'.LDVSRβ isINTEGER. The leading dimension of the matrixVSR.LDVSR >= 1, and ifJOBVSR = 'V',LDVSR >= N.WORKβ isCOMPLEX array, dimension (MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKβ isINTEGER. The dimension of the arrayWORK.LWORK >= max(1,2*N). For good performance,LWORKmust generally be larger. 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.RWORKβ isREAL array, dimension (8*N).BWORKβ isLOGICAL array, dimension (N). Not referenced ifSORT = 'N'.INFOβ isINTEGER.= 0: successful exit< 0: ifINFO = -i, the i-th argument had an illegal value.=1,...,N: The QZ iteration failed.(A,B)are not in Schur form, butALPHA(j)andBETA(j)should be correct forj=INFO+1,...,N.> N:=N+1: other than QZ iteration failed inCHGEQZ=N+2: after reordering, roundoff changed values of some complex eigenvalues so that leading eigenvalues in the Generalized Schur form no longer satisfySELCTG=.TRUE.This could also be caused due to scaling.=N+3: reordering failed inCTGSEN.
Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 267 of file cgges.f. π
πΈ Author
Generated automatically by Doxygen for LAPACK from the source code.
Footer vibes: this page is LAPACK Version 3.12.0, path /home/abui...RC/cgges.f(3) β mwah, bestie ππ
π¦ where this page comes from
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms