diff options
| author | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 17:53:39 +0200 |
|---|---|---|
| committer | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 17:53:39 +0200 |
| commit | ce997774dca40e2a7a0d8a5ca8c1ada21f62b77d (patch) | |
| tree | 4d87f23e1e413acb368f1b0b490bd3057b195e48 /SRC | |
| parent | 402d68531bd540c2a765561405338a7d6abfc069 (diff) | |
| download | lapack-ce997774dca40e2a7a0d8a5ca8c1ada21f62b77d.tar.gz lapack-ce997774dca40e2a7a0d8a5ca8c1ada21f62b77d.tar.bz2 lapack-ce997774dca40e2a7a0d8a5ca8c1ada21f62b77d.zip | |
DLASD0; IWORK, WORK: copy dimension specification from SLASD0
Diffstat (limited to 'SRC')
| -rw-r--r-- | SRC/dlasd0.f | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/SRC/dlasd0.f b/SRC/dlasd0.f index ca0b3b98..832481a4 100644 --- a/SRC/dlasd0.f +++ b/SRC/dlasd0.f @@ -112,14 +112,12 @@ *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER work array. -*> Dimension must be at least (8 * N) +*> IWORK is INTEGER array, dimension (8*N) *> \endverbatim *> *> \param[out] WORK *> \verbatim -*> WORK is DOUBLE PRECISION work array. -*> Dimension must be at least (3 * M**2 + 2 * M) +*> WORK is DOUBLE PRECISION array, dimension (3*M**2+2*M) *> \endverbatim *> *> \param[out] INFO |