.TH "TESTING/LIN/sqpt01.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/sqpt01.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "real function \fBsqpt01\fP (m, n, k, a, af, lda, tau, jpvt, work, lwork)" .br .RI "\fBSQPT01\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "real function sqpt01 (integer m, integer n, integer k, real, dimension( lda, * ) a, real, dimension( lda, * ) af, integer lda, real, dimension( * ) tau, integer, dimension( * ) jpvt, real, dimension( lwork ) work, integer lwork)" .PP \fBSQPT01\fP .PP \fBPurpose:\fP .RS 4 .PP .nf SQPT01 tests the QR-factorization with pivoting of a matrix A\&. The array AF contains the (possibly partial) QR-factorization of A, where the upper triangle of AF(1:k,1:k) is a partial triangular factor, the entries below the diagonal in the first k columns are the Householder vectors, and the rest of AF contains a partially updated matrix\&. This function returns ||A*P - Q*R|| / ( ||norm(A)||*eps*max(M,N) ) where || \&. || is matrix one norm\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIM\fP .PP .nf M is INTEGER The number of rows of the matrices A and AF\&. .fi .PP .br \fIN\fP .PP .nf N is INTEGER The number of columns of the matrices A and AF\&. .fi .PP .br \fIK\fP .PP .nf K is INTEGER The number of columns of AF that have been reduced to upper triangular form\&. .fi .PP .br \fIA\fP .PP .nf A is REAL array, dimension (LDA, N) The original matrix A\&. .fi .PP .br \fIAF\fP .PP .nf AF is REAL array, dimension (LDA,N) The (possibly partial) output of SGEQPF\&. The upper triangle of AF(1:k,1:k) is a partial triangular factor, the entries below the diagonal in the first k columns are the Householder vectors, and the rest of AF contains a partially updated matrix\&. .fi .PP .br \fILDA\fP .PP .nf LDA is INTEGER The leading dimension of the arrays A and AF\&. .fi .PP .br \fITAU\fP .PP .nf TAU is REAL array, dimension (K) Details of the Householder transformations as returned by SGEQPF\&. .fi .PP .br \fIJPVT\fP .PP .nf JPVT is INTEGER array, dimension (N) Pivot information as returned by SGEQPF\&. .fi .PP .br \fIWORK\fP .PP .nf WORK is REAL array, dimension (LWORK) .fi .PP .br \fILWORK\fP .PP .nf LWORK is INTEGER The length of the array WORK\&. LWORK >= M*N+N\&. .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 \fB119\fP of file \fBsqpt01\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.