diff options
Diffstat (limited to 'SRC/cla_wwaddw.f')
| -rw-r--r-- | SRC/cla_wwaddw.f | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/SRC/cla_wwaddw.f b/SRC/cla_wwaddw.f index 605dd85c..b3dc461a 100644 --- a/SRC/cla_wwaddw.f +++ b/SRC/cla_wwaddw.f @@ -17,7 +17,7 @@ COMPLEX X( * ), Y( * ), W( * ) * .. * -* Purpose +* Purpose * ======= * * CLA_WWADDW adds a vector W into a doubled-single vector (X, Y). @@ -25,8 +25,8 @@ * This works for all extant IBM's hex and binary floating point * arithmetics, but not for decimal. * -* Arguments -* ========= +* Arguments +* ========= * * N (input) INTEGER * The length of vectors X, Y, and W. |