Declare DZASUM as EXTERNAL
* .. 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
