version 1.11, 2012/07/31 11:06:36
|
version 1.18, 2016/08/27 15:34:30
|
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 51
|
Line 51
|
*> \param[in] N |
*> \param[in] N |
*> \verbatim |
*> \verbatim |
*> N is INTEGER |
*> N is INTEGER |
*> The order of the matrix (subblock, if the matrix splitted). |
*> The order of the matrix (subblock, if the matrix split). |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
*> \param[in] D |
*> \param[in] D |
Line 174
|
Line 174
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date November 2011 |
*> \date June 2016 |
* |
* |
*> \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.6.1) -- |
* -- 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 |
* June 2016 |
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
INTEGER CLSTRT, CLEND, INFO, N |
INTEGER CLSTRT, CLEND, INFO, N |
Line 257
|
Line 257
|
|
|
* Decide whether the code should accept the best among all |
* Decide whether the code should accept the best among all |
* representations despite large element growth or signal INFO=1 |
* representations despite large element growth or signal INFO=1 |
NOFAIL = .TRUE. |
* Setting NOFAIL to .FALSE. for quick fix for bug 113 |
|
NOFAIL = .FALSE. |
* |
* |
|
|
* Compute the average gap length of the cluster |
* Compute the average gap length of the cluster |