diff options
| author | Henning Thielemann <git@henning-thielemann.de> | 2017-06-07 11:26:28 +0200 |
|---|---|---|
| committer | Henning Thielemann <git@henning-thielemann.de> | 2017-06-07 11:26:28 +0200 |
| commit | 56cc6931df6f123ab5cfced57db127b685ce4a3e (patch) | |
| tree | 1beb05847bec091b710adb542aa53a55ff6c2a3f /SRC/dstedc.f | |
| parent | 86da0273d1a0421490537d4827acf31ec3419c9d (diff) | |
| download | lapack-56cc6931df6f123ab5cfced57db127b685ce4a3e.tar.gz lapack-56cc6931df6f123ab5cfced57db127b685ce4a3e.tar.bz2 lapack-56cc6931df6f123ab5cfced57db127b685ce4a3e.zip | |
xSTEDC, DSPEVD, ZHPEVD, DTGSEN; comment for array WORK: consistently use dimension (MAX(1,LWORK))
Diffstat (limited to 'SRC/dstedc.f')
| -rw-r--r-- | SRC/dstedc.f | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/SRC/dstedc.f b/SRC/dstedc.f index d7f95372..386c22b8 100644 --- a/SRC/dstedc.f +++ b/SRC/dstedc.f @@ -105,8 +105,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is DOUBLE PRECISION array, -*> dimension (LWORK) +*> WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK)) *> On exit, if INFO = 0, WORK(1) returns the optimal LWORK. *> \endverbatim *> |