Skip to content

Commit 7320891

Browse files
committed
align documentation of bdsqr workspace with code
1 parent 95530dd commit 7320891

File tree

4 files changed

+12
-4
lines changed

4 files changed

+12
-4
lines changed

SRC/cbdsqr.f

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -166,7 +166,9 @@
166166
*>
167167
*> \param[out] RWORK
168168
*> \verbatim
169-
*> RWORK is REAL array, dimension (4*(N-1))
169+
*> RWORK is REAL array, dimension (LRWORK)
170+
*> LRWORK = 4*N, if NCVT = NRU = NCC = 0, and
171+
*> LRWORK = 4*(N-1), otherwise
170172
*> \endverbatim
171173
*>
172174
*> \param[out] INFO

SRC/dbdsqr.f

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -166,7 +166,9 @@
166166
*>
167167
*> \param[out] WORK
168168
*> \verbatim
169-
*> WORK is DOUBLE PRECISION array, dimension (4*(N-1))
169+
*> WORK is DOUBLE PRECISION array, dimension (LWORK)
170+
*> LWORK = 4*N, if NCVT = NRU = NCC = 0, and
171+
*> LWORK = 4*(N-1), otherwise
170172
*> \endverbatim
171173
*>
172174
*> \param[out] INFO

SRC/sbdsqr.f

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -166,7 +166,9 @@
166166
*>
167167
*> \param[out] WORK
168168
*> \verbatim
169-
*> WORK is REAL array, dimension (4*(N-1))
169+
*> WORK is REAL array, dimension (LWORK)
170+
*> LWORK = 4*N, if NCVT = NRU = NCC = 0, and
171+
*> LWORK = 4*(N-1), otherwise
170172
*> \endverbatim
171173
*>
172174
*> \param[out] INFO

SRC/zbdsqr.f

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -166,7 +166,9 @@
166166
*>
167167
*> \param[out] RWORK
168168
*> \verbatim
169-
*> RWORK is DOUBLE PRECISION array, dimension (4*(N-1))
169+
*> RWORK is DOUBLE PRECISION array, dimension (LRWORK)
170+
*> LRWORK = 4*N, if NCVT = NRU = NCC = 0, and
171+
*> LRWORK = 4*(N-1), otherwise
170172
*> \endverbatim
171173
*>
172174
*> \param[out] INFO

0 commit comments

Comments
 (0)