Contents
cpotri - compute the inverse of a complex Hermitian positive
definite matrix A using the Cholesky factorization A =
U**H*U or A = L*L**H computed by CPOTRF
SUBROUTINE CPOTRI(UPLO, N, A, LDA, INFO)
CHARACTER * 1 UPLO
COMPLEX A(LDA,*)
INTEGER N, LDA, INFO
SUBROUTINE CPOTRI_64(UPLO, N, A, LDA, INFO)
CHARACTER * 1 UPLO
COMPLEX A(LDA,*)
INTEGER*8 N, LDA, INFO
F95 INTERFACE
SUBROUTINE POTRI(UPLO, [N], A, [LDA], [INFO])
CHARACTER(LEN=1) :: UPLO
COMPLEX, DIMENSION(:,:) :: A
INTEGER :: N, LDA, INFO
SUBROUTINE POTRI_64(UPLO, [N], A, [LDA], [INFO])
CHARACTER(LEN=1) :: UPLO
COMPLEX, DIMENSION(:,:) :: A
INTEGER(8) :: N, LDA, INFO
C INTERFACE
#include <sunperf.h>
void cpotri(char uplo, int n, complex *a, int lda, int
*info);
void cpotri_64(char uplo, long n, complex *a, long lda, long
*info);
cpotri computes the inverse of a complex Hermitian positive
definite matrix A using the Cholesky factorization A =
U**H*U or A = L*L**H computed by CPOTRF.
UPLO (input)
= 'U': Upper triangle of A is stored;
= 'L': Lower triangle of A is stored.
N (input) The order of the matrix A. N >= 0.
A (input/output)
On entry, the triangular factor U or L from the
Cholesky factorization A = U**H*U or A = L*L**H,
as computed by CPOTRF. On exit, the upper or
lower triangle of the (Hermitian) inverse of A,
overwriting the input factor U or L.
LDA (input)
The leading dimension of the array A. LDA >=
max(1,N).
INFO (output)
= 0: successful exit
< 0: if INFO = -i, the i-th argument had an ille-
gal value
> 0: if INFO = i, the (i,i) element of the factor
U or L is zero, and the inverse could not be com-
puted.