--- rpl/lapack/lapack/dlaqp2.f 2010/12/21 13:53:31 1.8 +++ rpl/lapack/lapack/dlaqp2.f 2011/07/22 07:38:07 1.9 @@ -1,10 +1,10 @@ SUBROUTINE DLAQP2( M, N, OFFSET, A, LDA, JPVT, TAU, VN1, VN2, $ WORK ) * -* -- LAPACK auxiliary routine (version 3.2.2) -- +* -- LAPACK auxiliary routine (version 3.3.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* June 2010 +* -- April 2011 -- * * .. Scalar Arguments .. INTEGER LDA, M, N, OFFSET @@ -75,7 +75,7 @@ * Partial column norm updating strategy modified by * Z. Drmac and Z. Bujanovic, Dept. of Mathematics, * University of Zagreb, Croatia. -* June 2010 +* -- April 2011 -- * For more details see LAPACK Working Note 176. * ===================================================================== * @@ -133,7 +133,7 @@ * IF( I.LE.N ) THEN * -* Apply H(i)' to A(offset+i:m,i+1:n) from the left. +* Apply H(i)**T to A(offset+i:m,i+1:n) from the left. * AII = A( OFFPI, I ) A( OFFPI, I ) = ONE