NAME

TESTING/LIN/cget03.f

SYNOPSIS

Functions/Subroutines

subroutine cget03 (n, a, lda, ainv, ldainv, work, ldwork, rwork, rcond, resid)
CGET03

Function/Subroutine Documentation

subroutine cget03 (integer n, complex, dimension( lda, * ) a, integer lda, complex, dimension( ldainv, * ) ainv, integer ldainv, complex, dimension( ldwork, * ) work, integer ldwork, real, dimension( * ) rwork, real rcond, real resid)

CGET03

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

Parameters

!>          N is INTEGER
!>          The number of rows and columns of the matrix A.  N >= 0.
!>

!>          A is COMPLEX array, dimension (LDA,N)
!>          The original N x N matrix A.
!>

LDA

!>          LDA is INTEGER
!>          The leading dimension of the array A.  LDA >= max(1,N).
!>

AINV

!>          AINV is COMPLEX array, dimension (LDAINV,N)
!>          The inverse of the matrix A.
!>

LDAINV

!>          LDAINV is INTEGER
!>          The leading dimension of the array AINV.  LDAINV >= max(1,N).
!>

WORK

!>          WORK is COMPLEX array, dimension (LDWORK,N)
!>

LDWORK

!>          LDWORK is INTEGER
!>          The leading dimension of the array WORK.  LDWORK >= max(1,N).
!>

RWORK

!>          RWORK is REAL array, dimension (N)
!>

RCOND

!>          RCOND is REAL
!>          The reciprocal of the condition number of A, computed as
!>          ( 1/norm(A) ) / norm(AINV).
!>

RESID

!>          RESID is REAL
!>          norm(I - AINV*A) / ( N * norm(A) * norm(AINV) * EPS )
!>

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 108 of file cget03.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.

Version 3.12.0

LAPACK