--- rpl/lapack/lapack/dgeev.f 2010/12/21 13:53:25 1.7 +++ rpl/lapack/lapack/dgeev.f 2011/07/22 07:38:04 1.8 @@ -1,10 +1,10 @@ SUBROUTINE DGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, $ LDVR, WORK, LWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver 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 JOBVL, JOBVR @@ -25,8 +25,8 @@ * A * v(j) = lambda(j) * v(j) * where lambda(j) is its eigenvalue. * The left eigenvector u(j) of A satisfies -* u(j)**H * A = lambda(j) * u(j)**H -* where u(j)**H denotes the conjugate transpose of u(j). +* u(j)**T * A = lambda(j) * u(j)**T +* where u(j)**T denotes the transpose of u(j). * * The computed eigenvectors are normalized to have Euclidean norm * equal to 1 and largest component real.