diff options
Diffstat (limited to 'SRC/clarrv.f')
-rw-r--r-- | SRC/clarrv.f | 19 |
1 files changed, 11 insertions, 8 deletions
diff --git a/SRC/clarrv.f b/SRC/clarrv.f index ceeb8bf9..7b711617 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -35,16 +35,17 @@ * The order of the matrix. N >= 0. * * VL (input) REAL +* * VU (input) REAL * Lower and upper bounds of the interval that contains the desired * eigenvalues. VL < VU. Needed to compute gaps on the left or right * end of the extremal eigenvalues in the desired RANGE. * -* D (input/output) REAL array, dimension (N) +* D (input/output) REAL array, dimension (N) * On entry, the N diagonal elements of the diagonal matrix D. * On exit, D may be overwritten. * -* L (input/output) REAL array, dimension (N) +* L (input/output) REAL array, dimension (N) * On entry, the (N-1) subdiagonal elements of the unit * bidiagonal matrix L are in elements 1 to N-1 of L * (if the matrix is not splitted.) At the end of each block @@ -64,6 +65,7 @@ * The total number of input eigenvalues. 0 <= M <= N. * * DOL (input) INTEGER +* * DOU (input) INTEGER * If the user wants to compute only selected eigenvectors from all * the eigenvalues supplied, he can specify an index range DOL:DOU. @@ -77,12 +79,13 @@ * MINRGP (input) REAL * * RTOL1 (input) REAL +* * RTOL2 (input) REAL * Parameters for bisection. * An interval [LEFT,RIGHT] has converged if * RIGHT-LEFT.LT.MAX( RTOL1*GAP, RTOL2*MAX(|LEFT|,|RIGHT|) ) * -* W (input/output) REAL array, dimension (N) +* W (input/output) REAL array, dimension (N) * The first M elements of W contain the APPROXIMATE eigenvalues for * which eigenvectors are to be computed. The eigenvalues * should be grouped by split-off block and ordered from @@ -92,11 +95,11 @@ * for their block. On exit, W holds the eigenvalues of the * UNshifted matrix. * -* WERR (input/output) REAL array, dimension (N) +* WERR (input/output) REAL array, dimension (N) * The first M elements contain the semiwidth of the uncertainty * interval of the corresponding eigenvalue in W * -* WGAP (input/output) REAL array, dimension (N) +* WGAP (input/output) REAL array, dimension (N) * The separation from the right neighbor eigenvalue in W. * * IBLOCK (input) INTEGER array, dimension (N) @@ -110,12 +113,12 @@ * for example, INDEXW(i)= 10 and IBLOCK(i)=2 imply that the * i-th eigenvalue W(i) is the 10-th eigenvalue in the second block. * -* GERS (input) REAL array, dimension (2*N) +* GERS (input) REAL array, dimension (2*N) * The N Gerschgorin intervals (the i-th Gerschgorin interval * is (GERS(2*i-1), GERS(2*i)). The Gerschgorin intervals should * be computed from the original UNshifted matrix. * -* Z (output) COMPLEX array, dimension (LDZ, max(1,M) ) +* Z (output)COMPLEX array, dimension (LDZ, max(1,M) ) * If INFO = 0, the first M columns of Z contain the * orthonormal eigenvectors of the matrix T * corresponding to the input eigenvalues, with the i-th @@ -133,7 +136,7 @@ * is nonzero only in elements ISUPPZ( 2*I-1 ) through * ISUPPZ( 2*I ). * -* WORK (workspace) REAL array, dimension (12*N) +* WORK (workspace) REAL array, dimension (12*N) * * IWORK (workspace) INTEGER array, dimension (7*N) * |