--- rpl/lapack/lapack/zlapmr.f 2018/05/29 07:18:27 1.13 +++ rpl/lapack/lapack/zlapmr.f 2023/08/07 08:39:30 1.14 @@ -97,17 +97,14 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 -* *> \ingroup complex16OTHERauxiliary * * ===================================================================== SUBROUTINE ZLAPMR( FORWRD, M, N, X, LDX, K ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary 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 .. LOGICAL FORWRD @@ -198,7 +195,7 @@ * RETURN * -* End of ZLAPMT +* End of ZLAPMR * END