Fix problems in comments found by Alexander Kobotov
authorjulie <julielangou@users.noreply.github.com>
Mon, 23 Apr 2012 21:33:19 +0000 (21:33 +0000)
committerjulie <julielangou@users.noreply.github.com>
Mon, 23 Apr 2012 21:33:19 +0000 (21:33 +0000)
Just taking a quick look on the new release I noticed some minor issues there, which probably caused by a generation script:
- If you explore diff for files (c/z)gbrfsx, cgbsvx, cgbsvxx, cheequb, clanhf, zheequb you could find that number of datatype descriptions in documentation were changed to incorrect one (DOUBLE PRECISION instead of COMPLEX, or COMPLEX*16 instead of just COMPLEX).
+ cunbdb has CMPLX instead of COMPLEX for X12 parameter.
+ zggevx RWORK become REAL instead of correct DOUBLE PRECISION
- Number of files got following string "/ output)", which seems meaningless. Just grep for it.

40 files changed:
SRC/cgbrfsx.f
SRC/cgbsvxx.f
SRC/cgerfsx.f
SRC/cgesvxx.f
SRC/cheequb.f
SRC/cherfsx.f
SRC/chesvxx.f
SRC/clanhf.f
SRC/cporfsx.f
SRC/cposvxx.f
SRC/csyrfsx.f
SRC/csysvxx.f
SRC/cunbdb.f
SRC/dgbrfsx.f
SRC/dgbsvxx.f
SRC/dgerfsx.f
SRC/dgesvxx.f
SRC/dporfsx.f
SRC/dposvxx.f
SRC/dsyrfsx.f
SRC/dsysvxx.f
SRC/sgbrfsx.f
SRC/sgbsvxx.f
SRC/sgerfsx.f
SRC/sgesvxx.f
SRC/sporfsx.f
SRC/sposvxx.f
SRC/ssyrfsx.f
SRC/ssysvxx.f
SRC/zgbrfsx.f
SRC/zgbsvxx.f
SRC/zgerfsx.f
SRC/zgesvxx.f
SRC/zggevx.f
SRC/zheequb.f
SRC/zhesvxx.f
SRC/zporfsx.f
SRC/zposvxx.f
SRC/zsyrfsx.f
SRC/zsysvxx.f

index 8bb8a945ce099d7836280fd51709b7edb8c8afe9..fc73496910bab6818370bde7c8e7be4c5a1f7c16 100644 (file)
 *>
 *> \param[in] AB
 *> \verbatim
-*>          AB is DOUBLE PRECISION array, dimension (LDAB,N)
+*>          AB is COMPLEX array, dimension (LDAB,N)
 *>     The original band matrix A, stored in rows 1 to KL+KU+1.
 *>     The j-th column of A is stored in the j-th column of the
 *>     array AB as follows:
 *>
 *> \param[in] AFB
 *> \verbatim
-*>          AFB is DOUBLE PRECISION array, dimension (LDAFB,N)
+*>          AFB is COMPLEX array, dimension (LDAFB,N)
 *>     Details of the LU factorization of the band matrix A, as
 *>     computed by DGBTRF.  U is stored as an upper triangular band
 *>     matrix with KL+KU superdiagonals in rows 1 to KL+KU+1, and
 *>
 *> \param[in] B
 *> \verbatim
-*>          B is REAL array, dimension (LDB,NRHS)
+*>          B is COMPLEX array, dimension (LDB,NRHS)
 *>     The right hand side matrix B.
 *> \endverbatim
 *>
 *>
 *> \param[in,out] X
 *> \verbatim
-*>          X is REAL array, dimension (LDX,NRHS)
+*>          X is COMPLEX array, dimension (LDX,NRHS)
 *>     On entry, the solution matrix X, as computed by SGETRS.
 *>     On exit, the improved solution matrix X.
 *> \endverbatim
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 47abf03fdbd5dc9740c306644c67ce5eeec936c5..654b1810bcb2ba57ad3c2c8c799163c3fcc1f5f1 100644 (file)
 *>
 *> \param[in,out] AB
 *> \verbatim
-*>          AB is REAL array, dimension (LDAB,N)
+*>          AB is COMPLEX array, dimension (LDAB,N)
 *>     On entry, the matrix A in band storage, in rows 1 to KL+KU+1.
 *>     The j-th column of A is stored in the j-th column of the
 *>     array AB as follows:
 *>
 *> \param[in,out] AFB
 *> \verbatim
-*>          AFB is REAL array, dimension (LDAFB,N)
+*>          AFB is COMPLEX array, dimension (LDAFB,N)
 *>     If FACT = 'F', then AFB is an input argument and on entry
 *>     contains details of the LU factorization of the band matrix
 *>     A, as computed by CGBTRF.  U is stored as an upper triangular
 *>
 *> \param[in,out] B
 *> \verbatim
