Declare SCASUM as EXTERNAL

This commit is contained in:
Martin Kroeker
2021-06-16 09:33:23 +02:00
committed by GitHub
parent c4b464cac6
commit 92e024bbb3

View File

@@ -158,9 +158,8 @@
* .. External Functions .. * .. External Functions ..
LOGICAL LSAME LOGICAL LSAME
INTEGER ISAMAX INTEGER ISAMAX
REAL SASUM, SLAMCH, CLANGE REAL SASUM, SCASUM, SLAMCH, CLANGE
EXTERNAL LSAME, ISAMAX, SASUM, SLAMCH, CLANGE EXTERNAL LSAME, ISAMAX, SASUM, SCASUM, SLAMCH, CLANGE
REAL SCASUM
* .. * ..
* .. External Subroutines .. * .. External Subroutines ..
EXTERNAL CGEMM EXTERNAL CGEMM