--- rpl/lapack/lapack/dgbsvxx.f 2011/11/21 22:19:26 1.6 +++ rpl/lapack/lapack/dgbsvxx.f 2012/07/31 11:06:34 1.7 @@ -200,7 +200,7 @@ *> *> \param[in,out] AFB *> \verbatim -*> AFB is or output) DOUBLE PRECISION array, dimension (LDAFB,N) +*> AFB is DOUBLE PRECISION 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 DGBTRF. U is stored as an upper triangular @@ -227,7 +227,7 @@ *> *> \param[in,out] IPIV *> \verbatim -*> IPIV is or output) INTEGER array, dimension (N) +*> IPIV is INTEGER array, dimension (N) *> If FACT = 'F', then IPIV is an input argument and on entry *> contains the pivot indices from the factorization A = P*L*U *> as computed by DGETRF; row i of the matrix was interchanged @@ -244,7 +244,7 @@ *> *> \param[in,out] EQUED *> \verbatim -*> EQUED is or output) CHARACTER*1 +*> EQUED is CHARACTER*1 *> Specifies the form of equilibration that was done. *> = 'N': No equilibration (always true if FACT = 'N'). *> = 'R': Row equilibration, i.e., A has been premultiplied by @@ -259,7 +259,7 @@ *> *> \param[in,out] R *> \verbatim -*> R is or output) DOUBLE PRECISION array, dimension (N) +*> R is DOUBLE PRECISION array, dimension (N) *> The row scale factors for A. If EQUED = 'R' or 'B', A is *> multiplied on the left by diag(R); if EQUED = 'N' or 'C', R *> is not accessed. R is an input argument if FACT = 'F'; @@ -277,7 +277,7 @@ *> *> \param[in,out] C *> \verbatim -*> C is or output) DOUBLE PRECISION array, dimension (N) +*> C is DOUBLE PRECISION array, dimension (N) *> The column scale factors for A. If EQUED = 'C' or 'B', A is *> multiplied on the right by diag(C); if EQUED = 'N' or 'R', C *> is not accessed. C is an input argument if FACT = 'F'; @@ -473,7 +473,7 @@ *> *> \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 @@ -549,7 +549,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date November 2011 +*> \date April 2012 * *> \ingroup doubleGBsolve * @@ -560,10 +560,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.4.0) -- +* -- LAPACK driver routine (version 3.4.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2011 +* April 2012 * * .. Scalar Arguments .. CHARACTER EQUED, FACT, TRANS