CSYSV_ROOK(3)
π CSYSV_ROOK(3) π
Okay bestie, welcome to the LAPACK Library Functions Manual page for CSYSV_ROOK. The page tag is /home/abui...sysv_rook.f(3) β that's the header/footer file vibe. This routine is iconic: it solves a complex symmetric linear system, and yes, you're gonna understand every parameter. π«Ά
πΈ NAME πΈ
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/csysv_rook.f β that's the source file this page is serving, periodt.
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine CSYSV_ROOKβ computes the solution to system of linear equationsA * X = Bfor SY matrices. Slay.
subroutine CSYSV_ROOK (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork,
info)
π Function/Subroutine Documentation π
β subroutine CSYSV_ROOK β
subroutine CSYSV_ROOK (character uplo, integer n, integer nrhs, complex,
dimension( lda, * ) a, integer lda, integer, dimension( * ) ipiv,
complex, dimension( ldb, * ) b, integer ldb, complex, dimension( * )
work, integer lwork, integer info)
CSYSV_ROOK computes the solution to system of linear equations A * X = B for SY matrices. That's the whole main character energy.
π₯ Purpose π₯
CSYSV_ROOK computes the solution to a complex 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.
CSYTRF_ROOK is called to compute the factorization of a complex symmetric matrix A using the bounded Bunch-Kaufman () diagonal pivoting method. (Yes, the empty () is literally there, iykyk.)
The factored form of A is then used to solve the system of equations A * X = B by calling CSYTRS_ROOK.
π Parameters π
UPLOβUPLOisCHARACTER*1.= 'U': the upper triangle ofAis stored.= 'L': the lower triangle ofAis stored.
NβNisINTEGER. It's the number of linear equations, i.e. the order of the matrixA. Constraint:N >= 0.NRHSβNRHSisINTEGER. It's the number of right hand sides, i.e. the number of columns of the matrixB. Constraint:NRHS >= 0.AβAisCOMPLEX array, dimension (LDA,N).- On entry, it's 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, this holds the block diagonal matrixDand the multipliers used to obtain the factorUorLfrom the factorizationA = U*D*U**TorA = L*D*L**Tas computed byCSYTRF_ROOK.
- On entry, it's the symmetric matrix
LDAβLDAisINTEGER. It's the leading dimension of the arrayA. Constraint:LDA >= max(1,N).IPIVβIPIVisINTEGER array, dimension (N). It holds details of the interchanges and the block structure ofD, as determined byCSYTRF_ROOK.- If
UPLO = 'U':- 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 interchanged, andD(k-1:k,k-1:k)is a 2-by-2 diagonal block.
- If
- If
UPLO = 'L':- 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 interchanged, andD(k:k+1,k:k+1)is a 2-by-2 diagonal block.
- If
- If
BβBisCOMPLEX array, dimension (LDB,NRHS).- On entry, it's the
N-by-NRHSright hand side matrixB. - On exit, if
INFO = 0, it's theN-by-NRHSsolution matrixX.
- On entry, it's the
LDBβLDBisINTEGER. It's the leading dimension of the arrayB. Constraint:LDB >= max(1,N).WORKβWORKisCOMPLEX array, dimension (MAX(1,LWORK)).- On exit, if
INFO = 0,WORK(1)returns the optimalLWORK.
- On exit, if
LWORKβLWORKisINTEGER. It's the length ofWORK. Constraint:LWORK >= 1, and for best performanceLWORK >= max(1,N*NB), whereNBis the optimal blocksize forCSYTRF_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.
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 csysv_rook.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
Okay bestie, that's the whole page. Sign-off source/version: LAPACK Version 3.12.0; file tag: /home/abui...sysv_rook.f(3); date: not printed on this page (so I'm not inventing one, periodt). Bye, slay, go solve that symmetric system. π
β¨
π¦ 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