hesv(3)

okay so welcome to hesv(3) from the Library Functions Manual โ€” this is the bestie-coded page for hesv - {he,sy}sv: rook (v1) ๐Ÿ’…. Itโ€™s giving linear algebra but make it group chat. No cap, weโ€™re keeping every deet.

๐Ÿ’– NAME ๐Ÿ’–

hesv โ€” {he,sy}sv: rook (v1) โœจ

โœจ SYNOPSIS โœจ

๐ŸŒธ Functions ๐ŸŒธ

  • subroutine chesv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) โ€” CHESV computes the solution to system of linear equations A * X = B for HE matrices ๐Ÿ’–
  • 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 โœจ
  • subroutine dsysv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) โ€” DSYSV computes the solution to system of linear equations A * X = B for SY matrices ๐Ÿฆ‹
  • subroutine ssysv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) โ€” SSYSV computes the solution to system of linear equations A * X = B for SY matrices ๐ŸŒธ
  • subroutine zhesv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) โ€” ZHESV computes the solution to system of linear equations A * X = B for HE matrices ๐Ÿ”ฅ
  • subroutine zsysv (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) โ€” ZSYSV computes the solution to system of linear equations A * X = B for SY matrices ๐Ÿ‘‘

๐ŸŒˆ Detailed Description ๐ŸŒˆ

(the original leaves this section literally empty โ€” no deets, no drama, just vibes)

๐Ÿ”ฅ Function Documentation ๐Ÿ”ฅ

๐Ÿงฎ chesv โ€” Hermitian bestie ๐Ÿงฎ

subroutine chesv (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)

CHESV computes the solution to system of linear equations A * X = B for HE matrices. ๐Ÿซถ

๐ŸŽฏ Purpose ๐ŸŽฏ

okay so CHESV solves 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.

It uses the diagonal pivoting method to factor A as:

A = U * D * U**H,  if UPLO = 'U', or
A = L * D * L**H,  if UPLO = 'L',

where U (or L) is a product of permutation and unit upper (lower) triangular matrices, and D is Hermitian and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. Then the factored form of A is used to solve the system of equations A * X = B. โœจ

๐ŸŽ€ Parameters ๐ŸŽ€

  • UPLO โ€” UPLO is CHARACTER*1. = 'U': Upper triangle of A is stored; = 'L': Lower triangle of A is stored.
  • N โ€” N is INTEGER. The number of linear equations, i.e., the order of the matrix A. N >= 0.
  • NRHS โ€” NRHS is INTEGER. The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” A is COMPLEX array, dimension (LDA,N). On entry, the Hermitian matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced. On exit, if INFO = 0, the block diagonal matrix D and the multipliers used to obtain the factor U or L from the factorization A = U*D*U**H or A = L*D*L**H as computed by CHETRF. ๐Ÿ’œ
  • LDA โ€” LDA is INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • IPIV โ€” IPIV is INTEGER array, dimension (N). Details of the interchanges and the block structure of D, as determined by CHETRF. 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. ๐Ÿ”ฅ
  • B โ€” B is COMPLEX array, dimension (LDB,NRHS). On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X. ๐Ÿฆ‹
  • LDB โ€” LDB is INTEGER. The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” WORK is COMPLEX array, dimension (MAX(1,LWORK)). On exit, if INFO = 0, WORK(1) returns the optimal LWORK. ๐Ÿ’…
  • LWORK โ€” LWORK is INTEGER. The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for CHETRF. for LWORK < N, TRS will be done with Level BLAS 2; for 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 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. ๐ŸŒธ
  • INFO โ€” INFO is INTEGER. = 0: successful exit; < 0: if INFO = -i, the i-th argument had an illegal value; > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is 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 chesv.f.

๐Ÿงš csysv โ€” symmetric slay ๐Ÿงš

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 ๐ŸŽฏ

CSYSV solves 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.

It uses the diagonal pivoting method 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 โ€” UPLO is CHARACTER*1. = 'U': Upper triangle of A is stored; = 'L': Lower triangle of A is stored.
  • N โ€” N is INTEGER. The number of linear equations, i.e., the order of the matrix A. N >= 0.
  • NRHS โ€” NRHS is INTEGER. The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” A is COMPLEX array, dimension (LDA,N). On entry, the symmetric matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced. On exit, if INFO = 0, 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 as computed by CSYTRF. ๐Ÿ’œ
  • LDA โ€” LDA is INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • IPIV โ€” IPIV is INTEGER array, dimension (N). Details of the interchanges and the block structure of D, as determined by CSYTRF. 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. ๐Ÿ”ฅ
  • B โ€” B is COMPLEX array, dimension (LDB,NRHS). On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X. ๐Ÿฆ‹
  • LDB โ€” LDB is INTEGER. The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” WORK is COMPLEX array, dimension (MAX(1,LWORK)). On exit, if INFO = 0, WORK(1) returns the optimal LWORK. ๐Ÿ’…
  • LWORK โ€” LWORK is INTEGER. The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for CSYTRF. for LWORK < N, TRS will be done with Level BLAS 2; for 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 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. ๐ŸŒธ
  • INFO โ€” INFO is INTEGER. (the source part 1 cuts off right here โ€” part 2 has the rest of the INFO deets, bestie!)
  • INFO โ€” INFO is INTEGER, the receipts on how it all went ๐Ÿ“‹
    • = 0: successful exit โ€” we ate and left no crumbs โœจ
    • < 0: if INFO = -i, the i-th argument had an illegal value (so likeโ€ฆ you passed me something cursed ๐Ÿ’€)
    • > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is exactly singular, so the solution could not be computed. bestie, it's giving dead end ๐Ÿ˜ญ

Author

  • Univ. of Tennessee
  • Univ. of California Berkeley
  • Univ. of Colorado Denver
  • NAG Ltd.

Definition at line 169 of file csysv.f.


๐Ÿฆ‹ subroutine dsysv ๐Ÿ’œ

subroutine dsysv (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 computes the solution to system of linear equations A * X = B for SY matrices โ€” that's the whole vibe, honestly ๐Ÿ‘‘

Purpose:

okay so, DSYSV 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. no cap, that's it ๐ŸŒธ

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. literally factorize then solve, iconic behaviour ๐Ÿซถ


Parameters

  • UPLO โ€” UPLO is CHARACTER*1, aka which triangle are we even talking about ๐ŸŽ€
    • = 'U': Upper triangle of A is stored
    • = 'L': Lower triangle of A is stored
  • N โ€” N is INTEGER The number of linear equations, i.e., the order of the matrix A. N >= 0. (zero is allowed bestie, it's a valid vibe)
  • NRHS โ€” NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” A is DOUBLE PRECISION array, dimension (LDA,N) ๐Ÿ’– On entry, the symmetric matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced. (translation: we read one triangle and ghost the other one entirely ๐Ÿ™ˆ)

On exit, if INFO = 0, 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 as computed by DSYTRF. she's a whole new matrix now โœจ

  • LDA โ€” LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). respect the boundary fr fr
  • IPIV โ€” IPIV is INTEGER array, dimension (N) ๐Ÿ“ Details of the interchanges and the block structure of D, as determined by DSYTRF. 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. negative means 2-by-2 block, that's the whole tell ๐Ÿ˜Œ
  • B โ€” B is DOUBLE PRECISION array, dimension (LDB,NRHS) On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X. she literally transforms in place, main character energy ๐Ÿ’…
  • LDB โ€” LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK)) On exit, if INFO = 0, WORK(1) returns the optimal LWORK. (yes, it puts the answer in slot one, sneaky but cute ๐Ÿงš)
  • LWORK โ€” LWORK is INTEGER The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for DSYTRF.

for LWORK < N, TRS will be done with Level BLAS 2 for 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 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. lowkey my fave hack โ€” ask for the size before you commit, that's just good boundaries ๐Ÿ”ฅ

  • INFO โ€” INFO is INTEGER
    • = 0: successful exit โœจ
    • < 0: if INFO = -i, the i-th argument had an illegal value
    • > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is exactly singular, so the solution could not be computed. likeโ€ฆ the math said no ๐Ÿ˜ญ

Author

  • Univ. of Tennessee
  • Univ. of California Berkeley
  • Univ. of Colorado Denver
  • NAG Ltd.

Definition at line 169 of file dsysv.f.


๐ŸŒˆ subroutine ssysv ๐ŸŽ€

subroutine ssysv (character uplo, integer n, integer nrhs, real, dimension( lda, * ) a, integer lda, integer, dimension( * ) ipiv, real, dimension( ldb, * ) b, integer ldb, real, dimension( * ) work, integer lwork, integer info)

SSYSV computes the solution to system of linear equations A * X = B for SY matrices โ€” same plot as dsysv but she's single precision, we love a sibling ๐Ÿ’œ

Purpose:

SSYSV 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. The factored form of A is then used to solve the system of equations A * X = B. same recipe, different dtype, periodt ๐Ÿซถ


Parameters

  • UPLO โ€” UPLO is CHARACTER*1
    • = 'U': Upper triangle of A is stored
    • = 'L': Lower triangle of A is stored
  • N โ€” N is INTEGER The number of linear equations, i.e., the order of the matrix A. N >= 0.
  • NRHS โ€” NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” A is REAL array, dimension (LDA,N) ๐ŸŒธ On entry, the symmetric matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced.

On exit, if INFO = 0, 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 as computed by SSYTRF. ๐ŸŒŸ

  • LDA โ€” LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N).
  • IPIV โ€” IPIV is INTEGER array, dimension (N) ๐Ÿ’€ Details of the interchanges and the block structure of D, as determined by SSYTRF. 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. iykyk ๐Ÿคซ
  • B โ€” B is REAL array, dimension (LDB,NRHS) On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X. the glow-up is real ๐Ÿ’…
  • LDB โ€” LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” WORK is REAL array, dimension (MAX(1,LWORK)) On exit, if INFO = 0, WORK(1) returns the optimal LWORK. ๐Ÿงš
  • LWORK โ€” LWORK is INTEGER The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for SSYTRF.

for LWORK < N, TRS will be done with Level BLAS 2 for 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 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. ๐Ÿ“

  • INFO โ€” INFO is INTEGER
    • = 0: successful exit ๐Ÿ‘‘
    • < 0: if INFO = -i, the i-th argument had an illegal value
    • > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is 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 ssysv.f.

subroutine zhesv

subroutine zhesv (character uplo, integer n, integer nrhs, complex*16,
    dimension( lda, * ) a, integer lda, integer, dimension( * ) ipiv,
    complex*16, dimension( ldb, * ) b, integer ldb, complex*16, dimension( *
    ) work, integer lwork, integer info)

ZHESV computes the solution to system of linear equations A * X = B for HE matrices

๐ŸŽฏ Purpose

Okay so ZHESV is here to solve a complex system of linear equations like:

A * X = B,

where A is an N-by-N Hermitian matrix and X and B are N-by-NRHS matrices.

It uses the diagonal pivoting method to factor A as:

A = U * D * U**H,  if UPLO = 'U', or
A = L * D * L**H,  if UPLO = 'L',

where U (or L) is a product of permutation and unit upper (lower) triangular matrices, and D is Hermitian and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. Then it uses that factored form to solve the system of equations A * X = B. Slay.

