rpl/lapack/lapack/dgeev.f - diff

Return to dgeev.f CVS log

Up to [local] / rpl / lapack / lapack

version 1.7, 2010/12/21 13:53:25	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.