SRC/zgebal.f(3)
π NAME π
SRC/zgebal.f β yes bestie, that's literally the file, and this whole page is its main character moment in the Library Functions Manual. π
β¨ SYNOPSIS β¨
Functions/Subroutines
subroutine zgebal (job, n, a, lda, ilo, ihi, scale, info)
ZGEBAL
π Function/Subroutine Documentation π
The icon herself:
subroutine zgebal (character job, integer n, complex*16, dimension( lda, * )
a, integer lda, integer ilo, integer ihi, double precision, dimension( *
) scale, integer info)
ZGEBAL
π― Purpose π―
Okay so ZGEBAL balances a general complex matrix A. This involves, first, permuting A by a similarity transformation to isolate eigenvalues in the first 1 to ILO-1 and last IHI+1 to N elements on the diagonal; and second, applying a diagonal similarity transformation to rows and columns ILO to IHI to make the rows and columns as close in norm as possible. Both steps are optional β choose your fighter. π«Ά
Balancing may reduce the 1-norm of the matrix, and improve the accuracy of the computed eigenvalues and/or eigenvectors. Periodt. π
π§ Parameters π§
JOBisCHARACTER*1and specifies the operations to be performed onA:'N'β none: simply setILO = 1,IHI = N,SCALE(I) = 1.0fori = 1,...,N;'P'β permute only;'S'β scale only;'B'β both permute and scale.
NisINTEGERβ the order of the matrixA.N >= 0. β¨AisCOMPLEX*16array, dimension(LDA,N). On entry, the input matrixA. On exit,Ais overwritten by the balanced matrix. IfJOB = 'N',Ais not referenced. See Further Details below. πLDAisINTEGERβ the leading dimension of the arrayA.LDA >= max(1,N). πILOisINTEGER. That's the whole lore, bestie. πIHIisINTEGER.ILOandIHIare set to integers such that on exitA(i,j) = 0ifi > jandj = 1,...,ILO-1orI = IHI+1,...,N. IfJOB = 'N'or'S',ILO = 1andIHI = N. π¦SCALEisDOUBLE PRECISIONarray, dimension(N). Details of the permutations and scaling factors applied toA. IfP(j)is the index of the row and column interchanged with row and columnjandD(j)is the scaling factor applied to row and columnj, then:
SCALE(j) = P(j) for j = 1,...,ILO-1
= D(j) for j = ILO,...,IHI
= P(j) for j = IHI+1,...,N.
The order in which the interchanges are made is N to IHI+1, then 1 to ILO-1. β
INFOisINTEGER:= 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 permutations consist of row and column interchanges which put the matrix in the form
( T1 X Y )
P A P = ( 0 B Z )
( 0 0 T2 )
where T1 and T2 are upper triangular matrices whose eigenvalues lie along the diagonal. The column indices ILO and IHI mark the starting and ending columns of the submatrix B. Balancing consists of applying a diagonal similarity transformation inv(D) * B * D to make the 1-norms of each row of B and its corresponding column nearly equal. The output matrix is
( T1 X*D Y )
( 0 inv(D)*B*D inv(D)*Z ).
( 0 0 T2 )
Information about the permutations P and the diagonal matrix D is returned in the vector SCALE. π«Ά
This subroutine is based on the EISPACK routine CBAL.
Modified by Tzu-Yi Chen, Computer Science Division, University of California at Berkeley, USA
Refactored by Evert Provoost, Department of Computer Science, KU Leuven, Belgium
π Definition at line 164 of file zgebal.f π
Definition at line 164 of file zgebal.f.
π οΈ Author π οΈ
Generated automatically by Doxygen for LAPACK from the source code.
π Later, bestie! This whole page is from LAPACK Version 3.12.0, filed as SRC/zgebal.f(3) β and yes, she ate. πβ¨
π¦ 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