Improves the comments in LAPY2 and LAPY3 routines

weslleyspereira · weslleyspereira · commit 08dc990e598b · 2021-06-04T12:34:19.000-03:00
diff --git a/SRC/dlapy2.f b/SRC/dlapy2.f
@@ -31,7 +31,7 @@
 *> \verbatim
 *>
 *> DLAPY2 returns sqrt(x**2+y**2), taking care not to cause unnecessary
-*> overflow.
+*> overflow and unnecessary underflow.
 *> \endverbatim
 *
 *  Arguments:
diff --git a/SRC/dlapy3.f b/SRC/dlapy3.f
@@ -31,7 +31,7 @@
 *> \verbatim
 *>
 *> DLAPY3 returns sqrt(x**2+y**2+z**2), taking care not to cause
-*> unnecessary overflow.
+*> unnecessary overflow and unnecessary underflow.
 *> \endverbatim
 *
 *  Arguments:
diff --git a/SRC/slapy2.f b/SRC/slapy2.f
@@ -31,7 +31,7 @@
 *> \verbatim
 *>
 *> SLAPY2 returns sqrt(x**2+y**2), taking care not to cause unnecessary
-*> overflow.
+*> overflow and unnecessary underflow.
 *> \endverbatim
 *
 *  Arguments:
diff --git a/SRC/slapy3.f b/SRC/slapy3.f
@@ -31,7 +31,7 @@
 *> \verbatim
 *>
 *> SLAPY3 returns sqrt(x**2+y**2+z**2), taking care not to cause
-*> unnecessary overflow.
+*> unnecessary overflow and unnecessary underflow.
 *> \endverbatim
 *
 *  Arguments:

Original file line number	Diff line number	Diff line change
`@@ -31,7 +31,7 @@`
`31`	`31`	`*> \verbatim`
`32`	`32`	`*>`
`33`	`33`	`> DLAPY2 returns sqrt(x2+y*2), taking care not to cause unnecessary`
`34`		`-*> overflow.`
	`34`	`+*> overflow and unnecessary underflow.`
`35`	`35`	`*> \endverbatim`
`36`	`36`	`*`
`37`	`37`	`* Arguments:`