--- rpl/lapack/lapack/dlag2s.f	2010/12/21 13:53:29	1.7
+++ rpl/lapack/lapack/dlag2s.f	2011/07/22 07:38:06	1.8
@@ -1,9 +1,9 @@
       SUBROUTINE DLAG2S( M, N, A, LDA, SA, LDSA, INFO )
 *
-*  -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) --
+*  -- LAPACK PROTOTYPE auxiliary routine (version 3.3.1) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     August 2007
+*  -- April 2011                                                      --
 *
 *     ..
 *     .. Scalar Arguments ..
@@ -54,7 +54,7 @@
 *                PRECISION overflow threshold, in this case, the content
 *                of SA in exit is unspecified.
 *
-*  =========
+*  =====================================================================
 *
 *     .. Local Scalars ..
       INTEGER            I, J