CGET03
   Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
November 2006
November 2006
Purpose
CGET03 computes the residual for a general matrix times its inverse:
norm( I - AINV*A ) / ( N * norm(A) * norm(AINV) * EPS ),
where EPS is the machine epsilon.
norm( I - AINV*A ) / ( N * norm(A) * norm(AINV) * EPS ),
where EPS is the machine epsilon.
Arguments
| N | 
(input) INTEGER
 
The number of rows and columns of the matrix A.  N >= 0. | 
| A | 
(input) COMPLEX array, dimension (LDA,N)
 
The original N x N matrix A. | 
| LDA | 
(input) INTEGER
 
The leading dimension of the array A.  LDA >= max(1,N). | 
| AINV | 
(input) COMPLEX array, dimension (LDAINV,N)
 
The inverse of the matrix A. | 
| LDAINV | 
(input) INTEGER
 
The leading dimension of the array AINV.  LDAINV >= max(1,N). | 
| WORK | 
(workspace) COMPLEX array, dimension (LDWORK,N)
 | 
| LDWORK | 
(input) INTEGER
 
The leading dimension of the array WORK.  LDWORK >= max(1,N). | 
| RWORK | 
(workspace) REAL array, dimension (N)
 | 
| RCOND | 
(output) REAL
 
The reciprocal of the condition number of A, computed as ( 1/norm(A) ) / norm(AINV). | 
| RESID | 
(output) REAL
 
norm(I - AINV*A) / ( N * norm(A) * norm(AINV) * EPS ) |