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

  • '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

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 ssytrf_rook. On exit, if info=0, the (symmetric) inverse of the original matrix. If uplo='U', the upper triangular part of the inverse is formed and the part of A below the diagonal is not referenced; if uplo='L' the lower triangular part of the inverse is formed and the part of A above the diagonal is not referenced.

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 ssytrf_rook.

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

  • info>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

  • '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

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 dsytrf_rook. On exit, if info=0, the (symmetric) inverse of the original matrix. If uplo='U', the upper triangular part of the inverse is formed and the part of A below the diagonal is not referenced; if uplo='L' the lower triangular part of the inverse is formed and the part of A above the diagonal is not referenced.

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 dsytrf_rook.

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

  • info>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

  • '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

Complex 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 csytrf_rook. On exit, if info=0, the (symmetric) inverse of the original matrix. If uplo='U', the upper triangular part of the inverse is formed and the part of A below the diagonal is not referenced; if uplo='L' the lower triangular part of the inverse is formed and the part of A above the diagonal is not referenced.

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 csytrf_rook.

out
work

Complex array of dimension n.

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 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

  • '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

Complex 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 zsytrf_rook. On exit, if info=0, the (symmetric) inverse of the original matrix. If uplo='U', the upper triangular part of the inverse is formed and the part of A below the diagonal is not referenced; if uplo='L' the lower triangular part of the inverse is formed and the part of A above the diagonal is not referenced.

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 zsytrf_rook.

out
work

Complex array of dimension n.

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.