--- rpl/lapack/lapack/dla_gercond.f 2020/05/21 21:45:57 1.16 +++ rpl/lapack/lapack/dla_gercond.f 2023/08/07 08:38:52 1.17 @@ -18,9 +18,9 @@ * Definition: * =========== * -* DOUBLE PRECISION FUNCTION DLA_GERCOND ( TRANS, N, A, LDA, AF, -* LDAF, IPIV, CMODE, C, -* INFO, WORK, IWORK ) +* DOUBLE PRECISION FUNCTION DLA_GERCOND( TRANS, N, A, LDA, AF, +* LDAF, IPIV, CMODE, C, +* INFO, WORK, IWORK ) * * .. Scalar Arguments .. * CHARACTER TRANS @@ -143,19 +143,16 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 -* *> \ingroup doubleGEcomputational * * ===================================================================== - DOUBLE PRECISION FUNCTION DLA_GERCOND ( TRANS, N, A, LDA, AF, - $ LDAF, IPIV, CMODE, C, - $ INFO, WORK, IWORK ) + DOUBLE PRECISION FUNCTION DLA_GERCOND( TRANS, N, A, LDA, AF, + $ LDAF, IPIV, CMODE, C, + $ INFO, WORK, IWORK ) * -* -- 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 TRANS @@ -326,4 +323,6 @@ * RETURN * +* End of DLA_GERCOND +* END