NAME dlasq2 - DLASQ2 computes the singular values of a real N- by-N unreduced bidiagonal matrix with squared diagonal ele- ments in Q and squared off-diagonal elements in E SYNOPSIS SUBROUTINE DLASQ2( M, Q, E, QQ, EE, EPS, TOL2, SMALL2, SUP, KEND, INFO ) INTEGER INFO, KEND, M DOUBLE PRECISION EPS, SMALL2, SUP, TOL2 DOUBLE PRECISION E( * ), EE( * ), Q( * ), QQ( * ) #include <sunperf.h> void dlasq2(int m, double *q, double *e, double *qq, double *ee, double eps, double tol2, double small2, dou- ble *sup, int *kend, int *info) ; PURPOSE DLASQ2 computes the singular values of a real N-by-N unreduced bidiagonal matrix with squared diagonal elements in Q and squared off-diagonal elements in E. The singular values are computed to relative accuracy TOL, barring over/underflow or denormalization. ARGUMENTS M (input) INTEGER The number of rows and columns in the matrix. M >= 0. Q (output) DOUBLE PRECISION array, dimension (M) On normal exit, contains the squared singular values. E (workspace) DOUBLE PRECISION array, dimension (M) QQ (input/output) DOUBLE PRECISION array, dimension (M) On entry, QQ contains the squared diagonal ele- ments of the bidiagonal matrix whose SVD is desired. On exit, QQ is overwritten. EE (input/output) DOUBLE PRECISION array, dimension (M) On entry, EE(1:N-1) contains the squared off- diagonal elements of the bidiagonal matrix whose SVD is desired. On exit, EE is overwritten. EPS (input) DOUBLE PRECISION Machine epsilon. TOL2 (input) DOUBLE PRECISION Desired relative accuracy of computed eigenvalues as defined in DLASQ1. SMALL2 (input) DOUBLE PRECISION A threshold value as defined in DLASQ1. SUP (input/output) DOUBLE PRECISION Upper bound for the smallest eigenvalue. KEND (input/output) INTEGER Index where minimum d occurs. INFO (output) INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an ille- gal value > 0: if INFO = i, the algorithm did not converge; i specifies how many superdiagonals did not con- verge.
Закладки на сайте Проследить за страницей |
Created 1996-2024 by Maxim Chirkov Добавить, Поддержать, Вебмастеру |