SRC/slagv2.f(3)
π NAME π
okay bestie, this is SRC/slagv2.f from the Library Functions Manual β the name of the page, the moment, the whole vibe. π
β¨
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine slagv2 (a, lda, b, ldb, alphar, alphai, beta, csl, snl, csr,
snr)
SLAGV2 computes the Generalized Schur factorization of a real 2-by-2 matrix pencil (A,B) where B is upper triangular. No cap. π«Ά
π Function/Subroutine Documentation π
πΈ subroutine slagv2 πΈ
subroutine slagv2 (real, dimension( lda, * ) a, integer lda, real,
dimension( ldb, * ) b, integer ldb, real, dimension( 2 ) alphar, real,
dimension( 2 ) alphai, real, dimension( 2 ) beta, real csl, real snl,
real csr, real snr)
SLAGV2 computes the Generalized Schur factorization of a real 2-by-2 matrix pencil (A,B) where B is upper triangular. literally iconic.
π« Purpose
!>
!> SLAGV2 computes the Generalized Schur factorization of a real 2-by-2
!> matrix pencil (A,B) where B is upper triangular. This routine
!> computes orthogonal (rotation) matrices given by CSL, SNL and CSR,
!> SNR such that
!>
!> 1) if the pencil (A,B) has two real eigenvalues (include 0/0 or 1/0
!> types), then
!>
!> [ a11 a12 ] := [ CSL SNL ] [ a11 a12 ] [ CSR -SNR ]
!> [ 0 a22 ] [ -SNL CSL ] [ a21 a22 ] [ SNR CSR ]
!>
!> [ b11 b12 ] := [ CSL SNL ] [ b11 b12 ] [ CSR -SNR ]
!> [ 0 b22 ] [ -SNL CSL ] [ 0 b22 ] [ SNR CSR ],
!>
!> 2) if the pencil (A,B) has a pair of complex conjugate eigenvalues,
!> then
!>
!> [ a11 a12 ] := [ CSL SNL ] [ a11 a12 ] [ CSR -SNR ]
!> [ a21 a22 ] [ -SNL CSL ] [ a21 a22 ] [ SNR CSR ]
!>
!> [ b11 0 ] := [ CSL SNL ] [ b11 b12 ] [ CSR -SNR ]
!> [ 0 b22 ] [ -SNL CSL ] [ 0 b22 ] [ SNR CSR ]
!>
!> where b11 >= b22 > 0.
!>
!>
π§ Parameters
AβAis REAL array, dimension(LDA, 2). On entry, the 2 x 2 matrixA. On exit,Ais overwritten by the βA-partβ of the generalized Schur form. π¦LDAβLDAis INTEGER.THeleading dimension of the arrayA.LDA >= 2. yes, the source really spells it βTHeβ β we respect the lore.BβBis REAL array, dimension(LDB, 2). On entry, the upper triangular 2 x 2 matrixB. On exit,Bis overwritten by the βB-partβ of the generalized Schur form. πΈLDBβLDBis INTEGER.THeleading dimension of the arrayB.LDB >= 2.ALPHARβALPHARis REAL array, dimension(2).ALPHAIβALPHAIis REAL array, dimension(2).BETAβBETAis REAL array, dimension(2).(ALPHAR(k)+i*ALPHAI(k))/BETA(k)are the eigenvalues of the pencil(A,B),k=1,2,i = sqrt(-1). Note thatBETA(k)may be zero. important little detail, bestie.CSLβCSLis REAL. The cosine of the left rotation matrix.SNLβSNLis REAL. The sine of the left rotation matrix.CSRβCSRis REAL. The cosine of the right rotation matrix.SNRβSNRis REAL. The sine of the right rotation matrix.
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Contributors
Mark Fahey, Department of Mathematics, Univ. of Kentucky, USA.
Definition at line 155 of file slagv2.f.
πΈ Author πΈ
Generated automatically by Doxygen for LAPACK from the source code.
okay that's the whole page, bestie β this was LAPACK Version 3.12.0, source page SRC/slagv2.f(3). Go forth and slay those 2-by-2 pencils. π
β¨
π¦ 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