Skip to content

Commit 59ec917

Browse files
authored
Merge pull request #161 from thielema/array-dimensions
fix dimension specification in some comments
2 parents 0b0dcee + 8a034ba commit 59ec917

9 files changed

Lines changed: 11 additions & 18 deletions

File tree

SRC/clalsa.f

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -232,8 +232,7 @@
232232
*>
233233
*> \param[out] IWORK
234234
*> \verbatim
235-
*> IWORK is INTEGER array.
236-
*> The dimension must be at least 3 * N
235+
*> IWORK is INTEGER array, dimension (3*N)
237236
*> \endverbatim
238237
*>
239238
*> \param[out] INFO

SRC/dlaed3.f

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -116,7 +116,7 @@
116116
*>
117117
*> \param[in] Q2
118118
*> \verbatim
119-
*> Q2 is DOUBLE PRECISION array, dimension (LDQ2, N)
119+
*> Q2 is DOUBLE PRECISION array, dimension (LDQ2*N)
120120
*> The first K columns of this matrix contain the non-deflated
121121
*> eigenvectors for the split problem.
122122
*> \endverbatim

SRC/dlalsa.f

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -227,14 +227,12 @@
227227
*>
228228
*> \param[out] WORK
229229
*> \verbatim
230-
*> WORK is DOUBLE PRECISION array.
231-
*> The dimension must be at least N.
230+
*> WORK is DOUBLE PRECISION array, dimension (N)
232231
*> \endverbatim
233232
*>
234233
*> \param[out] IWORK
235234
*> \verbatim
236-
*> IWORK is INTEGER array.
237-
*> The dimension must be at least 3 * N
235+
*> IWORK is INTEGER array, dimension (3*N)
238236
*> \endverbatim
239237
*>
240238
*> \param[out] INFO

SRC/dlasda.f

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -239,8 +239,7 @@
239239
*>
240240
*> \param[out] IWORK
241241
*> \verbatim
242-
*> IWORK is INTEGER array.
243-
*> Dimension must be at least (7 * N).
242+
*> IWORK is INTEGER array, dimension (7*N)
244243
*> \endverbatim
245244
*>
246245
*> \param[out] INFO

SRC/slaed3.f

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -116,7 +116,7 @@
116116
*>
117117
*> \param[in] Q2
118118
*> \verbatim
119-
*> Q2 is REAL array, dimension (LDQ2, N)
119+
*> Q2 is REAL array, dimension (LDQ2*N)
120120
*> The first K columns of this matrix contain the non-deflated
121121
*> eigenvectors for the split problem.
122122
*> \endverbatim

SRC/slalsa.f

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -227,14 +227,12 @@
227227
*>
228228
*> \param[out] WORK
229229
*> \verbatim
230-
*> WORK is REAL array.
231-
*> The dimension must be at least N.
230+
*> WORK is REAL array, dimension (N)
232231
*> \endverbatim
233232
*>
234233
*> \param[out] IWORK
235234
*> \verbatim
236-
*> IWORK is INTEGER array.
237-
*> The dimension must be at least 3 * N
235+
*> IWORK is INTEGER array, dimension (3*N)
238236
*> \endverbatim
239237
*>
240238
*> \param[out] INFO

SRC/zcgesv.f

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -142,7 +142,7 @@
142142
*>
143143
*> \param[out] WORK
144144
*> \verbatim
145-
*> WORK is COMPLEX*16 array, dimension (N*NRHS)
145+
*> WORK is COMPLEX*16 array, dimension (N,NRHS)
146146
*> This array is used to hold the residual vectors.
147147
*> \endverbatim
148148
*>

SRC/zcposv.f

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -150,7 +150,7 @@
150150
*>
151151
*> \param[out] WORK
152152
*> \verbatim
153-
*> WORK is COMPLEX*16 array, dimension (N*NRHS)
153+
*> WORK is COMPLEX*16 array, dimension (N,NRHS)
154154
*> This array is used to hold the residual vectors.
155155
*> \endverbatim
156156
*>

SRC/zlalsa.f

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -232,8 +232,7 @@
232232
*>
233233
*> \param[out] IWORK
234234
*> \verbatim
235-
*> IWORK is INTEGER array.
236-
*> The dimension must be at least 3 * N
235+
*> IWORK is INTEGER array, dimension (3*N)
237236
*> \endverbatim
238237
*>
239238
*> \param[out] INFO

0 commit comments

Comments
 (0)