DGET54

   Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
   November 2006

Purpose

DGET54 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 )

Arguments

N
(input) INTEGER
The size of the matrix.  If it is zero, DGET54 does nothing.
It must be at least zero.
A
(input) DOUBLE PRECISION array, dimension (LDA, N)
The original (unfactored) matrix A.
LDA
(input) INTEGER
The leading dimension of A.  It must be at least 1
and at least N.
B
(input) DOUBLE PRECISION array, dimension (LDB, N)
The original (unfactored) matrix B.
LDB
(input) INTEGER
The leading dimension of B.  It must be at least 1
and at least N.
S
(input) DOUBLE PRECISION array, dimension (LDS, N)
The factored matrix S.
LDS
(input) INTEGER
The leading dimension of S.  It must be at least 1
and at least N.
T
(input) DOUBLE PRECISION array, dimension (LDT, N)
The factored matrix T.
LDT
(input) INTEGER
The leading dimension of T.  It must be at least 1
and at least N.
U
(input) DOUBLE PRECISION array, dimension (LDU, N)
The orthogonal matrix on the left-hand side in the
decomposition.
LDU
(input) INTEGER
The leading dimension of U.  LDU must be at least N and
at least 1.
V
(input) DOUBLE PRECISION array, dimension (LDV, N)
The orthogonal matrix on the left-hand side in the
decomposition.
LDV
(input) INTEGER
The leading dimension of V.  LDV must be at least N and
at least 1.
WORK
(workspace) DOUBLE PRECISION array, dimension (3*N**2)
RESULT
(output) DOUBLE PRECISION
The value RESULT, It is currently limited to 1/ulp, to
avoid overflow. Errors are flagged by RESULT=10/ulp.

Call Graph

Caller Graph