version 1.10, 2011/11/21 22:19:34
|
version 1.14, 2012/12/14 14:22:35
|
Line 1
|
Line 1
|
*> \brief \b DLARRF |
*> \brief \b DLARRF finds a new relatively robust representation such that at least one of the eigenvalues is relatively isolated. |
* |
* |
* =========== DOCUMENTATION =========== |
* =========== DOCUMENTATION =========== |
* |
* |
Line 174
|
Line 174
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date November 2011 |
*> \date September 2012 |
* |
* |
*> \ingroup auxOTHERauxiliary |
*> \ingroup auxOTHERauxiliary |
* |
* |
Line 193
|
Line 193
|
$ SPDIAM, CLGAPL, CLGAPR, PIVMIN, SIGMA, |
$ SPDIAM, CLGAPL, CLGAPR, PIVMIN, SIGMA, |
$ DPLUS, LPLUS, WORK, INFO ) |
$ DPLUS, LPLUS, WORK, INFO ) |
* |
* |
* -- LAPACK auxiliary routine (version 3.4.0) -- |
* -- LAPACK auxiliary routine (version 3.4.2) -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* November 2011 |
* September 2012 |
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
INTEGER CLSTRT, CLEND, INFO, N |
INTEGER CLSTRT, CLEND, INFO, N |
Line 210
|
Line 210
|
* ===================================================================== |
* ===================================================================== |
* |
* |
* .. Parameters .. |
* .. Parameters .. |
DOUBLE PRECISION FOUR, MAXGROWTH1, MAXGROWTH2, ONE, QUART, TWO, |
DOUBLE PRECISION FOUR, MAXGROWTH1, MAXGROWTH2, ONE, QUART, TWO |
$ ZERO |
PARAMETER ( ONE = 1.0D0, TWO = 2.0D0, FOUR = 4.0D0, |
PARAMETER ( ZERO = 0.0D0, ONE = 1.0D0, TWO = 2.0D0, |
$ QUART = 0.25D0, |
$ FOUR = 4.0D0, QUART = 0.25D0, |
|
$ MAXGROWTH1 = 8.D0, |
$ MAXGROWTH1 = 8.D0, |
$ MAXGROWTH2 = 8.D0 ) |
$ MAXGROWTH2 = 8.D0 ) |
* .. |
* .. |