CSYSVX(3)
π CSYSVX(3) β Library Functions Manual π
okay so bestie, welcome to CSYSVX(3) from the Library Functions Manual π
this is the whole LAPACK symmetric-matrix situation, and we are gonna get through every single detail together, no cap.
π NAME π
the original NAME section is literally this path, and yes it's giving very "generated by the build system" energy:
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/csysvx.f
β¨ SYNOPSIS β¨
π§ Functions/Subroutines π§
subroutine CSYSVX (fact, uplo, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb,
x, ldx, rcond, ferr, berr, work, lwork, rwork, info)
CSYSVX computes the solution to system of linear equations A * X = B for SY matrices π
π¦ Function/Subroutine Documentation π¦
subroutine CSYSVX (character fact, character uplo, integer n, integer nrhs,
complex, dimension( lda, * ) a, integer lda, complex, dimension( ldaf, *
) af, integer ldaf, integer, dimension( * ) ipiv, complex, dimension(
ldb, * ) b, integer ldb, complex, dimension( ldx, * ) x, integer ldx,
real rcond, real, dimension( * ) ferr, real, dimension( * ) berr,
complex, dimension( * ) work, integer lwork, real, dimension( * ) rwork,
integer info)
CSYSVX computes the solution to system of linear equations A * X = B for SY matrices πΈ
π― Purpose
okay so CSYSVX uses the diagonal pivoting factorization to compute 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 π«
error bounds on the solution and a condition estimate are also provided, periodt.
π Description
the following steps are performed, bestie, and yes this is the whole main-character sequence:
- If
FACT = 'N', the diagonal pivoting method is used to factorA. The form of the factorization is:
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 π
- If some
D(i,i)=0, so thatDis exactly singular, then the routine returns withINFO = i. Otherwise, the factored form ofAis used to estimate the condition number of the matrixA. If the reciprocal of the condition number is less than machine precision,INFO = N+1is returned as a warning, but the routine still goes on to solve forXand compute error bounds as described below π - The system of equations is solved for
Xusing the factored form ofA. - Iterative refinement is applied to improve the computed solution matrix and calculate error bounds and backward error estimates for it π¦
π Parameters
one parameter at a time, bestie, and yes every single one is here:
FACTβFACT is CHARACTER*1. it specifies whether or not the factored form ofAhas been supplied on entry:= 'F': on entry,AFandIPIVcontain the factored form ofA.A,AFandIPIVwill not be modified.= 'N': the matrixAwill be copied toAFand factored.
UPLOβUPLO is CHARACTER*1:= 'U': upper triangle ofAis stored;= 'L': lower triangle ofAis stored.
NβN is INTEGER. the number of linear equations, i.e., the order of the matrixA.N >= 0.NRHSβNRHS is INTEGER. the number of right hand sides, i.e., the number of columns of the matricesBandX.NRHS >= 0.AβA is COMPLEX array, dimension (LDA,N). 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.LDAβLDA is INTEGER. the leading dimension of the arrayA.LDA >= max(1,N).AFβAF is COMPLEX array, dimension (LDAF,N). IfFACT = 'F', thenAFis an input argument and on entry contains the block diagonal matrixDand the multipliers used to obtain the factorUorLfrom the factorizationA = U*D*U**TorA = L*D*L**Tas computed byCSYTRF.
If FACT = 'N', then AF is an output argument and on exit returns the block diagonal matrix D and the multipliers used to obtain the factor U or L from the factorization A = U*D*U**T or A = L*D*L**T.
LDAFβLDAF is INTEGER. the leading dimension of the arrayAF.LDAF >= max(1,N).IPIVβIPIV is INTEGER array, dimension (N). IfFACT = 'F', thenIPIVis an input argument and on entry contains details of the interchanges and the block structure ofD, as determined byCSYTRF.
If IPIV(k) > 0, then rows and columns k and IPIV(k) were interchanged and D(k,k) is a 1-by-1 diagonal block.
If UPLO = 'U' and IPIV(k) = IPIV(k-1) < 0, then rows and columns k-1 and -IPIV(k) were interchanged and D(k-1:k,k-1:k) is a 2-by-2 diagonal block.
If UPLO = 'L' and IPIV(k) = IPIV(k+1) < 0, then rows and columns k+1 and -IPIV(k) were interchanged and D(k:k+1,k:k+1) is a 2-by-2 diagonal block.
If FACT = 'N', then IPIV is an output argument and on exit contains details of the interchanges and the block structure of D, as determined by CSYTRF.
BβB is COMPLEX array, dimension (LDB,NRHS). theN-by-NRHSright hand side matrixB.LDBβLDB is INTEGER. the leading dimension of the arrayB.LDB >= max(1,N).XβX is COMPLEX array, dimension (LDX,NRHS). IfINFO = 0orINFO = N+1, theN-by-NRHSsolution matrixX.LDXβLDX is INTEGER. the leading dimension of the arrayX.LDX >= max(1,N).RCONDβRCOND is REAL. the estimate of the reciprocal condition number of the matrixA. IfRCONDis less than the machine precision (in particular, ifRCOND = 0), the matrix is singular to working precision. This condition is indicated by a return code ofINFO > 0.FERRβFERR is REAL array, dimension (NRHS). the estimated forward error bound for each solution vectorX(j)(thej-th column of the solution matrixX). IfXTRUEis the true solution corresponding toX(j),FERR(j)is an estimated upper bound for the magnitude of the largest element in(X(j) - XTRUE)divided by the magnitude of the largest element inX(j). The estimate is as reliable as the estimate forRCOND, and is almost always a slight overestimate of the true error.BERRβBERR is REAL array, dimension (NRHS). the componentwise relative backward error of each solution vectorX(j)(i.e., the smallest relative change in any element ofAorBthat makesX(j)an exact solution).WORKβWORK is COMPLEX array, dimension (MAX(1,LWORK)). on exit, ifINFO = 0,WORK(1)returns the optimalLWORK.LWORKβLWORK is INTEGER. the length ofWORK.LWORK >= max(1,2*N), and for best performance, whenFACT = 'N',LWORK >= max(1,2*N,N*NB), whereNBis the optimal blocksize forCSYTRF.
If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA.
RWORKβRWORK is REAL array, dimension (N).INFOβINFO is INTEGER:= 0: successful exit< 0: ifINFO = -i, thei-th argument had an illegal value> 0: ifINFO = i, andiis<= N:D(i,i)is exactly zero. The factorization has been completed but the factorDis exactly singular, so the solution and error bounds could not be computed.RCOND = 0is returned.= N+1:Dis nonsingular, butRCONDis less than machine precision, meaning that the matrix is singular to working precision. Nevertheless, the solution and error bounds are computed because there are a number of situations where the computed solution can be more accurate than the value ofRCONDwould suggest.
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 282 of file csysvx.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
this iconic page is serving LAPACK, Version 3.12.0, and the footer says /home/abui...RC/csysvx.f(3) β that's the whole vibe, bestie, bye and slay your linear algebra πβ¨
π¦ 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