--- rpl/lapack/lapack/dgesc2.f 2010/08/06 15:32:24 1.4 +++ rpl/lapack/lapack/dgesc2.f 2010/08/07 13:18:06 1.5 @@ -1,9 +1,9 @@ SUBROUTINE DGESC2( N, A, LDA, RHS, IPIV, JPIV, SCALE ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.2) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2006 +* June 2010 * * .. Scalar Arguments .. INTEGER LDA, N @@ -49,9 +49,9 @@ * The pivot indices; for 1 <= j <= N, column j of the * matrix has been interchanged with column JPIV(j). * -* SCALE (output) DOUBLE PRECISION -* On exit, SCALE contains the scale factor. SCALE is chosen -* 0 <= SCALE <= 1 to prevent owerflow in the solution. +* SCALE (output) DOUBLE PRECISION +* On exit, SCALE contains the scale factor. SCALE is chosen +* 0 <= SCALE <= 1 to prevent owerflow in the solution. * * Further Details * ===============