summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorlangou <julien.langou@ucdenver.edu>2017-06-03 22:39:47 +0000
committerGitHub <noreply@github.com>2017-06-03 22:39:47 +0000
commit59ec9174312925d68ef13652d716067ddc003757 (patch)
tree5a43770463818f7fe5cff6e6109e4dce0bc85462
parent0b0dcee3f8c2d2cea5aba274f56018bbdc979e72 (diff)
parent8a034babb0033c08de05662a6ed282a886dac2fc (diff)
downloadlapack-59ec9174312925d68ef13652d716067ddc003757.tar.gz
lapack-59ec9174312925d68ef13652d716067ddc003757.tar.bz2
lapack-59ec9174312925d68ef13652d716067ddc003757.zip
Merge pull request #161 from thielema/array-dimensions
fix dimension specification in some comments
-rw-r--r--SRC/clalsa.f3
-rw-r--r--SRC/dlaed3.f2
-rw-r--r--SRC/dlalsa.f6
-rw-r--r--SRC/dlasda.f3
-rw-r--r--SRC/slaed3.f2
-rw-r--r--SRC/slalsa.f6
-rw-r--r--SRC/zcgesv.f2
-rw-r--r--SRC/zcposv.f2
-rw-r--r--SRC/zlalsa.f3
9 files changed, 11 insertions, 18 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/dlaed3.f b/SRC/dlaed3.f
index 4e62b314..ae331b9d 100644
--- a/SRC/dlaed3.f
+++ b/SRC/dlaed3.f
@@ -116,7 +116,7 @@
*>
*> \param[in] Q2
*> \verbatim
-*> Q2 is DOUBLE PRECISION array, dimension (LDQ2, N)
+*> Q2 is DOUBLE PRECISION array, dimension (LDQ2*N)
*> The first K columns of this matrix contain the non-deflated
*> eigenvectors for the split problem.
*> \endverbatim
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/slaed3.f b/SRC/slaed3.f
index 3ff991d8..b9e0b586 100644
--- a/SRC/slaed3.f
+++ b/SRC/slaed3.f
@@ -116,7 +116,7 @@
*>
*> \param[in] Q2
*> \verbatim
-*> Q2 is REAL array, dimension (LDQ2, N)
+*> Q2 is REAL array, dimension (LDQ2*N)
*> The first K columns of this matrix contain the non-deflated
*> eigenvectors for the split problem.
*> \endverbatim
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/zcgesv.f b/SRC/zcgesv.f
index 8240e2b6..142a0e7c 100644
--- 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 3159c3dd..c90a70ce 100644
--- 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
*>
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