--- rpl/lapack/lapack/dlarrr.f 2010/08/13 21:03:51 1.6
+++ rpl/lapack/lapack/dlarrr.f 2014/01/27 09:28:22 1.13
@@ -1,9 +1,103 @@
+*> \brief \b DLARRR performs tests to decide whether the symmetric tridiagonal matrix T warrants expensive computations which guarantee high relative accuracy in the eigenvalues.
+*
+* =========== DOCUMENTATION ===========
+*
+* Online html documentation available at
+* http://www.netlib.org/lapack/explore-html/
+*
+*> \htmlonly
+*> Download DLARRR + dependencies
+*>
+*> [TGZ]
+*>
+*> [ZIP]
+*>
+*> [TXT]
+*> \endhtmlonly
+*
+* Definition:
+* ===========
+*
+* SUBROUTINE DLARRR( N, D, E, INFO )
+*
+* .. Scalar Arguments ..
+* INTEGER N, INFO
+* ..
+* .. Array Arguments ..
+* DOUBLE PRECISION D( * ), E( * )
+* ..
+*
+*
+*
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
+*>
+*> Perform tests to decide whether the symmetric tridiagonal matrix T
+*> warrants expensive computations which guarantee high relative accuracy
+*> in the eigenvalues.
+*> \endverbatim
+*
+* Arguments:
+* ==========
+*
+*> \param[in] N
+*> \verbatim
+*> N is INTEGER
+*> The order of the matrix. N > 0.
+*> \endverbatim
+*>
+*> \param[in] D
+*> \verbatim
+*> D is DOUBLE PRECISION array, dimension (N)
+*> The N diagonal elements of the tridiagonal matrix T.
+*> \endverbatim
+*>
+*> \param[in,out] E
+*> \verbatim
+*> E is DOUBLE PRECISION array, dimension (N)
+*> On entry, the first (N-1) entries contain the subdiagonal
+*> elements of the tridiagonal matrix T; E(N) is set to ZERO.
+*> \endverbatim
+*>
+*> \param[out] INFO
+*> \verbatim
+*> INFO is INTEGER
+*> INFO = 0(default) : the matrix warrants computations preserving
+*> relative accuracy.
+*> INFO = 1 : the matrix warrants computations guaranteeing
+*> only absolute accuracy.
+*> \endverbatim
+*
+* Authors:
+* ========
+*
+*> \author Univ. of Tennessee
+*> \author Univ. of California Berkeley
+*> \author Univ. of Colorado Denver
+*> \author NAG Ltd.
+*
+*> \date September 2012
+*
+*> \ingroup auxOTHERauxiliary
+*
+*> \par Contributors:
+* ==================
+*>
+*> Beresford Parlett, University of California, Berkeley, USA \n
+*> Jim Demmel, University of California, Berkeley, USA \n
+*> Inderjit Dhillon, University of Texas, Austin, USA \n
+*> Osni Marques, LBNL/NERSC, USA \n
+*> Christof Voemel, University of California, Berkeley, USA
+*
+* =====================================================================
SUBROUTINE DLARRR( N, D, E, INFO )
*
-* -- LAPACK auxiliary routine (version 3.2) --
+* -- LAPACK auxiliary routine (version 3.4.2) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* November 2006
+* September 2012
*
* .. Scalar Arguments ..
INTEGER N, INFO
@@ -13,42 +107,6 @@
* ..
*
*
-* Purpose
-* =======
-*
-* Perform tests to decide whether the symmetric tridiagonal matrix T
-* warrants expensive computations which guarantee high relative accuracy
-* in the eigenvalues.
-*
-* Arguments
-* =========
-*
-* N (input) INTEGER
-* The order of the matrix. N > 0.
-*
-* D (input) DOUBLE PRECISION array, dimension (N)
-* The N diagonal elements of the tridiagonal matrix T.
-*
-* E (input/output) DOUBLE PRECISION array, dimension (N)
-* On entry, the first (N-1) entries contain the subdiagonal
-* elements of the tridiagonal matrix T; E(N) is set to ZERO.
-*
-* INFO (output) INTEGER
-* INFO = 0(default) : the matrix warrants computations preserving
-* relative accuracy.
-* INFO = 1 : the matrix warrants computations guaranteeing
-* only absolute accuracy.
-*
-* Further Details
-* ===============
-*
-* Based on contributions by
-* Beresford Parlett, University of California, Berkeley, USA
-* Jim Demmel, University of California, Berkeley, USA
-* Inderjit Dhillon, University of Texas, Austin, USA
-* Osni Marques, LBNL/NERSC, USA
-* Christof Voemel, University of California, Berkeley, USA
-*
* =====================================================================
*
* .. Parameters ..