diff options
| author | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 23:21:45 +0200 |
|---|---|---|
| committer | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 23:21:45 +0200 |
| commit | 8a034babb0033c08de05662a6ed282a886dac2fc (patch) | |
| tree | 5a43770463818f7fe5cff6e6109e4dce0bc85462 | |
| parent | 5283c5c153c0b99526183c13d175c47229de3068 (diff) | |
| download | lapack-8a034babb0033c08de05662a6ed282a886dac2fc.tar.gz lapack-8a034babb0033c08de05662a6ed282a886dac2fc.tar.bz2 lapack-8a034babb0033c08de05662a6ed282a886dac2fc.zip | |
xLALSA, DLASDA; parameters WORK, IWORK: turn "at least" phrases into dimension specifications
| -rw-r--r-- | SRC/clalsa.f | 3 | ||||
| -rw-r--r-- | SRC/dlalsa.f | 6 | ||||
| -rw-r--r-- | SRC/dlasda.f | 3 | ||||
| -rw-r--r-- | SRC/slalsa.f | 6 | ||||
| -rw-r--r-- | SRC/zlalsa.f | 3 |
5 files changed, 7 insertions, 14 deletions
diff --git a/SRC/clalsa.f b/SRC/clalsa.f index 8a817924..a1b74c01 100644 --- a/SRC/clalsa.f +++ b/SRC/clalsa.f @@ -232,8 +232,7 @@ *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER array. -*> The dimension must be at least 3 * N +*> IWORK is INTEGER array, dimension (3*N) *> \endverbatim *> *> \param[out] INFO diff --git a/SRC/dlalsa.f b/SRC/dlalsa.f index 4aef66c9..72880496 100644 --- a/SRC/dlalsa.f +++ b/SRC/dlalsa.f @@ -227,14 +227,12 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is DOUBLE PRECISION array. -*> The dimension must be at least N. +*> WORK is DOUBLE PRECISION array, dimension (N) *> \endverbatim *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER array. -*> The dimension must be at least 3 * N +*> IWORK is INTEGER array, dimension (3*N) *> \endverbatim *> *> \param[out] INFO diff --git a/SRC/dlasda.f b/SRC/dlasda.f index 20ceedd0..c9c2aa17 100644 --- a/SRC/dlasda.f +++ b/SRC/dlasda.f @@ -239,8 +239,7 @@ *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER array. -*> Dimension must be at least (7 * N). +*> IWORK is INTEGER array, dimension (7*N) *> \endverbatim *> *> \param[out] INFO diff --git a/SRC/slalsa.f b/SRC/slalsa.f index 65707a15..5d82f33d 100644 --- a/SRC/slalsa.f +++ b/SRC/slalsa.f @@ -227,14 +227,12 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is REAL array. -*> The dimension must be at least N. +*> WORK is REAL array, dimension (N) *> \endverbatim *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER array. -*> The dimension must be at least 3 * N +*> IWORK is INTEGER array, dimension (3*N) *> \endverbatim *> *> \param[out] INFO diff --git a/SRC/zlalsa.f b/SRC/zlalsa.f index 6ad6cc5e..7d939c0a 100644 --- a/SRC/zlalsa.f +++ b/SRC/zlalsa.f @@ -232,8 +232,7 @@ *> *> \param[out] IWORK *> \verbatim -*> IWORK is INTEGER array. -*> The dimension must be at least 3 * N +*> IWORK is INTEGER array, dimension (3*N) *> \endverbatim *> *> \param[out] INFO |