diff options
Diffstat (limited to 'SRC/sgelq2.f')
| -rw-r--r-- | SRC/sgelq2.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/sgelq2.f b/SRC/sgelq2.f index 45eee7d6..d7f5c105 100644 --- a/SRC/sgelq2.f +++ b/SRC/sgelq2.f @@ -57,7 +57,7 @@ * * Each H(i) has the form * -* H(i) = I - tau * v * v' +* H(i) = I - tau * v * v**T * * where tau is a real scalar, and v is a real vector with * v(1:i-1) = 0 and v(i) = 1; v(i+1:n) is stored on exit in A(i,i+1:n), |