SRC/csysv.f(3)
π SRC/csysv.f β Library Functions Manual π
π NAME π
SRC/csysv.f β that's the icon we're talking about, bestie. Periodt. π
β¨ SYNOPSIS β¨
π§ Functions/Subroutines π§
subroutine csysv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork,
info)
β¨ CSYSV computes the solution to system of linear equations A * X = B for SY matrices β¨
π«Ά Function/Subroutine Documentation π«Ά
subroutine csysv (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 computes the solution to system of linear equations A * X = B for SY matrices β¨
π‘ Purpose
Okay bestie, here's the whole vibe: CSYSV 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. No cap. π¦
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. The factored form of A is then used to solve the system of equations A * X = B. π
π Parameters
UPLOβCHARACTER*1.= 'U': upper triangle ofAis stored;= 'L': lower triangle ofAis stored. πNβINTEGER. The number of linear equations, i.e., the order of the matrixA.N >= 0. β¨NRHSβINTEGER. The number of right hand sides, i.e., the number of columns of the matrixB.NRHS >= 0. πAβCOMPLEX array,dimension (LDA,N). On entry, the symmetric 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, ifINFO = 0, the block diagonal matrixDand the multipliers used to obtain the factorUorLfrom the factorizationA = U*D*U**TorA = L*D*L**Tas computed byCSYTRF. πLDAβINTEGER. The leading dimension of the arrayA.LDA >= max(1,N). π¦IPIVβINTEGER array,dimension (N). Details of the interchanges and the block structure ofD, as determined byCSYTRF. IfIPIV(k) > 0, then rows and columnskandIPIV(k)were interchanged, andD(k,k)is a1-by-1diagonal block. IfUPLO = 'U'andIPIV(k) = IPIV(k-1) < 0, then rows and columnsk-1and-IPIV(k)were interchanged andD(k-1:k,k-1:k)is a2-by-2diagonal block. IfUPLO = 'L'andIPIV(k) = IPIV(k+1) < 0, then rows and columnsk+1and-IPIV(k)were interchanged andD(k:k+1,k:k+1)is a2-by-2diagonal block. πBβCOMPLEX array,dimension (LDB,NRHS). On entry, theN-by-NRHSright hand side matrixB. On exit, ifINFO = 0, theN-by-NRHSsolution matrixX. πΈLDBβINTEGER. The leading dimension of the arrayB.LDB >= max(1,N). π«ΆWORKβCOMPLEX array,dimension (MAX(1,LWORK)). On exit, ifINFO = 0,WORK(1)returns the optimalLWORK. βLWORKβINTEGER. The length ofWORK.LWORK >= 1, and for best performanceLWORK >= max(1,N*NB), whereNBis the optimal blocksize forCSYTRF.for LWORK < N, TRS will be done with Level BLAS 2for LWORK >= N, TRS will be done with Level BLAS 3- 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βINTEGER.= 0: successful exit< 0: ifINFO = -i, the i-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.
Definition at line 169 of file csysv.f. π
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
Byeee π β LAPACK Version 3.12.0, source/footer SRC/csysv.f(3), and the footer didn't hand me a date so I'm not inventing one π.
π¦ 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