projects / platform / upstream / openblas.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: c4b464c)
Declare SCASUM as EXTERNAL
authorMartin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Wed, 16 Jun 2021 07:33:23 +0000 (09:33 +0200)
committerGitHub <noreply@github.com>
Wed, 16 Jun 2021 07:33:23 +0000 (09:33 +0200)
lapack-netlib/TESTING/EIG/cbdt05.f patch | blob | history

diff --git a/lapack-netlib/TESTING/EIG/cbdt05.f b/lapack-netlib/TESTING/EIG/cbdt05.f
index 5a08ccc..4ed1574 100644 (file)
--- a/lapack-netlib/TESTING/EIG/cbdt05.f
+++ b/lapack-netlib/TESTING/EIG/cbdt05.f
@@ -158,9 +158,8 @@
 *     .. External Functions ..
       LOGICAL            LSAME
       INTEGER            ISAMAX
-      REAL               SASUM, SLAMCH, CLANGE
-      EXTERNAL           LSAME, ISAMAX, SASUM, SLAMCH, CLANGE
-      REAL               SCASUM
+      REAL               SASUM, SCASUM, SLAMCH, CLANGE
+      EXTERNAL           LSAME, ISAMAX, SASUM, SCASUM, SLAMCH, CLANGE
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           CGEMM
Domain: Machine Learning / ML Framework;