diff --git a/lapack-netlib/TESTING/EIG/zbdt05.f b/lapack-netlib/TESTING/EIG/zbdt05.f index bbf0208b7..f262351e4 100644 --- a/lapack-netlib/TESTING/EIG/zbdt05.f +++ b/lapack-netlib/TESTING/EIG/zbdt05.f @@ -158,9 +158,8 @@ * .. External Functions .. LOGICAL LSAME INTEGER IDAMAX - DOUBLE PRECISION DASUM, DLAMCH, ZLANGE - EXTERNAL LSAME, IDAMAX, DASUM, DLAMCH, ZLANGE - DOUBLE PRECISION DZASUM + DOUBLE PRECISION DASUM, DZASUM, DLAMCH, ZLANGE + EXTERNAL LSAME, IDAMAX, DASUM, DZASUM, DLAMCH, ZLANGE * .. * .. External Subroutines .. EXTERNAL ZGEMM