zgedi


NAME

zgedi - (obsolete) compute the determinant and inverse of a general matrix A, which has been LU-factored by CGECO or CGEFA.


SYNOPSIS

  SUBROUTINE ZGEDI( A, LDA, N, IPIVOT, DET, WORK, JOB)
  DOUBLE COMPLEX A(LDA,*), DET(*), WORK(*)
  INTEGER LDA, N, JOB
  INTEGER IPIVOT(*)
 
  SUBROUTINE ZGEDI_64( A, LDA, N, IPIVOT, DET, WORK, JOB)
  DOUBLE COMPLEX A(LDA,*), DET(*), WORK(*)
  INTEGER*8 LDA, N, JOB
  INTEGER*8 IPIVOT(*)
 

C INTERFACE

#include <sunperf.h>

void zgedi(doublecomplex *a, int lda, int n, int *ipivot, doublecomplex *det, int job);

void zgedi_64(doublecomplex *a, long lda, long n, long *ipivot, doublecomplex *det, long job);


ARGUMENTS

* A (input/output)
On entry, the LU factorization of the matrix A, as computed by CGECO or CGEFA. On exit, the inverse of the original matrix A if the inverse was requested, otherwise it is unchanged.

* LDA (input)
Leading dimension of the array A as specified in a dimension or type statement. LDA >= max(1,N).

* N (input)
Order of the original matrix A. N >= 0.

* IPIVOT (input)
Pivot vector as computed by CGECO or CGEFA.

* DET (output)
On exit, the determinant of the matrix A. The determinant is stored as b * (10**expon) where b is stored in DET(1) and expon is stored in DET(2). 1.0 >= |DET(1)| >= 10.0 or DET(1) = 0.0.

* WORK (workspace)
Scratch array with a dimension of N.

* JOB (input)
Determines which operation the subroutine will perform: