summaryrefslogtreecommitdiff
path: root/TESTING
diff options
context:
space:
mode:
authorJulien Langou <julien.langou@ucdenver.edu>2016-11-21 23:19:13 +0100
committerJulien Langou <julien.langou@ucdenver.edu>2016-11-21 23:19:13 +0100
commite7f8d116ca67359fa77ba3bb4a5e994ce443d451 (patch)
treef1abf9c89927d2cbb7bbcb97ca2ae31c543d1922 /TESTING
parented4e95e4d25f5f995db75445cbc2ba1db5736d23 (diff)
downloadlapack-e7f8d116ca67359fa77ba3bb4a5e994ce443d451.tar.gz
lapack-e7f8d116ca67359fa77ba3bb4a5e994ce443d451.tar.bz2
lapack-e7f8d116ca67359fa77ba3bb4a5e994ce443d451.zip
working on issue https://github.com/Reference-LAPACK/lapack/issues/85
Diffstat (limited to 'TESTING')
-rw-r--r--TESTING/LIN/cdrvls.f2
-rw-r--r--TESTING/LIN/zdrvls.f2
2 files changed, 2 insertions, 2 deletions
diff --git a/TESTING/LIN/cdrvls.f b/TESTING/LIN/cdrvls.f
index de9890f4..ededde5a 100644
--- a/TESTING/LIN/cdrvls.f
+++ b/TESTING/LIN/cdrvls.f
@@ -489,7 +489,7 @@
CALL CLACPY( 'Full', NROWS, NRHS,
$ COPYB, LDB, B, LDB )
END IF
- SRNAMT = 'DGETSLS '
+ SRNAMT = 'CGETSLS '
CALL CGETSLS( TRANS, M, N, NRHS, A,
$ LDA, B, LDB, WORK, LWORK, INFO )
IF( INFO.NE.0 )
diff --git a/TESTING/LIN/zdrvls.f b/TESTING/LIN/zdrvls.f
index 63fcc69e..fe63b540 100644
--- a/TESTING/LIN/zdrvls.f
+++ b/TESTING/LIN/zdrvls.f
@@ -487,7 +487,7 @@
CALL ZLACPY( 'Full', NROWS, NRHS,
$ COPYB, LDB, B, LDB )
END IF
- SRNAMT = 'DGETSLS '
+ SRNAMT = 'ZGETSLS '
CALL ZGETSLS( TRANS, M, N, NRHS, A,
$ LDA, B, LDB, WORK, LWORK, INFO )
IF( INFO.NE.0 )