diff options
| author | julie <julielangou@users.noreply.github.com> | 2014-10-31 15:48:04 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2014-10-31 15:48:04 +0000 |
| commit | 3098c5b7ffe11e2955b93f3aff745bd2f4dcf7f3 (patch) | |
| tree | b34b4789f8af767f56f3b2296c38a648baecf2f3 /SRC/zlarrv.f | |
| parent | cfb6f61cfc9df598d00eada7a54955b737b657c2 (diff) | |
| download | lapack-3098c5b7ffe11e2955b93f3aff745bd2f4dcf7f3.tar.gz lapack-3098c5b7ffe11e2955b93f3aff745bd2f4dcf7f3.tar.bz2 lapack-3098c5b7ffe11e2955b93f3aff745bd2f4dcf7f3.zip | |
Set default value for INFO - bug reported by Elena Ivanova (oracle) and David Hough
Diffstat (limited to 'SRC/zlarrv.f')
| -rw-r--r-- | SRC/zlarrv.f | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/SRC/zlarrv.f b/SRC/zlarrv.f index 061a4c4c..15dd1eba 100644 --- a/SRC/zlarrv.f +++ b/SRC/zlarrv.f @@ -344,6 +344,7 @@ * .. Executable Statements .. * .. + INFO = 0 * The first N entries of WORK are reserved for the eigenvalues INDLD = N+1 INDLLD= 2*N+1 |