--- rpl/lapack/lapack/zhfrk.f 2018/05/29 07:18:21 1.17 +++ rpl/lapack/lapack/zhfrk.f 2023/08/07 08:39:25 1.18 @@ -160,18 +160,15 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date June 2017 -* *> \ingroup complex16OTHERcomputational * * ===================================================================== SUBROUTINE ZHFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, $ C ) * -* -- LAPACK computational routine (version 3.7.1) -- +* -- 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 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA