diff options
| author | langou <langou@users.noreply.github.com> | 2012-08-09 15:49:47 +0000 |
|---|---|---|
| committer | langou <langou@users.noreply.github.com> | 2012-08-09 15:49:47 +0000 |
| commit | eca2d3e81e78f3decb20f86a9462ef9a3f49d7c3 (patch) | |
| tree | 7a2628c2de22e32a6ae25e7f812e58684ad292c5 /SRC/dgeevx.f | |
| parent | d797a2b9defae2991b28ca622acce3b72ae68494 (diff) | |
| download | lapack-eca2d3e81e78f3decb20f86a9462ef9a3f49d7c3.tar.gz lapack-eca2d3e81e78f3decb20f86a9462ef9a3f49d7c3.tar.bz2 lapack-eca2d3e81e78f3decb20f86a9462ef9a3f49d7c3.zip | |
Correct comments in
SRC/sgeev.f
SRC/dgeevx.f
SRC/dgeev.f
SRC/sgeevx.f
Reported by Konstantinos Kafoysas (Beta CAE Systems S.A., Greece) on Thu Aug
9th, 2012 through LAPACK mailing list.
> In the comments of dgeev function
>
> * The left eigenvector u(j) of A satisfies
> * u(j)**T * A = lambda(j) * u(j)**T
> * where u(j)**T denotes the transpose of u(j).
>
> u is supposed to satisfy u(j)**H * A = lambda(j) * u(j)**H
Diffstat (limited to 'SRC/dgeevx.f')
| -rw-r--r-- | SRC/dgeevx.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/dgeevx.f b/SRC/dgeevx.f index b3abd223..f2964cd0 100644 --- a/SRC/dgeevx.f +++ b/SRC/dgeevx.f @@ -53,8 +53,8 @@ *> A * v(j) = lambda(j) * v(j) *> where lambda(j) is its eigenvalue. *> The left eigenvector u(j) of A satisfies -*> u(j)**T * A = lambda(j) * u(j)**T -*> where u(j)**T denotes the transpose of u(j). +*> u(j)**H * A = lambda(j) * u(j)**H +*> where u(j)**H denotes the conjugate-transpose of u(j). *> *> The computed eigenvectors are normalized to have Euclidean norm *> equal to 1 and largest component real. |