diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-06-22 09:45:40 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-06-22 09:45:40 +0000 |
| commit | 0d0b443c697874898ee9947afe634c1b89761dce (patch) | |
| tree | 27a6fd0102f166d128c1f5e9ae60942e788a242d /TESTING/EIG/dchkee.f | |
| parent | ffd034b32b7f443988c8fb54274b97d5968dbd85 (diff) | |
| download | lapack-0d0b443c697874898ee9947afe634c1b89761dce.tar.gz lapack-0d0b443c697874898ee9947afe634c1b89761dce.tar.bz2 lapack-0d0b443c697874898ee9947afe634c1b89761dce.zip | |
Summer cleanup
Cleanup some codes, like unused variables.
Used -Walls to detect problems.
Diffstat (limited to 'TESTING/EIG/dchkee.f')
| -rw-r--r-- | TESTING/EIG/dchkee.f | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/TESTING/EIG/dchkee.f b/TESTING/EIG/dchkee.f index cc2c0878..2df71a32 100644 --- a/TESTING/EIG/dchkee.f +++ b/TESTING/EIG/dchkee.f @@ -2353,8 +2353,6 @@ WRITE( NOUT, FMT = 9993 )S2 - S1 * 9999 FORMAT( / ' Execution not attempted due to input errors' ) - 9998 FORMAT( / / 1X, A3, ': NB =', I4, ', NBMIN =', I4, ', NX =', I4, - $ ', NS =', I4, ', MAXB =', I4 ) 9997 FORMAT( / / 1X, A3, ': NB =', I4, ', NBMIN =', I4, ', NX =', I4 ) 9996 FORMAT( / / 1X, A3, ': NB =', I4, ', NBMIN =', I4, ', NS =', I4, $ ', MAXB =', I4, ', NBCOL =', I4 ) |