-*>          B is REAL array, dimension (LDB,NRHS)
+*>          B is COMPLEX array, dimension (LDB,NRHS)
 *>     On entry, the N-by-NRHS right hand side matrix B.
 *>     On exit,
 *>     if EQUED = 'N', B is not modified;
 *>
 *> \param[out] X
 *> \verbatim
-*>          X is REAL array, dimension (LDX,NRHS)
+*>          X is COMPLEX array, dimension (LDX,NRHS)
 *>     If INFO = 0, the N-by-NRHS solution matrix X to the original
 *>     system of equations.  Note that A and B are modified on exit
 *>     if EQUED .ne. 'N', and the solution to the equilibrated system is
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 2ba5c1c4984bb609c46cc23db8db355eb4d4f337..698cb229cf38df587c4a933d859f8098211240a6 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index c9ed2c27adc628ca53575755852ee3678a09cada..58b36e81bbd0c85f5fd0570f6fc44276ad6660af 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 697aa80bdd62115ff321d6c10ae8012ce3579c18..b526ad2252d85a605c0f4d5d0be923dc6495845b 100644 (file)
 *>
 *> \param[out] WORK
 *> \verbatim
-*>          WORK is DOUBLE PRECISION array, dimension (3*N)
+*>          WORK is COMPLEX array, dimension (3*N)
 *> \endverbatim
 *>
 *> \param[out] INFO
index 38b0931dcbba6451601c364143e75627980ba6bd..e596b9c3472e2ad8cdb6b998a2f88fc4ff5f0195 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 801f25262a02794a894ca98d4275d4463e05405c..1345b9d57ce45f70c508b460817ffac344ffe96f 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 988cd708a8ee4a7088de5ffb1f13ace11a8959d3..db846edba58d7168dcfdc8cbbaa3598fb084f0a7 100644 (file)
@@ -98,7 +98,7 @@
 *>
 *> \param[in] A
 *> \verbatim
-*>          A is COMPLEX*16 array, dimension ( N*(N+1)/2 );
+*>          A is COMPLEX array, dimension ( N*(N+1)/2 );
 *>            On entry, the matrix A in RFP Format.
 *>            RFP Format is described by TRANSR, UPLO and N as follows:
 *>            If TRANSR='N' then RFP A is (0:N,0:K-1) when N is even;
index 65e07341890c6654bc76ece5ef74ed6ca869edfd..f1d90786e44934432fa79ad322edc715e28e9dee 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 9b881a9faa7145e3b9a01cb4203d1adac7000932..6b985e235517880b723a3879d604d52da5654ba3 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index e496591d67fb1558e4a7ed2b7fd7056b6036dd3f..1625d4fa17bd38f88f803dba10420aae03e72d75 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 296afe834f784138c1cda5a8c6d91c8b27b3661c..20be852662939baaefed68cc0e909879cbc15cbd 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index eacba1f89d50dddde0d6762df66383a4a720e805..248070a162775c1edc8b80b08867bde566b76350 100644 (file)
 *>
 *> \param[in,out] X12
 *> \verbatim
-*>          X12 is CMPLX array, dimension (LDX12,M-Q)
+*>          X12 is COMPLEX array, dimension (LDX12,M-Q)
 *>          On entry, the top-right block of the unitary matrix to
 *>          be reduced. On exit, the form depends on TRANS:
 *>          If TRANS = 'N', then
index 35ab815c2920d95f6c40db767fa35dee9a4b8516..c96c6233886ba98145d40b2df03df7980501a3db 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 5126321cedb57c9dd0bddcda8a6c08d092aeb8f9..3f6c3b68ee7074d9cd93783b7f97382adb9f1f25 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 0a03adc04d9bdccc30753d5293fe2050364b6ef3..6f1921739c7c8d7de26d1648aaff57c21d73caba 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 8ad8b32e386d538472a1f27143e71ff40b67da24..ba2253f7f1b9dab0b829b9b01a2a7d3444e7b31a 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index b2fe0be92f557fd3426ef563c502e70691066179..96462e4467bc2d059bea2c4c49f423ac7e65faed 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index a6f5d52424910c983396ed8de841c545fe4a354d..a7d0acfad749c99abbb8f34d3f0fb1efa5090391 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 0fd1a8cd810071bfa3bcea3e52d37d5732f60f2c..95aba2f990957b3a26784e794610721a2c91abbc 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index e1bbc5f6c076b21d501b802a437d8d24d28f2494..5affc228cc9c92f3a9aaa8917ea97836c2159a4e 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension (NPARAMS)
+*>          PARAMS is DOUBLE PRECISION array, dimension (NPARAMS)
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 9a90069eafc36bee57514576792fc85dc0d551b9..a154c3d6e7b4a18a424158aed5166cfd14f93b27 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index ee0f21c3adb340ad19764fb14648f5ba0255ce39..3e6d3ed9e6d2d5587d44659785936833926c73da 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index e2c2a7f8acbc8793f8925bb995c6e7c918478b34..2e1a6d741bbd48288278bd53277beb61b4db52bb 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 643055b0e446cf0b35cf53fbb39948fcc98969da..bc53c7c7cf5200de582b3e07737cad84ac041882 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 436f72b19e45da287ed12ad1826a6f1ee690ae1a..5149fb6ba59f150bdb0d20fdfd4e1218e8f7e30f 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index ad682473e2d15e4ac23f4f8f8d7bad8ea1b9c869..400dec6281da5e9922834c45d132e240df84a16c 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 380f1566914c742b5653026020f8e44b97664e41..cea4d538d673ee667bc7eaa4010ebff43441cb32 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index a1122e14d7c044bc41db824fe492c2d7703b11a0..4cef8405a59aea110cbe25b44a5606d7da3fe95c 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) REAL array, dimension NPARAMS
+*>          PARAMS is REAL array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index a36728b81c67c2652d309fc252c11dc299bb8960..2b81d403b98a3428c90bfb02a04bea345e79ced7 100644 (file)
 *>
 *> \param[in] AB
 *> \verbatim
