diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-03-10 19:09:21 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-03-10 19:09:21 +0000 |
| commit | 1923c69f7e9857d19b67f9e9befd1b1f37c644ef (patch) | |
| tree | a0729e3779db5c74c0dcda417a0d6eff5c8b3f95 /SRC/dlasq4.f | |
| parent | 86579dddaf0142000a291a7fdac0850278b56317 (diff) | |
| download | lapack-1923c69f7e9857d19b67f9e9befd1b1f37c644ef.tar.gz lapack-1923c69f7e9857d19b67f9e9befd1b1f37c644ef.tar.bz2 lapack-1923c69f7e9857d19b67f9e9befd1b1f37c644ef.zip | |
Formating code, use of * for comment, and follow other LAPACK style
Diffstat (limited to 'SRC/dlasq4.f')
| -rw-r--r-- | SRC/dlasq4.f | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/SRC/dlasq4.f b/SRC/dlasq4.f index 554062f8..ea42bbc4 100644 --- a/SRC/dlasq4.f +++ b/SRC/dlasq4.f @@ -25,6 +25,9 @@ * DLASQ4 computes an approximation TAU to the smallest eigenvalue * using values of d from the previous transform. * +* Arguments +* ========= +* * I0 (input) INTEGER * First index. * |