sytri_rook#

Functions

void ssytri_rook(
    const char*          uplo,
    const INT            n,
          f32*  restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          f32*  restrict work,
          INT*           info
);
void ssytri_rook(const char *uplo, const INT n, f32 *restrict A, const INT lda, const INT *restrict ipiv, f32 *restrict work, INT *info)#

SSYTRI_ROOK computes the inverse of a real symmetric matrix A using the factorization A = U*D*U**T or A = L*D*L**T computed by SSYTRF_ROOK.

Parameters

in
uplo

Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = ‘U’: Upper triangular, form is A = U*D*U**T; = ‘L’: Lower triangular, form is A = L*D*L**T.

in
n

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

inout
A

Double precision array, dimension (lda, n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by SSYTRF_ROOK. 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

Integer array, dimension (n). Details of the interchanges and the block structure of D as determined by SSYTRF_ROOK.

out
work

Double precision array, dimension (n).

out
info

  • = 0: successful exit

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

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

Functions

void dsytri_rook(
    const char*          uplo,
    const INT            n,
          f64*  restrict A,
    const INT            lda,
    const INT*  restrict ipiv,
          f64*  restrict work,
          INT*           info
);
void dsytri_rook(const char *uplo, const INT n, f64 *restrict A, const INT lda, const INT *restrict ipiv, f64 *restrict work, INT *info)#

DSYTRI_ROOK computes the inverse of a real symmetric matrix A using the factorization A = U*D*U**T or A = L*D*L**T computed by DSYTRF_ROOK.

Parameters

in
uplo

Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = ‘U’: Upper triangular, form is A = U*D*U**T; = ‘L’: Lower triangular, form is A = L*D*L**T.

in
n

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

inout
A

Double precision array, dimension (lda, n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by DSYTRF_ROOK. 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

Integer array, dimension (n). Details of the interchanges and the block structure of D as determined by DSYTRF_ROOK.

out
work

Double precision array, dimension (n).

out
info

  • = 0: successful exit

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

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

Functions

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

CSYTRI_ROOK computes the inverse of a complex symmetric matrix A using the factorization A = U*D*U**T or A = L*D*L**T computed by CSYTRF_ROOK.

Parameters

in
uplo

Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = ‘U’: Upper triangular, form is A = U*D*U**T; = ‘L’: Lower triangular, form is A = L*D*L**T.

in
n

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

inout
A

Single complex array, dimension (lda, n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by CSYTRF_ROOK. 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

Integer array, dimension (n). Details of the interchanges and the block structure of D as determined by CSYTRF_ROOK.

out
work

Single complex array, dimension (n).

out
info

  • = 0: successful exit

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

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

Functions

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

ZSYTRI_ROOK computes the inverse of a complex symmetric matrix A using the factorization A = U*D*U**T or A = L*D*L**T computed by ZSYTRF_ROOK.

Parameters

in
uplo

Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = ‘U’: Upper triangular, form is A = U*D*U**T; = ‘L’: Lower triangular, form is A = L*D*L**T.

in
n

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

inout
A

Double complex array, dimension (lda, n). On entry, the block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by ZSYTRF_ROOK. 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

Integer array, dimension (n). Details of the interchanges and the block structure of D as determined by ZSYTRF_ROOK.

out
work

Double complex array, dimension (n).

out
info

  • = 0: successful exit

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

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