diff options
Diffstat (limited to 'SRC/slaed1.f')
| -rw-r--r-- | SRC/slaed1.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/slaed1.f b/SRC/slaed1.f index 58758d36..971c0bf3 100644 --- a/SRC/slaed1.f +++ b/SRC/slaed1.f @@ -26,9 +26,9 @@ * of a full symmetric matrix (which was reduced to tridiagonal form) * are desired. * -* T = Q(in) ( D(in) + RHO * Z*Z' ) Q'(in) = Q(out) * D(out) * Q'(out) +* T = Q(in) ( D(in) + RHO * Z*Z**T ) Q**T(in) = Q(out) * D(out) * Q**T(out) * -* where Z = Q'u, u is a vector of length N with ones in the +* where Z = Q**T*u, u is a vector of length N with ones in the * CUTPNT and CUTPNT + 1 th elements and zeros elsewhere. * * The eigenvectors of the original matrix are stored in Q, and the |