-*>          AB is DOUBLE PRECISION array, dimension (LDAB,N)
+*>          AB is COMPLEX*16 array, dimension (LDAB,N)
 *>     The original band matrix A, stored in rows 1 to KL+KU+1.
 *>     The j-th column of A is stored in the j-th column of the
 *>     array AB as follows:
 *>
 *> \param[in] AFB
 *> \verbatim
-*>          AFB is DOUBLE PRECISION array, dimension (LDAFB,N)
+*>          AFB is COMPLEX*16 array, dimension (LDAFB,N)
 *>     Details of the LU factorization of the band matrix A, as
 *>     computed by DGBTRF.  U is stored as an upper triangular band
 *>     matrix with KL+KU superdiagonals in rows 1 to KL+KU+1, and
 *>
 *> \param[in,out] X
 *> \verbatim
-*>          X is DOUBLE PRECISION array, dimension (LDX,NRHS)
+*>          X is COMPLEX*16 array, dimension (LDX,NRHS)
 *>     On entry, the solution matrix X, as computed by DGETRS.
 *>     On exit, the improved solution matrix X.
 *> \endverbatim
 *>
 *> \param[out] BERR
 *> \verbatim
-*>          BERR is DOUBLE PRECISION array, dimension (NRHS)
+*>          BERR is COMPLEX*16 array, dimension (NRHS)
 *>     Componentwise relative backward error.  This is the
 *>     componentwise relative backward error of each solution vector X(j)
 *>     (i.e., the smallest relative change in any element of A or B that
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 41e26c8f0b44ebfcab6e7125f89a8fc2e4c2b354..eddf950e343d7bc526637e195e5574998a9fcd1e 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index dd328b13514dd38eb0f68d3446c29cdc5be76e95..549c32f0bc1db6133909a507f9a99f343c9925f8 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 29ab7e74fd0d4e727e20ec12d5bf82553ca6adf9..3ac901f609a0377353c0cf369d48fc4c2515addc 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 578d996d5c6602280210cd3e58f05f3a8ac364d9..922a717b32650106b2a8908a37750ed0ab8f52b0 100644 (file)
 *>
 *> \param[out] RWORK
 *> \verbatim
-*>          RWORK is REAL array, dimension (lrwork)
+*>          RWORK is DOUBLE PRECISION array, dimension (lrwork)
 *>          lrwork must be at least max(1,6*N) if BALANC = 'S' or 'B',
 *>          and at least max(1,2*N) otherwise.
 *>          Real workspace.
index 6a4e6b5aeaa82ff21e3366c4c715e375cfa25214..12bead6c9f22ff9e27746da7c3e9c8d509cf8163 100644 (file)
 *>
 *> \param[out] WORK
 *> \verbatim
-*>          WORK is DOUBLE PRECISION array, dimension (3*N)
+*>          WORK is COMPLEX*16 array, dimension (3*N)
 *> \endverbatim
 *>
 *> \param[out] INFO
index 238fec6f15c601a3eee98869bce5b247525da7fc..910e210fe83f0d46f6fd1259d70417e985dc3059 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 66acef1e6c28052b7ce663ff7bc9803d578620b1..4a8ae903b83b87c339f902af7dc76872582ccb9d 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index d3f4a2eb774c46357713a1a7835672be385093e0..c6a77065cff63ffa1b884113f8301b59274f1e4c 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index 8780f7dda7e471c9f7cf529e7d1387d57c14ecf5..4f48630b50f805ee6bc6312b6c65e59cb1f1b88d 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults
index f5d9312325810173dfba6642c96729989d54688c..e7ba266e72864483d54f50d2f6abd759acaeae84 100644 (file)
 *>
 *> \param[in,out] PARAMS
 *> \verbatim
-*>          PARAMS is / output) DOUBLE PRECISION array, dimension NPARAMS
+*>          PARAMS is DOUBLE PRECISION array, dimension NPARAMS
 *>     Specifies algorithm parameters.  If an entry is .LT. 0.0, then
 *>     that entry will be filled with default value used for that
 *>     parameter.  Only positions up to NPARAMS are accessed; defaults