diff options
Diffstat (limited to 'SRC/slapy2.f')
-rw-r--r-- | SRC/slapy2.f | 24 |
1 files changed, 11 insertions, 13 deletions
diff --git a/SRC/slapy2.f b/SRC/slapy2.f index b41dd22a..6d31ba94 100644 --- a/SRC/slapy2.f +++ b/SRC/slapy2.f @@ -15,8 +15,8 @@ *> [TXT]</a> *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SLAPY2( X, Y ) * @@ -24,19 +24,18 @@ * REAL X, Y * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAPY2 returns sqrt(x**2+y**2), taking care not to cause unnecessary *> overflow. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] X *> \verbatim @@ -48,10 +47,9 @@ *> Y is REAL *> X and Y specify the values x and y. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley |