hetrs2#

Functions

void chetrs2(
    const char*          uplo,
    const INT            n,
    const INT            nrhs,
          c64*  restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          c64*  restrict B,
    const INT            ldb,
          c64*  restrict work,
          INT*           info
);
void chetrs2(const char *uplo, const INT n, const INT nrhs, c64 *restrict A, const INT lda, const INT *restrict ipiv, c64 *restrict B, const INT ldb, c64 *restrict work, INT *info)#

CHETRS2 solves a system of linear equations A*X = B with a complex Hermitian matrix A using the factorization A = U*D*U**H or A = L*D*L**H computed by CHETRF and converted by CSYCONV.

Parameters

in
uplo

  • 'U': Upper triangular, form is A = U*D*U**H

  • 'L': Lower triangular, form is A = L*D*L**H

in
n

The order of the matrix A. n>=0.

in
nrhs

The number of right hand sides, i.e., the number of columns of the matrix B. nrhs>=0.

inout
A

Array of dimension (lda,n). The block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by chetrf. Note that A is input/output. At the start of the subroutine, we permute A in a “better” form and then permute A back to its original form at the end.

in
lda

The leading dimension of the array A. lda>=max(1,n).

in
ipiv

Array of dimension n. Details of the interchanges and the block structure of D as determined by chetrf.

inout
B

Array of dimension (ldb,nrhs). On entry, the right hand side matrix B. On exit, the solution matrix X.

in
ldb

The leading dimension of the array B. ldb>=max(1,n).

out
work

Array of dimension n.

out
info

  • info=0: successful exit

  • info<0: if info=-i, the i-th argument had an illegal value

Functions

void zhetrs2(
    const char*          uplo,
    const INT            n,
    const INT            nrhs,
          c128* restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          c128* restrict B,
    const INT            ldb,
          c128* restrict work,
          INT*           info
);
void zhetrs2(const char *uplo, const INT n, const INT nrhs, c128 *restrict A, const INT lda, const INT *restrict ipiv, c128 *restrict B, const INT ldb, c128 *restrict work, INT *info)#

ZHETRS2 solves a system of linear equations A*X = B with a complex Hermitian matrix A using the factorization A = U*D*U**H or A = L*D*L**H computed by ZHETRF and converted by ZSYCONV.

Parameters

in
uplo

  • 'U': Upper triangular, form is A = U*D*U**H

  • 'L': Lower triangular, form is A = L*D*L**H

in
n

The order of the matrix A. n>=0.

in
nrhs

The number of right hand sides, i.e., the number of columns of the matrix B. nrhs>=0.

inout
A

Array of dimension (lda,n). The block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by zhetrf. Note that A is input/output. At the start of the subroutine, we permute A in a “better” form and then permute A back to its original form at the end.

in
lda

The leading dimension of the array A. lda>=max(1,n).

in
ipiv

Array of dimension n. Details of the interchanges and the block structure of D as determined by zhetrf.

inout
B

Array of dimension (ldb,nrhs). On entry, the right hand side matrix B. On exit, the solution matrix X.

in
ldb

The leading dimension of the array B. ldb>=max(1,n).

out
work

Array of dimension n.

out
info

  • info=0: successful exit

  • info<0: if info=-i, the i-th argument had an illegal value