๐Ÿ“‹ Parameters

  • UPLO โ€” CHARACTER*1. It's literally telling you which triangle of A is stored: 'U' means the upper triangle of A is stored; 'L' means the lower triangle of A is stored.
  • N โ€” INTEGER. The number of linear equations, i.e., the order of the matrix A. N >= 0.
  • NRHS โ€” INTEGER. The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” COMPLEX*16 array, dimension (LDA,N). On entry, the Hermitian matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced. On exit, if INFO = 0, the block diagonal matrix D and the multipliers used to obtain the factor U or L from the factorization A = U*D*U**H or A = L*D*L**H as computed by ZHETRF.
  • LDA โ€” INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • IPIV โ€” INTEGER array, dimension (N). Details of the interchanges and the block structure of D, as determined by ZHETRF. 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.
  • B โ€” COMPLEX*16 array, dimension (LDB,NRHS). On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X.
  • LDB โ€” INTEGER. The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” COMPLEX*16 array, dimension (MAX(1,LWORK)). On exit, if INFO = 0, WORK(1) returns the optimal LWORK.
  • LWORK โ€” INTEGER. The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for ZHETRF. For LWORK < N, TRS will be done with Level BLAS 2; for 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 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.
  • INFO โ€” INTEGER. Exit status: = 0: successful exit; < 0: if INFO = -i, the i-th argument had an illegal value; > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is 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 zhesv.f.


subroutine zsysv

subroutine zsysv (character uplo, integer n, integer nrhs, complex*16,
    dimension( lda, * ) a, integer lda, integer, dimension( * ) ipiv,
    complex*16, dimension( ldb, * ) b, integer ldb, complex*16, dimension( *
    ) work, integer lwork, integer info)

ZSYSV computes the solution to system of linear equations A * X = B for SY matrices

๐ŸŽฏ Purpose

Okay so ZSYSV is here to solve a complex system of linear equations like:

A * X = B,

where A is an N-by-N symmetric matrix and X and B are N-by-NRHS matrices.

It uses the diagonal pivoting method 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. Then it uses that factored form to solve the system of equations A * X = B. Periodt.

๐Ÿ“‹ Parameters

  • UPLO โ€” CHARACTER*1. It's literally telling you which triangle of A is stored: 'U' means the upper triangle of A is stored; 'L' means the lower triangle of A is stored.
  • N โ€” INTEGER. The number of linear equations, i.e., the order of the matrix A. N >= 0.
  • NRHS โ€” INTEGER. The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0.
  • A โ€” COMPLEX*16 array, dimension (LDA,N). On entry, the symmetric matrix A. If UPLO = 'U', the leading N-by-N upper triangular part of A contains the upper triangular part of the matrix A, and the strictly lower triangular part of A is not referenced. If UPLO = 'L', the leading N-by-N lower triangular part of A contains the lower triangular part of the matrix A, and the strictly upper triangular part of A is not referenced. On exit, if INFO = 0, 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 as computed by ZSYTRF.
  • LDA โ€” INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • IPIV โ€” INTEGER array, dimension (N). Details of the interchanges and the block structure of D, as determined by ZSYTRF. 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.
  • B โ€” COMPLEX*16 array, dimension (LDB,NRHS). On entry, the N-by-NRHS right hand side matrix B. On exit, if INFO = 0, the N-by-NRHS solution matrix X.
  • LDB โ€” INTEGER. The leading dimension of the array B. LDB >= max(1,N).
  • WORK โ€” COMPLEX*16 array, dimension (MAX(1,LWORK)). On exit, if INFO = 0, WORK(1) returns the optimal LWORK.
  • LWORK โ€” INTEGER. The length of WORK. LWORK >= 1, and for best performance LWORK >= max(1,N*NB), where NB is the optimal blocksize for ZSYTRF. For LWORK < N, TRS will be done with Level BLAS 2; for 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 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.
  • INFO โ€” INTEGER. Exit status: = 0: successful exit; < 0: if INFO = -i, the i-th argument had an illegal value; > 0: if INFO = i, D(i,i) is exactly zero. The factorization has been completed, but the block diagonal matrix D is 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 zsysv.f.


๐ŸŒŸ Author

Generated automatically by Doxygen for LAPACK from the source code.

๐Ÿ’– And that's the tea! This page is from LAPACK Version 3.12.0, and it's the hesv(3) page. Stay sliving, bestie! ๐Ÿ’…โœจ

๐Ÿ“ฆ where this page comes from