ZCGESV, ZCPOSV; parameter WORK: dimension (N*NRHS) -> (N,NRHS)

analogous to DSGESV, DSPOSV

diff --git a/SRC/zcgesv.f b/SRC/zcgesv.f
index 8240e2b..142a0e7 100644 (file)
--- a/SRC/zcgesv.f
+++ b/SRC/zcgesv.f
@@ -142,7 +142,7 @@
 *>
 *> \param[out] WORK
 *> \verbatim
-*>          WORK is COMPLEX*16 array, dimension (N*NRHS)
+*>          WORK is COMPLEX*16 array, dimension (N,NRHS)
 *>          This array is used to hold the residual vectors.
 *> \endverbatim
 *>

diff --git a/SRC/zcposv.f b/SRC/zcposv.f
index 3159c3d..c90a70c 100644 (file)
--- a/SRC/zcposv.f
+++ b/SRC/zcposv.f
@@ -150,7 +150,7 @@
 *>
 *> \param[out] WORK
 *> \verbatim
-*>          WORK is COMPLEX*16 array, dimension (N*NRHS)
+*>          WORK is COMPLEX*16 array, dimension (N,NRHS)
 *>          This array is used to hold the residual vectors.
 *> \endverbatim
 *>