NAME

TESTING/LIN/sget03.f

SYNOPSIS

Functions/Subroutines

subroutine sget03 (n, a, lda, ainv, ldainv, work, ldwork, rwork, rcond, resid)
SGET03

Function/Subroutine Documentation

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

SGET03

Purpose:



 SGET03 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 REAL 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 REAL 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 REAL 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 107 of file sget03.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.