--- rpl/lapack/lapack/dgebal.f 2014/01/27 09:28:15 1.14 +++ rpl/lapack/lapack/dgebal.f 2015/11/26 11:44:15 1.15 @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date November 2013 +*> \date November 2015 * *> \ingroup doubleGEcomputational * @@ -160,10 +160,10 @@ * ===================================================================== SUBROUTINE DGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * -* -- LAPACK computational routine (version 3.5.0) -- +* -- LAPACK computational routine (version 3.6.0) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2013 +* November 2015 * * .. Scalar Arguments .. CHARACTER JOB @@ -201,8 +201,6 @@ * .. Intrinsic Functions .. INTRINSIC ABS, MAX, MIN * .. -* .. Executable Statements .. -* * Test the input parameters * INFO = 0