SRC/dsysv_rook.f(3)
π SRC/dsysv_rook.f π
okay bestie, this is the Library Functions Manual page for SRC/dsysv_rook.f β LAPACK's symmetric-system solver has entered the chat, and she's giving very much main character energy. π«Ά
πΈ NAME πΈ
SRC/dsysv_rook.f
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine dsysv_rook (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info)
dsysv_rookβDSYSV_ROOKcomputes the solution to system of linear equationsA * X = Bfor SY matrices. π
π¦ Function/Subroutine Documentation π¦
subroutine dsysv_rook (character uplo, integer n, integer nrhs, double precision, dimension( lda, * ) a, integer lda, integer, dimension( * ) ipiv, double precision, dimension( ldb, * ) b, integer ldb, double precision, dimension( * ) work, integer lwork, integer info)
DSYSV_ROOK computes the solution to system of linear equations A * X = B for SY matrices. π₯
π Purpose π
Okay so <pink>DSYSV_ROOK</pink> computes the solution to a real system of linear equations
A * X = B,
where A is an N-by-N symmetric matrix and X and B are N-by-NRHS matrices. π
The diagonal pivoting method is used to factor A as
A = U * D * U**T, if UPLO = 'U', or
A = L * D * L**T, if UPLO = 'L',
where U (or L) is a product of permutation and unit upper (lower) triangular matrices, and D is symmetric and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. β¨
DSYTRF_ROOK is called to compute the factorization of a real symmetric matrix A using the bounded Bunch-Kaufman () diagonal pivoting method. π«Ά
The factored form of A is then used to solve the system of equations A * X = B by calling DSYTRS_ROOK. π₯
πΈ Parameters πΈ
UPLOβUPLOisCHARACTER*1.= 'U': Upper triangle ofAis stored.= 'L': Lower triangle ofAis stored. π
NβNisINTEGER.- The number of linear equations, i.e., the order of the matrix
A.N >= 0. π
- The number of linear equations, i.e., the order of the matrix
NRHSβNRHSisINTEGER.- The number of right hand sides, i.e., the number of columns of the matrix
B.NRHS >= 0. π
- The number of right hand sides, i.e., the number of columns of the matrix
AβAisDOUBLE PRECISIONarray, dimension(LDA,N).- On entry, the symmetric matrix
A. 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, if
INFO = 0, the block diagonal matrixDand the multipliers used to obtain the factorUorLfrom the factorizationA = U*D*U**TorA = L*D*L**Tas computed byDSYTRF_ROOK. π
- On entry, the symmetric matrix
LDAβLDAisINTEGER.- The leading dimension of the array
A.LDA >= max(1,N). β¨
- The leading dimension of the array
IPIVβIPIVisINTEGERarray, dimension(N).- Details of the interchanges and the block structure of
D, as determined byDSYTRF_ROOK. π - If
UPLO = 'U':- If
IPIV(k) > 0, then rows and columnskandIPIV(k)were interchanged andD(k,k)is a1-by-1diagonal 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 a2-by-2diagonal block. π
- If
- If
UPLO = 'L':- If
IPIV(k) > 0, then rows and columnskandIPIV(k)were interchanged andD(k,k)is a1-by-1diagonal 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 a2-by-2diagonal block. π
- If
- Details of the interchanges and the block structure of
BβBisDOUBLE PRECISIONarray, dimension(LDB,NRHS).- On entry, the
N-by-NRHSright hand side matrixB. - On exit, if
INFO = 0, theN-by-NRHSsolution matrixX. π¦
- On entry, the
LDBβLDBisINTEGER.- The leading dimension of the array
B.LDB >= max(1,N). π
- The leading dimension of the array
WORKβWORKisDOUBLE PRECISIONarray, dimension(MAX(1,LWORK)).- On exit, if
INFO = 0,WORK(1)returns the optimalLWORK. π
- On exit, if
LWORKβLWORKisINTEGER.- The length of
WORK.LWORK >= 1, and for best performanceLWORK >= max(1,N*NB), whereNBis the optimal blocksize forDSYTRF_ROOK. TRSwill be done with Level 2 BLAS.- If
LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of theWORKarray, returns this value as the first entry of theWORKarray, and no error message related toLWORKis issued byXERBLA. π₯
- The length of
INFOβINFOisINTEGER.= 0: successful exit.< 0: ifINFO = -i, thei-th argument had an illegal value.> 0: ifINFO = i,D(i,i)is exactly zero. The factorization has been completed, but the block diagonal matrixDis exactly singular, so the solution could not be computed. π
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Contributors π
- April 2012, 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 202 of file dsysv_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/dsysv_rook.f(3). 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