--- rpl/lapack/lapack/dpotri.f 2010/04/21 13:45:23 1.2 +++ rpl/lapack/lapack/dpotri.f 2011/07/22 07:38:10 1.8 @@ -1,9 +1,9 @@ SUBROUTINE DPOTRI( UPLO, N, A, LDA, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK 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..-- -* November 2006 +* -- April 2011 -- * * .. Scalar Arguments .. CHARACTER UPLO @@ -86,7 +86,7 @@ IF( INFO.GT.0 ) $ RETURN * -* Form inv(U)*inv(U)' or inv(L)'*inv(L). +* Form inv(U) * inv(U)**T or inv(L)**T * inv(L). * CALL DLAUUM( UPLO, N, A, LDA, INFO ) *