--- rpl/lapack/lapack/zla_porpvgrw.f 2020/05/21 21:46:06 1.16 +++ rpl/lapack/lapack/zla_porpvgrw.f 2023/08/07 08:39:28 1.17 @@ -99,18 +99,15 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date June 2016 -* *> \ingroup complex16POcomputational * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, $ LDAF, 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..-- -* June 2016 * * .. Scalar Arguments .. CHARACTER*1 UPLO @@ -215,4 +212,7 @@ END IF ZLA_PORPVGRW = RPVGRW +* +* End of ZLA_PORPVGRW +* END