version 1.3, 2010/08/06 15:28:36
|
version 1.8, 2011/07/22 07:38:04
|
Line 1
|
Line 1
|
SUBROUTINE DGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, |
SUBROUTINE DGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, |
$ LDVR, WORK, LWORK, INFO ) |
$ 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, -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* November 2006 |
* -- April 2011 -- |
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
CHARACTER JOBVL, JOBVR |
CHARACTER JOBVL, JOBVR |
Line 25
|
Line 25
|
* A * v(j) = lambda(j) * v(j) |
* A * v(j) = lambda(j) * v(j) |
* where lambda(j) is its eigenvalue. |
* where lambda(j) is its eigenvalue. |
* The left eigenvector u(j) of A satisfies |
* The left eigenvector u(j) of A satisfies |
* u(j)**H * A = lambda(j) * u(j)**H |
* u(j)**T * A = lambda(j) * u(j)**T |
* where u(j)**H denotes the conjugate transpose of u(j). |
* where u(j)**T denotes the transpose of u(j). |
* |
* |
* The computed eigenvectors are normalized to have Euclidean norm |
* The computed eigenvectors are normalized to have Euclidean norm |
* equal to 1 and largest component real. |
* equal to 1 and largest component real. |