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

.in +1c
.ti -1c
.RI "subroutine \fBsget54\fP (n, a, lda, b, ldb, s, lds, t, ldt, u, ldu, v, ldv, work, result)"
.br
.RI "\fBSGET54\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "subroutine sget54 (integer n, real, dimension( lda, * ) a, integer lda, real, dimension( ldb, * ) b, integer ldb, real, dimension( lds, * ) s, integer lds, real, dimension( ldt, * ) t, integer ldt, real, dimension( ldu, * ) u, integer ldu, real, dimension( ldv, * ) v, integer ldv, real, dimension( * ) work, real result)"

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

.PP
.nf
 SGET54 checks a generalized decomposition of the form

          A = U*S*V'  and B = U*T* V'

 where ' means transpose and U and V are orthogonal\&.

 Specifically,

  RESULT = ||( A - U*S*V', B - U*T*V' )|| / (||( A, B )||*n*ulp )
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIN\fP 
.PP
.nf
          N is INTEGER
          The size of the matrix\&.  If it is zero, SGET54 does nothing\&.
          It must be at least zero\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is REAL array, dimension (LDA, N)
          The original (unfactored) matrix A\&.
.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 REAL array, dimension (LDB, N)
          The original (unfactored) matrix B\&.
.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
\fIS\fP 
.PP
.nf
          S is REAL array, dimension (LDS, N)
          The factored matrix S\&.
.fi
.PP
.br
\fILDS\fP 
.PP
.nf
          LDS is INTEGER
          The leading dimension of S\&.  It must be at least 1
          and at least N\&.
.fi
.PP
.br
\fIT\fP 
.PP
.nf
          T is REAL array, dimension (LDT, N)
          The factored matrix T\&.
.fi
.PP
.br
\fILDT\fP 
.PP
.nf
          LDT is INTEGER
          The leading dimension of T\&.  It must be at least 1
          and at least N\&.
.fi
.PP
.br
\fIU\fP 
.PP
.nf
          U is REAL array, dimension (LDU, N)
          The orthogonal matrix on the left-hand side in the
          decomposition\&.
.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 REAL array, dimension (LDV, N)
          The orthogonal matrix on the left-hand side in the
          decomposition\&.
.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 REAL array, dimension (3*N**2)
.fi
.PP
.br
\fIRESULT\fP 
.PP
.nf
          RESULT is REAL
          The value RESULT, It 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 \fB154\fP of file \fBsget54\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.