.TH "TESTING/LIN/sget01.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/sget01.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBsget01\fP (m, n, a, lda, afac, ldafac, ipiv, rwork, resid)" .br .RI "\fBSGET01\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine sget01 (integer m, integer n, real, dimension( lda, * ) a, integer lda, real, dimension( ldafac, * ) afac, integer ldafac, integer, dimension( * ) ipiv, real, dimension( * ) rwork, real resid)" .PP \fBSGET01\fP .PP \fBPurpose:\fP .RS 4 .PP .nf SGET01 reconstructs a matrix A from its L*U factorization and computes the residual norm(L*U - A) / ( N * norm(A) * EPS ), where EPS is the machine epsilon\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIM\fP .PP .nf M is INTEGER The number of rows of the matrix A\&. M >= 0\&. .fi .PP .br \fIN\fP .PP .nf N is INTEGER The number of columns of the matrix A\&. N >= 0\&. .fi .PP .br \fIA\fP .PP .nf A is REAL array, dimension (LDA,N) The original M x N matrix A\&. .fi .PP .br \fILDA\fP .PP .nf LDA is INTEGER The leading dimension of the array A\&. LDA >= max(1,M)\&. .fi .PP .br \fIAFAC\fP .PP .nf AFAC is REAL array, dimension (LDAFAC,N) The factored form of the matrix A\&. AFAC contains the factors L and U from the L*U factorization as computed by SGETRF\&. Overwritten with the reconstructed matrix, and then with the difference L*U - A\&. .fi .PP .br \fILDAFAC\fP .PP .nf LDAFAC is INTEGER The leading dimension of the array AFAC\&. LDAFAC >= max(1,M)\&. .fi .PP .br \fIIPIV\fP .PP .nf IPIV is INTEGER array, dimension (N) The pivot indices from SGETRF\&. .fi .PP .br \fIRWORK\fP .PP .nf RWORK is REAL array, dimension (M) .fi .PP .br \fIRESID\fP .PP .nf RESID is REAL norm(L*U - A) / ( N * norm(A) * EPS ) .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .PP Definition at line \fB105\fP of file \fBsget01\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.