diff options
| author | james <james@8a072113-8704-0410-8d35-dd094bca7971> | 2011-06-22 11:27:16 +0000 |
|---|---|---|
| committer | james <james@8a072113-8704-0410-8d35-dd094bca7971> | 2011-06-22 11:27:16 +0000 |
| commit | 03c6181030267d5727c2253afc2cb7606817a591 (patch) | |
| tree | b682f4803262bee11a874d9c9c12d4f6577f9778 /SRC/slaed7.f | |
| parent | 0d0b443c697874898ee9947afe634c1b89761dce (diff) | |
| download | lapack-03c6181030267d5727c2253afc2cb7606817a591.tar.gz lapack-03c6181030267d5727c2253afc2cb7606817a591.tar.bz2 lapack-03c6181030267d5727c2253afc2cb7606817a591.zip | |
added an additional "N*N" to xSTEDC workspace "WORK" to correct problem with LWORK being too small in some cases in the 'V' option when eigenvectors are computed for the dense matrix.
Diffstat (limited to 'SRC/slaed7.f')
| -rw-r--r-- | SRC/slaed7.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/slaed7.f b/SRC/slaed7.f index d36837b7..2ea91c32 100644 --- a/SRC/slaed7.f +++ b/SRC/slaed7.f @@ -142,7 +142,7 @@ * Each number indicates the S value to be used in the * corresponding Givens rotation. * -* WORK (workspace) REAL array, dimension (3*N+QSIZ*N) +* WORK (workspace) REAL array, dimension (3*N+2*QSIZ*N) * * IWORK (workspace) INTEGER array, dimension (4*N) * |