projects / platform / upstream / lapack.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: b61f3e8)
Fix typo in EXTERNAL
authorMartin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Wed, 22 Feb 2017 15:03:19 +0000 (16:03 +0100)
committerGitHub <noreply@github.com>
Wed, 22 Feb 2017 15:03:19 +0000 (16:03 +0100)
ZHBTRD_HB2ST in the EXTERNAL statement should be ZHETRD_HB2ST (Windows Ifort treated it as an unresolved reference)

TESTING/EIG/zchkhb2stg.f patch | blob | history

diff --git a/TESTING/EIG/zchkhb2stg.f b/TESTING/EIG/zchkhb2stg.f
index 9420be8..88c0499 100644 (file)
--- a/TESTING/EIG/zchkhb2stg.f
+++ b/TESTING/EIG/zchkhb2stg.f
@@ -373,7 +373,7 @@
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           DLASUM, XERBLA, ZHBT21, ZHBTRD, ZLACPY, ZLASET,
-     $                   ZLATMR, ZLATMS, ZHBTRD_HB2ST, ZSTEQR
+     $                   ZLATMR, ZLATMS, ZHETRD_HB2ST, ZSTEQR
 *     ..
 *     .. Intrinsic Functions ..
       INTRINSIC          ABS, DBLE, DCONJG, MAX, MIN, SQRT
Domain: System / Base;