diff options
author | Elena Ivanova <elena.x.ivanova@oracle.com> | 2016-09-07 17:03:43 +0200 |
---|---|---|
committer | Julien Langou <julien.langou@ucdenver.edu> | 2016-09-07 17:03:43 +0200 |
commit | 7d5e4cecc38924d6c6361237d9a097152a1fdcab (patch) | |
tree | 5d829b902ef0fa7cf40104a097678744f7f81613 /TESTING | |
parent | e0975e7be7884da8531d35df18d1dac9b264a65a (diff) |
Unused var JDUM described in ./TESTING/EIG/serrgg.f
See: https://github.com/Reference-LAPACK/lapack/issues/46
Thanks Elena.
Note: The other three precisions do not have the issue.
Diffstat (limited to 'TESTING')
-rw-r--r-- | TESTING/EIG/serrgg.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TESTING/EIG/serrgg.f b/TESTING/EIG/serrgg.f index 21c65ee4..7192d1fd 100644 --- a/TESTING/EIG/serrgg.f +++ b/TESTING/EIG/serrgg.f @@ -78,7 +78,7 @@ * .. Local Scalars .. CHARACTER*2 C2 INTEGER DUMMYK, DUMMYL, I, IFST, ILO, IHI, ILST, INFO, - $ J, M, NCYCLE, NT, SDIM, LWORK, JDUM + $ J, M, NCYCLE, NT, SDIM, LWORK REAL ANRM, BNRM, DIF, SCALE, TOLA, TOLB * .. * .. Local Arrays .. |