NAME

TESTING/LIN/dget03.f

SYNOPSIS

Functions/Subroutines

subroutine dget03 (n, a, lda, ainv, ldainv, work, ldwork, rwork, rcond, resid)
DGET03

Function/Subroutine Documentation

subroutine dget03 (integer n, double precision, dimension( lda, * ) a, integer lda, double precision, dimension( ldainv, * ) ainv, integer ldainv, double precision, dimension( ldwork, * ) work, integer ldwork, double precision, dimension( * ) rwork, double precision rcond, double precision resid)

DGET03

Purpose:



 DGET03 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 DOUBLE PRECISION 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 DOUBLE PRECISION 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 DOUBLE PRECISION array, dimension (LDWORK,N)

LDWORK



          LDWORK is INTEGER


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

RWORK



          RWORK is DOUBLE PRECISION array, dimension (N)

RCOND



          RCOND is DOUBLE PRECISION


          The reciprocal of the condition number of A, computed as


          ( 1/norm(A) ) / norm(AINV).

RESID



          RESID is DOUBLE PRECISION


          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 107 of file dget03.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.