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

.in +1c
.ti -1c
.RI "subroutine \fBcget51\fP (itype, n, a, lda, b, ldb, u, ldu, v, ldv, work, rwork, result)"
.br
.RI "\fBCGET51\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "subroutine cget51 (integer itype, integer n, complex, dimension( lda, * ) a, integer lda, complex, dimension( ldb, * ) b, integer ldb, complex, dimension( ldu, * ) u, integer ldu, complex, dimension( ldv, * ) v, integer ldv, complex, dimension( * ) work, real, dimension( * ) rwork, real result)"

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

.PP
.nf
!>
!>      CGET51  generally checks a decomposition of the form
!>
!>              A = U B V**H
!>
!>      where **H means conjugate transpose and U and V are unitary\&.
!>
!>      Specifically, if ITYPE=1
!>
!>              RESULT = | A - U B V**H | / ( |A| n ulp )
!>
!>      If ITYPE=2, then:
!>
!>              RESULT = | A - B | / ( |A| n ulp )
!>
!>      If ITYPE=3, then:
!>
!>              RESULT = | I - U U**H | / ( n ulp )
!> 
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIITYPE\fP 
.PP
.nf
!>          ITYPE is INTEGER
!>          Specifies the type of tests to be performed\&.
!>          =1: RESULT = | A - U B V**H | / ( |A| n ulp )
!>          =2: RESULT = | A - B | / ( |A| n ulp )
!>          =3: RESULT = | I - U U**H | / ( n ulp )
!> 
.fi
.PP
.br
\fIN\fP 
.PP
.nf
!>          N is INTEGER
!>          The size of the matrix\&.  If it is zero, CGET51 does nothing\&.
!>          It must be at least zero\&.
!> 
.fi
.PP
.br
\fIA\fP 
.PP
.nf
!>          A is COMPLEX array, dimension (LDA, N)
!>          The original (unfactored) matrix\&.
!> 
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
!>          LDA is INTEGER
!>          The leading dimension of A\&.  It must be at least 1
!>          and at least N\&.
!> 
.fi
.PP
.br
\fIB\fP 
.PP
.nf
!>          B is COMPLEX array, dimension (LDB, N)
!>          The factored matrix\&.
!> 
.fi
.PP
.br
\fILDB\fP 
.PP
.nf
!>          LDB is INTEGER
!>          The leading dimension of B\&.  It must be at least 1
!>          and at least N\&.
!> 
.fi
.PP
.br
\fIU\fP 
.PP
.nf
!>          U is COMPLEX array, dimension (LDU, N)
!>          The unitary matrix on the left-hand side in the
!>          decomposition\&.
!>          Not referenced if ITYPE=2
!> 
.fi
.PP
.br
\fILDU\fP 
.PP
.nf
!>          LDU is INTEGER
!>          The leading dimension of U\&.  LDU must be at least N and
!>          at least 1\&.
!> 
.fi
.PP
.br
\fIV\fP 
.PP
.nf
!>          V is COMPLEX array, dimension (LDV, N)
!>          The unitary matrix on the left-hand side in the
!>          decomposition\&.
!>          Not referenced if ITYPE=2
!> 
.fi
.PP
.br
\fILDV\fP 
.PP
.nf
!>          LDV is INTEGER
!>          The leading dimension of V\&.  LDV must be at least N and
!>          at least 1\&.
!> 
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
!>          WORK is COMPLEX array, dimension (2*N**2)
!> 
.fi
.PP
.br
\fIRWORK\fP 
.PP
.nf
!>          RWORK is REAL array, dimension (N)
!> 
.fi
.PP
.br
\fIRESULT\fP 
.PP
.nf
!>          RESULT is REAL
!>          The values computed by the test specified by ITYPE\&.  The
!>          value is currently limited to 1/ulp, to avoid overflow\&.
!>          Errors are flagged by RESULT=10/ulp\&.
!> 
.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 \fB153\fP of file \fBcget51\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.