.TH "TESTING/EIG/dbdt02.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
TESTING/EIG/dbdt02.f
.SH SYNOPSIS
.br
.PP
.SS "Functions/Subroutines"

.in +1c
.ti -1c
.RI "subroutine \fBdbdt02\fP (m, n, b, ldb, c, ldc, u, ldu, work, resid)"
.br
.RI "\fBDBDT02\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "subroutine dbdt02 (integer m, integer n, double precision, dimension( ldb, * ) b, integer ldb, double precision, dimension( ldc, * ) c, integer ldc, double precision, dimension( ldu, * ) u, integer ldu, double precision, dimension( * ) work, double precision resid)"

.PP
\fBDBDT02\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 DBDT02 tests the change of basis C = U**H * B by computing the
 residual

    RESID = norm(B - U * C) / ( max(m,n) * norm(B) * EPS ),

 where B and C are M by N matrices, U is an M by M orthogonal matrix,
 and EPS is the machine precision\&.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrices B and C and the order of
          the matrix Q\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrices B and C\&.
.fi
.PP
.br
\fIB\fP 
.PP
.nf
          B is DOUBLE PRECISION array, dimension (LDB,N)
          The m by n matrix B\&.
.fi
.PP
.br
\fILDB\fP 
.PP
.nf
          LDB is INTEGER
          The leading dimension of the array B\&.  LDB >= max(1,M)\&.
.fi
.PP
.br
\fIC\fP 
.PP
.nf
          C is DOUBLE PRECISION array, dimension (LDC,N)
          The m by n matrix C, assumed to contain U**H * B\&.
.fi
.PP
.br
\fILDC\fP 
.PP
.nf
          LDC is INTEGER
          The leading dimension of the array C\&.  LDC >= max(1,M)\&.
.fi
.PP
.br
\fIU\fP 
.PP
.nf
          U is DOUBLE PRECISION array, dimension (LDU,M)
          The m by m orthogonal matrix U\&.
.fi
.PP
.br
\fILDU\fP 
.PP
.nf
          LDU is INTEGER
          The leading dimension of the array U\&.  LDU >= max(1,M)\&.
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
          WORK is DOUBLE PRECISION array, dimension (M)
.fi
.PP
.br
\fIRESID\fP 
.PP
.nf
          RESID is DOUBLE PRECISION
          RESID = norm(B - U * C) / ( max(m,n) * norm(B) * 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 \fB111\fP of file \fBdbdt02\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.