--- rpl/lapack/lapack/dla_syrpvgrw.f 2020/05/21 21:45:58 1.15 +++ rpl/lapack/lapack/dla_syrpvgrw.f 2023/08/07 08:38:52 1.16 @@ -114,18 +114,15 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 -* *> \ingroup doubleSYcomputational * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, $ LDAF, IPIV, WORK ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 * * .. Scalar Arguments .. CHARACTER*1 UPLO @@ -317,4 +314,7 @@ END IF DLA_SYRPVGRW = RPVGRW +* +* End of DLA_SYRPVGRW +* END