--- rpl/lapack/lapack/dlaneg.f	2010/08/06 15:32:27	1.4
+++ rpl/lapack/lapack/dlaneg.f	2010/08/07 13:18:07	1.5
@@ -1,11 +1,10 @@
-      FUNCTION DLANEG( N, D, LLD, SIGMA, PIVMIN, R )
+      INTEGER FUNCTION DLANEG( N, D, LLD, SIGMA, PIVMIN, R )
       IMPLICIT NONE
-      INTEGER DLANEG
 *
-*  -- 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 ..
       INTEGER            N, R