--- rpl/lapack/lapack/dgeqp3.f 2011/11/21 20:42:51 1.9 +++ rpl/lapack/lapack/dgeqp3.f 2012/12/14 12:30:20 1.12 @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date November 2011 +*> \date September 2012 * *> \ingroup doubleGEcomputational * @@ -137,7 +137,7 @@ *> *> H(i) = I - tau * v * v**T *> -*> where tau is a real/complex scalar, and v is a real/complex vector +*> where tau is a real scalar, and v is a real/complex vector *> with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in *> A(i+1:m,i), and tau in TAU(i). *> \endverbatim @@ -151,10 +151,10 @@ * ===================================================================== SUBROUTINE DGEQP3( M, N, A, LDA, JPVT, TAU, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.4.0) -- +* -- LAPACK computational routine (version 3.4.2) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2011 +* September 2012 * * .. Scalar Arguments .. INTEGER INFO, LDA, LWORK, M, N