SRC/chesv_rk.f(3)
π NAME π
Okay bestie, this is the manual page for SRC/chesv_rk.f(3), living inside the Library Functions Manual. It's a LAPACK routine, and it's here to solve linear systems with main-character energy. β¨
π¦ SYNOPSIS π¦
π§ Functions/Subroutines π§
subroutine chesv_rk (uplo, n, nrhs, a, lda, e, ipiv, b, ldb, work,
lwork, info)
CHESV_RK computes the solution to system of linear equations A * X = B for SY matrices. Slay.
π FUNCTION/SUBROUTINE DOCUMENTATION π
subroutine chesv_rk (character uplo, integer n, integer nrhs, complex,
dimension( lda, * ) a, integer lda, complex, dimension( * ) e, integer,
dimension( * ) ipiv, complex, dimension( ldb, * ) b, integer ldb,
complex, dimension( * ) work, integer lwork, integer info)
CHESV_RK computes the solution to system of linear equations A * X = B for SY matrices.
πΈ Purpose πΈ
Okay so here's the whole vibe: CHESV_RK computes the solution to a complex system of linear equations A * X = B, where A is an N-by-N Hermitian matrix and X and B are N-by-NRHS matrices. π
The bounded Bunch-Kaufman (rook) diagonal pivoting method is used to factor A as:
A = P*U*D*(U**H)*(P**T), if UPLO = 'U', or
A = P*L*D*(L**H)*(P**T), if UPLO = 'L',
where U (or L) is unit upper (or lower) triangular matrix, U**H (or L**H) is the conjugate of U (or L), P is a permutation matrix, P**T is the transpose of P, and D is Hermitian and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. No cap, that's the factorization tea. π«
CHETRF_RK is called to compute the factorization of a complex Hermitian matrix. The factored form of A is then used to solve the system of equations A * X = B by calling BLAS3 routine CHETRS_3. Periodt. π
π Parameters π
UPLOβUPLOisCHARACTER*1. It specifies whether the upper or lower triangular part of the Hermitian matrixAis stored:= 'U': Upper triangle ofAis stored;= 'L': Lower triangle ofAis stored.
NβNisINTEGER. The number of linear equations, i.e., the order of the matrixA.N >= 0.NRHSβNRHSisINTEGER. The number of right hand sides, i.e., the number of columns of the matrixB.NRHS >= 0.AβAisCOMPLEX array, dimension (LDA,N). On entry, the Hermitian matrixA.- If
UPLO = 'U': the leading N-by-N upper triangular part ofAcontains the upper triangular part of the matrixA, and the strictly lower triangular part ofAis not referenced. - If
UPLO = 'L': the leading N-by-N lower triangular part ofAcontains the lower triangular part of the matrixA, and the strictly upper triangular part ofAis not referenced.
- If
On exit, if INFO = 0, diagonal of the block diagonal matrix D and factors U or L as computed by CHETRF_RK:
- a) ONLY diagonal elements of the Hermitian block diagonal matrix
Don the diagonal ofA, i.e.D(k,k) = A(k,k); (superdiagonal (or subdiagonal) elements ofDare stored on exit in arrayE), and - b) If
UPLO = 'U': factorUin the superdiagonal part ofA. IfUPLO = 'L': factorLin the subdiagonal part ofA.
For more info see the description of CHETRF_RK routine.
LDAβLDAisINTEGER. The leading dimension of the arrayA.LDA >= max(1,N).EβEisCOMPLEX array, dimension (N). On exit, contains the output computed by the factorization routineCHETRF_RK, i.e. the superdiagonal (or subdiagonal) elements of the Hermitian block diagonal matrixDwith 1-by-1 or 2-by-2 diagonal blocks, where:- If
UPLO = 'U':E(i) = D(i-1,i),i=2:N,E(1)is set to 0; - If
UPLO = 'L':E(i) = D(i+1,i),i=1:N-1,E(N)is set to 0.
- If
π NOTE: For 1-by-1 diagonal blockD(k), where1 <= k <= N, the elementE(k)is set to 0 in bothUPLO = 'U'orUPLO = 'L'cases.
For more info see the description of CHETRF_RK routine.
IPIVβIPIVisINTEGER array, dimension (N). Details of the interchanges and the block structure ofD, as determined byCHETRF_RK.
For more info see the description of CHETRF_RK routine.
BβBisCOMPLEX array, dimension (LDB,NRHS). On entry, the N-by-NRHS right hand side matrixB. On exit, ifINFO = 0, the N-by-NRHS solution matrixX.LDBβLDBisINTEGER. The leading dimension of the arrayB.LDB >= max(1,N).WORKβWORKisCOMPLEX array, dimension ( MAX(1,LWORK) ). Work array used in the factorization stage. On exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKβLWORKisINTEGER. The length ofWORK.LWORK >= 1. For best performance of factorization stageLWORK >= max(1,N*NB), whereNBis the optimal blocksize forCHETRF_RK.
If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array for factorization stage, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA.
INFOβINFOisINTEGER.= 0: successful exit< 0: IfINFO = -k, the k-th argument had an illegal value> 0: IfINFO = k, the matrixAis singular, because:- If
UPLO = 'U': columnkin the upper triangular part ofAcontains all zeros. - If
UPLO = 'L': columnkin the lower triangular part ofAcontains all zeros.
- If
Therefore D(k,k) is exactly zero, and superdiagonal elements of column k of U (or subdiagonal elements of column k of L) are all zeros. The factorization has been completed, but the block diagonal matrix D is exactly singular, and division by zero will occur if it is used to solve a system of equations.
π¨ NOTE:INFOonly stores the first occurrence of a singularity, any subsequent occurrence of singularity is not stored inINFOeven though the factorization always completes.
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Contributors: π
- December 2016, 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 226 of file chesv_rk.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
β¨ That's the whole page, bestie. Footer tea: LAPACK, Version 3.12.0, source SRC/chesv_rk.f(3) β no date in the footer, just those deets. Mwah. π
π
π¦ 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