SRC/zlahef_rook.f(3)
π NAME π
SRC/zlahef_rook.f β that's the page title, bestie, and it's from the Library Functions Manual. This is the Doxygen-generated manpage for the zlahef_rook Fortran subroutine, and we're gonna get into every single detail. β¨
β¨ SYNOPSIS β¨
Functions/Subroutines:
subroutine zlahef_rook (uplo, n, nb, kb, a, lda, ipiv, w, ldw, info)
π¦ FUNCTION/SUBROUTINE DOCUMENTATION π¦
subroutine zlahef_rook (character uplo, integer n, integer nb, integer kb,
complex*16, dimension( lda, * ) a, integer lda, integer, dimension( * )
ipiv, complex*16, dimension( ldw, * ) w, integer ldw, integer info)
π PURPOSE π
Okay so ZLAHEF_ROOK computes a partial factorization of a complex Hermitian matrix A using the bounded Bunch-Kaufman () diagonal pivoting method. Yes, the empty () is literally in the source β I'm not editing the vibes. π
The partial factorization has the form:
!>
!> A = ( I U12 ) ( A11 0 ) ( I 0 ) if UPLO = 'U', or:
!> ( 0 U22 ) ( 0 D ) ( U12**H U22**H )
!>
!> A = ( L11 0 ) ( D 0 ) ( L11**H L21**H ) if UPLO = 'L'
!> ( L21 I ) ( 0 A22 ) ( 0 I )
!>
The order of D is at most NB. The actual order is returned in the argument KB, and is either NB or NB-1, or N if N <= NB. Note that U**H denotes the conjugate transpose of U.
ZLAHEF_ROOK is an auxiliary routine called by ZHETRF_ROOK. It uses blocked code (calling Level 3 BLAS) to update the submatrix A11 (if UPLO = 'U') or A22 (if UPLO = 'L'). π«Ά
π PARAMETERS π
UPLO
UPLOisCHARACTER*1β specifies whether the upper or lower triangular part of the Hermitian matrixAis stored:= 'U':Upper triangular= 'L':Lower triangular
N
NisINTEGERβ the order of the matrixA.N >= 0.
NB
NBisINTEGERβ the maximum number of columns of the matrixAthat should be factored.NBshould be at least2to allow for 2-by-2 pivot blocks.
KB
KBisINTEGERβ the number of columns ofAthat were actually factored.KBis eitherNB-1orNB, orNifN <= NB.
A
AisCOMPLEX*16array, dimension(LDA,N)β on entry, the Hermitian matrixA. IfUPLO = 'U', the leadingn-by-nupper triangular part ofAcontains the upper triangular part of the matrixA, and the strictly lower triangular part ofAis not referenced. IfUPLO = 'L', the leadingn-by-nlower triangular part ofAcontains the lower triangular part of the matrixA, and the strictly upper triangular part ofAis not referenced. On exit,Acontains details of the partial factorization.
LDA
LDAisINTEGERβ the leading dimension of the arrayA.LDA >= max(1,N).
IPIV
IPIVisINTEGERarray, dimension(N)β details of the interchanges and the block structure ofD.- If
UPLO = 'U':- Only the last
KBelements ofIPIVare set. - If
IPIV(k) > 0, then rows and columnskandIPIV(k)were interchanged andD(k,k)is a 1-by-1 diagonal block. - If
IPIV(k) < 0andIPIV(k-1) < 0, then rows and columnskand-IPIV(k)were interchanged and rows and columnsk-1and-IPIV(k-1)were inerchaged,D(k-1:k,k-1:k)is a 2-by-2 diagonal block.
- Only the last
- If
UPLO = 'L':- Only the first
KBelements ofIPIVare set. - If
IPIV(k) > 0, then rows and columnskandIPIV(k)were interchanged andD(k,k)is a 1-by-1 diagonal block. - If
IPIV(k) < 0andIPIV(k+1) < 0, then rows and columnskand-IPIV(k)were interchanged and rows and columnsk+1and-IPIV(k+1)were inerchaged,D(k:k+1,k:k+1)is a 2-by-2 diagonal block.
- Only the first
- If
Yes, inerchaged is the source spelling β I'm keeping it exactly, no autocorrect energy here. π«Ά
W
WisCOMPLEX*16array, dimension(LDW,NB).
LDW
LDWisINTEGERβ the leading dimension of the arrayW.LDW >= max(1,N).
INFO
INFOisINTEGER= 0:successful exit> 0:ifINFO = k,D(k,k)is exactly zero. The factorization has been completed, but the block diagonal matrixDis exactly singular.
π AUTHOR π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
πΈ CONTRIBUTORS: πΈ
November 2013, Igor Kozachenko,
Computer Science Division,
University of California, Berkeley
September 2007, Sven Hammarling, Nicholas J. Higham, Craig Lucas,
School of Mathematics,
University of Manchester
Definition at line 182 of file zlahef_rook.f.
π AUTHOR π
Generated automatically by Doxygen for LAPACK from the source code.
And that's the whole page, bestie! Footer vibes: LAPACK Version 3.12.0, source SRC/zlahef_rook.f(3). The footer doesn't list a separate date, so no invented date from me β just the version and source, periodt. πβ¨π
π¦ 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