/home/abui.../ctrevc3.f(3)
π CTREVC3 β like, the whole entire manual page π
okay so bestie, welcome to /home/abui.../ctrevc3.f(3) from the Library Functions Manual β yes that's the manual name, don't @ me. this is the glow-up of the LAPACK docs for CTREVC3, and honestly? she's iconic. let's get into it β¨
πΈ NAME πΈ
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/ctrevc3.f
like, that's literally the whole path. she lives right there. periodt.
π¦ SYNOPSIS π¦
Functions/Subroutines
subroutine CTREVC3 (side, howmny, select, n, t, ldt, vl, ldvl, vr, ldvr,
mm, m, work, lwork, rwork, lrwork, info)
CTREVC3
π Function/Subroutine Documentation π
subroutine CTREVC3 (character side, character howmny, logical, dimension( *
) select, integer n, complex, dimension( ldt, * ) t, integer ldt,
complex, dimension( ldvl, * ) vl, integer ldvl, complex, dimension(
ldvr, * ) vr, integer ldvr, integer mm, integer m, complex, dimension( *
) work, integer lwork, real, dimension( * ) rwork, integer lrwork,
integer info)
CTREVC3
π Purpose:
!> !> CTREVC3 computes some or all of the right and/or left eigenvectors of !> a complex upper triangular matrix T. !> Matrices of this type are produced by the Schur factorization of !> a complex general matrix: A = Q*T*QH, as computed by CHSEQR. !> !> The right eigenvector x and the left eigenvector y of T corresponding !> to an eigenvalue w are defined by: !> !> T*x = w*x, (yH)T = w(yH) !> !> where yH denotes the conjugate transpose of the vector y. !> The eigenvalues are not input to this routine, but are read directly !> from the diagonal of T. !> !> This routine returns the matrices X and/or Y of right and left !> eigenvectors of T, or the products Q*X and/or Q*Y, where Q is an !> input matrix. If Q is the unitary factor that reduces a matrix A to !> Schur form T, then Q*X and Q*Y are the matrices of right and left !> eigenvectors of A. !> !> This uses a Level 3 BLAS version of the back transformation. !>
so basically: T is that girl (upper triangular, complex), and CTREVC3 is out here finding her eigenvectors. bestie the eigenvalues aren't even passed in β she just reads them straight off the diagonal of T. main character energy, no cap. and oop, the Level 3 BLAS back transformation? we love an efficient queen.
β¨ Parameters β¨
π SIDE
!> SIDE is CHARACTER*1 !> = 'R': compute right eigenvectors only; !> = 'L': compute left eigenvectors only; !> = 'B': compute both right and left eigenvectors. !>
'R'β right eigenvectors only, that's it'L'β left eigenvectors only, we're being selective'B'β both, because why not have it all π
π HOWMNY
!> HOWMNY is CHARACTER*1 !> = 'A': compute all right and/or left eigenvectors; !> = 'B': compute all right and/or left eigenvectors, !> backtransformed using the matrices supplied in !> VR and/or VL; !> = 'S': compute selected right and/or left eigenvectors, !> as indicated by the logical array SELECT. !>
'A'β all the eigenvectors, no picks'B'β all of them, but backtransformed using the matrices you supplied inVRand/orVLπ'S'β just the selected ones,SELECTdecides who gets in (it's giving VIP list)
π SELECT
!> SELECT is LOGICAL array, dimension (N) !> If HOWMNY = 'S', SELECT specifies the eigenvectors to be computed. !> The eigenvector corresponding to the j-th eigenvalue is !> computed if SELECT(j) = .TRUE.. !> Not referenced if HOWMNY = 'A' or 'B'. !>
SELECTisLOGICAL, dimension(N)- if
HOWMNY = 'S', this array is the whole vibe check β the j-th eigenvalue's eigenvector gets computed only ifSELECT(j) = .TRUE.β - lowkey not referenced at all if
HOWMNY = 'A'or'B'β she's off duty π
π N
!> N is INTEGER !> The order of the matrix T. N >= 0. !>
INTEGER, the order of T. N >= 0. fr fr.
π T
!> T is COMPLEX array, dimension (LDT,N) !> The upper triangular matrix T. T is modified, but restored !> on exit. !>
COMPLEX, dimension(LDT,N)- the upper triangular matrix
Therself - π heads up bestie:
Tis modified, but it gets restored on exit. she goes through a phase and comes back exactly the same, we respect it.
π LDT
!> LDT is INTEGER !> The leading dimension of the array T. LDT >= max(1,N). !>
INTEGER. leading dimension of T. LDT >= max(1,N). remember it.
π VL
!> VL is COMPLEX array, dimension (LDVL,MM) !> On entry, if SIDE = 'L' or 'B' and HOWMNY = 'B', VL must !> contain an N-by-N matrix Q (usually the unitary matrix Q of !> Schur vectors returned by CHSEQR). !> On exit, if SIDE = 'L' or 'B', VL contains: !> if HOWMNY = 'A', the matrix Y of left eigenvectors of T; !> if HOWMNY = 'B', the matrix Q*Y; !> if HOWMNY = 'S', the left eigenvectors of T specified by !> SELECT, stored consecutively in the columns !> of VL, in the same order as their !> eigenvalues. !> Not referenced if SIDE = 'R'. !>
COMPLEX, dimension(LDVL,MM)- on entry: if
SIDE = 'L'or'B'andHOWMNY = 'B',VLmust contain anN-by-NmatrixQ(usually the unitary matrixQof Schur vectors returned byCHSEQR) - on exit, if
SIDE = 'L'or'B',VLcontains:- if
HOWMNY = 'A'β the matrixYof left eigenvectors ofT - if
HOWMNY = 'B'β the matrixQ*Y - if
HOWMNY = 'S'β the left eigenvectors ofTspecified bySELECT, stored consecutively in the columns ofVL, in the same order as their eigenvalues
- if
- not referenced if
SIDE = 'R'π«
π LDVL
!> LDVL is INTEGER !> The leading dimension of the array VL. !> LDVL >= 1, and if SIDE = 'L' or 'B', LDVL >= N. !>
INTEGER, leading dimension of VL. LDVL >= 1, and if SIDE = 'L' or 'B', then LDVL >= N.
π VR
!> VR is COMPLEX array, dimension (LDVR,MM) !> On entry, if SIDE = 'R' or 'B' and HOWMNY = 'B', VR must !> contain an N-by-N matrix Q (usually the unitary matrix Q of !> Schur vectors returned by CHSEQR). !> On exit, if SIDE = 'R' or 'B', VR contains: !> if HOWMNY = 'A', the matrix X of right eigenvectors of T; !> if HOWMNY = 'B', the matrix Q*X; !> if HOWMNY = 'S', the right eigenvectors of T specified by !> SELECT, stored consecutively in the columns !> of VR, in the same order as their !> eigenvalues. !> Not referenced if SIDE = 'L'. !>
COMPLEX, dimension(LDVR,MM)- on entry: if
SIDE = 'R'or'B'andHOWMNY = 'B',VRmust contain anN-by-NmatrixQ(usually the unitary matrixQof Schur vectors returned byCHSEQR) - on exit, if
SIDE = 'R'or'B',VRcontains:- if
HOWMNY = 'A'β the matrixXof right eigenvectors ofT - if
HOWMNY = 'B'β the matrixQ*X - if
HOWMNY = 'S'β the right eigenvectors ofTspecified bySELECT, stored consecutively in the columns ofVR, in the same order as their eigenvalues
- if
- not referenced if
SIDE = 'L'π«
(literally twins with VL, just right-side flavored π)
π LDVR
!> LDVR is INTEGER !> The leading dimension of the array VR. !> LDVR >= 1, and if SIDE = 'R' or 'B', LDVR >= N. !>
INTEGER, leading dimension of VR. LDVR >= 1, and if SIDE = 'R' or 'B', then LDVR >= N.
π MM
!> MM is INTEGER !> The number of columns in the arrays VL and/or VR. MM >= M. !>
INTEGER. the number of columns in VL and/or VR. MM >= M. the ceiling of the situation, basically.
π M
!> M is INTEGER !> The number of columns in the arrays VL and/or VR actually !> used to store the eigenvectors. !> If HOWMNY = 'A' or 'B', M is set to N. !> Each selected eigenvector occupies one column. !>
INTEGER- the number of columns in
VLand/orVRactually used to store the eigenvectors (the real ones who showed up) - if
HOWMNY = 'A'or'B',Mis set toN - each selected eigenvector occupies exactly one column. one icon per row, iykyk.
π WORK
!> WORK is COMPLEX array, dimension (MAX(1,LWORK)) !>
COMPLEX array, dimension (MAX(1,LWORK)). the workspace. she works hard so you don't have to π«Ά
π LWORK
!> LWORK is INTEGER !> The dimension of array WORK. LWORK >= max(1,2*N). !> For optimum performance, LWORK >= N + 2*N*NB, where NB is !> the optimal blocksize. !> !> 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. !>
INTEGER, the dimension ofWORK- minimum:
LWORK >= max(1,2*N) - for optimum performance tho?
LWORK >= N + 2*N*NB, whereNBis the optimal blocksize π₯ - if
LWORK = -1, it's a workspace query β the routine only calculates the optimal size of theWORKarray, returns this value as the first entry of theWORKarray, and XERBLA issues no error message related toLWORK. so you can ask "how much do you need babe" without getting yelled at π₯Ί
π RWORK
!> RWORK is REAL array, dimension (LRWORK) !>
REAL array, dimension (LRWORK).
π LRWORK
!> LRWORK is INTEGER !> The dimension of array RWORK. LRWORK >= max(1,N). !> !> If LRWORK = -1, then a workspace query is assumed; the routine !> only calculates the optimal size of the RWORK array, returns !> this value as the first entry of the RWORK array, and no error !> message related to LRWORK is issued by XERBLA. !>
INTEGER, the dimension ofRWORKLRWORK >= max(1,N)- if
LRWORK = -1, same workspace-query deal: the routine only calculates the optimal size of theRWORKarray, returns this value as the first entry of theRWORKarray, and XERBLA issues no error message related toLRWORKπ
π INFO
!> INFO is INTEGER !> = 0: successful exit !> < 0: if INFO = -i, the i-th argument had an illegal value !>
INTEGER= 0β successful exit, we ate and left no crumbs β< 0β ifINFO = -i, the i-th argument had an illegal value π (go check argument numberi, bestie)
π Author π
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
like, the whole squad. academic royalty π
β Further Details: β
!> !> The algorithm used in this program is basically backward (forward) !> substitution, with scaling to make the the code robust against !> possible overflow. !> !> Each eigenvector is normalized so that the element of largest !> magnitude has magnitude 1; here the magnitude of a complex number !> (x,y) is taken to be |x| + |y|. !>
so the algorithm is basically backward (forward) substitution, with scaling to make the code robust against possible overflow π‘οΈ (and yes, the original really does say "the the" β we don't gatekeep typos here, it's camp)
and every eigenvector is normalized so the element of largest magnitude has magnitude 1. and for a complex number (x,y)? magnitude is taken to be |x| + |y|. noted. memorized. tattooed. π¦
π Definition π
Definition at line 242 of file ctrevc3.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code. (yes, a robot wrote the original. she still slays.)
okay that's the whole page bestie, hope you took notes ππ
LAPACK β Version 3.12.0 Β· /home/abui.../ctrevc3.f(3)
mwah, ily, go compute some eigenvectors π«Άβ¨π
π¦ 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