--- rpl/lapack/lapack/dlarfgp.f 2010/12/21 13:53:31 1.4 +++ rpl/lapack/lapack/dlarfgp.f 2011/07/22 07:38:07 1.5 @@ -1,9 +1,9 @@ SUBROUTINE DLARFGP( N, ALPHA, X, INCX, TAU ) * -* -- 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 INCX, N @@ -19,13 +19,13 @@ * DLARFGP generates a real elementary reflector H of order n, such * that * -* H * ( alpha ) = ( beta ), H' * H = I. +* H * ( alpha ) = ( beta ), H**T * H = I. * ( x ) ( 0 ) * * where alpha and beta are scalars, beta is non-negative, and x is * an (n-1)-element real vector. H is represented in the form * -* H = I - tau * ( 1 ) * ( 1 v' ) , +* H = I - tau * ( 1 ) * ( 1 v**T ) , * ( v ) * * where tau is a real scalar and v is a real (n-1)-element