hetri2x#

Functions

void chetri2x(
    const char*          uplo,
    const INT            n,
          c64*  restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          c64*  restrict work,
    const INT            nb,
          INT*           info
);
void chetri2x(const char *uplo, const INT n, c64 *restrict A, const INT lda, const INT *restrict ipiv, c64 *restrict work, const INT nb, INT *info)#

CHETRI2X computes the inverse of a complex Hermitian indefinite matrix A using the factorization A = U*D*U**H or A = L*D*L**H computed by CHETRF.

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.

inout
A

Array of dimension (lda,n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by chetrf. On exit, if info=0, the (symmetric) inverse of the original matrix.

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.

out
work

Array of dimension (n+nb+1,nb+3).

in
nb

Block size.

out
info

  • info=0: successful exit

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

  • info>0: if info=i, D(i,i)=0; the matrix is singular and its inverse could not be computed.

Functions

void zhetri2x(
    const char*          uplo,
    const INT            n,
          c128* restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          c128* restrict work,
    const INT            nb,
          INT*           info
);
void zhetri2x(const char *uplo, const INT n, c128 *restrict A, const INT lda, const INT *restrict ipiv, c128 *restrict work, const INT nb, INT *info)#

ZHETRI2X computes the inverse of a complex Hermitian indefinite matrix A using the factorization A = U*D*U**H or A = L*D*L**H computed by ZHETRF.

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.

inout
A

Array of dimension (lda,n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by zhetrf. On exit, if info=0, the (symmetric) inverse of the original matrix.

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.

out
work

Array of dimension (n+nb+1,nb+3).

in
nb

Block size.

out
info

  • info=0: successful exit

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

  • info>0: if info=i, D(i,i)=0; the matrix is singular and its inverse could not be computed.