--- rpl/lapack/lapack/iladlc.f 2010/04/21 13:45:27 1.2 +++ rpl/lapack/lapack/iladlc.f 2010/08/07 13:22:29 1.6 @@ -1,9 +1,9 @@ - INTEGER FUNCTION ILADLC(M, N, A, LDA) + INTEGER FUNCTION ILADLC( M, N, A, LDA ) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK auxiliary routine (version 3.2.2) -- * -* -- April 2009 -- +* -- June 2010 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- @@ -60,4 +60,4 @@ END DO END IF RETURN - END FUNCTION + END