--- rpl/lapack/lapack/dlarre.f 2010/08/06 15:32:29 1.4 +++ rpl/lapack/lapack/dlarre.f 2010/08/07 13:18:07 1.5 @@ -4,10 +4,10 @@ $ WORK, IWORK, INFO ) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.2) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2006 +* June 2010 * * .. Scalar Arguments .. CHARACTER RANGE @@ -91,7 +91,7 @@ * An interval [LEFT,RIGHT] has converged if * RIGHT-LEFT.LT.MAX( RTOL1*GAP, RTOL2*MAX(|LEFT|,|RIGHT|) ) * -* SPLTOL (input) DOUBLE PRECISION +* SPLTOL (input) DOUBLE PRECISION * The threshold for splitting. * * NSPLIT (output) INTEGER