diff options
Diffstat (limited to 'SRC/sgejsv.f')
| -rw-r--r-- | SRC/sgejsv.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/sgejsv.f b/SRC/sgejsv.f index b302844e..98b1dcd0 100644 --- a/SRC/sgejsv.f +++ b/SRC/sgejsv.f @@ -271,7 +271,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is REAL array, dimension at least LWORK. +*> WORK is REAL array, dimension (LWORK) *> On exit, *> WORK(1) = SCALE = WORK(2) / WORK(1) is the scaling factor such *> that SCALE*SVA(1:N) are the computed singular values |