Correct a bug in the description of the WORK parameter in (c,z)la_syrpvgrw.f

WORK is real
Bug report sent from Elena Ivanova (Oracle) on Feb 14th 2014

diff --git a/SRC/cla_syrpvgrw.f b/SRC/cla_syrpvgrw.f
index 606e0213a31554ce62808746d10def156d5db6fe..4163f3ca4ff6061e9516b83cee23bee8392a2cf5 100644 (file)
--- a/SRC/cla_syrpvgrw.f
+++ b/SRC/cla_syrpvgrw.f
@@ -104,7 +104,7 @@
 *>
 *> \param[in] WORK
 *> \verbatim
-*>          WORK is COMPLEX array, dimension (2*N)
+*>          WORK is REAL array, dimension (2*N)
 *> \endverbatim
 *
 *  Authors:

diff --git a/SRC/zla_syrpvgrw.f b/SRC/zla_syrpvgrw.f
index 44d2f526f1d277ef4e97d90306cde7e215753b9d..46259334510558da816cd55f1e275c70da4e8a61 100644 (file)
--- a/SRC/zla_syrpvgrw.f
+++ b/SRC/zla_syrpvgrw.f
@@ -104,7 +104,7 @@
 *>
 *> \param[in] WORK
 *> \verbatim
-*>          WORK is COMPLEX*16 array, dimension (2*N)
+*>          WORK is DOUBLE PRECISION array, dimension (2*N)
 *> \endverbatim
 *
 *  Authors: