aboutsummaryrefslogtreecommitdiff
path: root/TESTING/MATGEN
diff options
context:
space:
mode:
Diffstat (limited to 'TESTING/MATGEN')
-rw-r--r--TESTING/MATGEN/dlahilb.f1
1 files changed, 0 insertions, 1 deletions
diff --git a/TESTING/MATGEN/dlahilb.f b/TESTING/MATGEN/dlahilb.f
index 7173f70f..630b03f0 100644
--- a/TESTING/MATGEN/dlahilb.f
+++ b/TESTING/MATGEN/dlahilb.f
@@ -202,7 +202,6 @@ C> \brief \b DLAHILB
* Generate matrix B as simply the first NRHS columns of M * the
* identity.
- TMP = DBLE(M)
CALL DLASET('Full', N, NRHS, 0.0D+0, DBLE(M), B, LDB)
* Generate the true solutions in X. Because B = the first NRHS