--- rpl/lapack/lapack/dsgesv.f	2020/05/21 21:46:01	1.21
+++ rpl/lapack/lapack/dsgesv.f	2023/08/07 08:39:06	1.22
@@ -187,18 +187,15 @@
 *> \author Univ. of Colorado Denver
 *> \author NAG Ltd.
 *
-*> \date June 2016
-*
 *> \ingroup doubleGEsolve
 *
 *  =====================================================================
       SUBROUTINE DSGESV( N, NRHS, A, LDA, IPIV, B, LDB, X, LDX, WORK,
      $                   SWORK, ITER, INFO )
 *
-*  -- LAPACK driver routine (version 3.8.0) --
+*  -- LAPACK driver routine --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     June 2016
 *
 *     .. Scalar Arguments ..
       INTEGER            INFO, ITER, LDA, LDB, LDX, N, NRHS
@@ -428,6 +425,6 @@
 *
       RETURN
 *
-*     End of DSGESV.
+*     End of DSGESV
 *
       END