projects / platform / upstream / lapack.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: e7f8d11)
(minor) typo in the code zgetsls.f
authorJulien Langou <julien.langou@ucdenver.edu>
Tue, 22 Nov 2016 00:15:52 +0000 (01:15 +0100)
committerJulien Langou <julien.langou@ucdenver.edu>
Tue, 22 Nov 2016 00:15:52 +0000 (01:15 +0100)
SRC/zgetsls.f patch | blob | history

diff --git a/SRC/zgetsls.f b/SRC/zgetsls.f
index 9b04227..d61b88c 100644 (file)
--- a/SRC/zgetsls.f
+++ b/SRC/zgetsls.f
@@ -198,7 +198,7 @@
       LOGICAL            LSAME
       INTEGER            ILAENV
       DOUBLE PRECISION   DLAMCH, ZLANGE
-      EXTERNAL           LSAME, ILAENV, DLABAD, DLAMCH, DLANGE
+      EXTERNAL           LSAME, ILAENV, DLABAD, DLAMCH, ZLANGE
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           ZGEQR, ZGEMQR, ZLASCL, ZLASET,
Domain: System / Base;