*** empty log message ***
This commit is contained in:
parent
927f6e68fb
commit
57b1822459
|
@ -0,0 +1,26 @@
|
|||
/* hypot() replacement */
|
||||
|
||||
#include "config.h"
|
||||
#include "myproto.h"
|
||||
#include "mymath.h"
|
||||
|
||||
double hypot(x, y)
|
||||
double x;
|
||||
double y;
|
||||
{
|
||||
double yx;
|
||||
|
||||
x = fabs(x);
|
||||
y = fabs(y);
|
||||
if (x < y) {
|
||||
double temp = x;
|
||||
x = y;
|
||||
y = temp;
|
||||
}
|
||||
if (x == 0.)
|
||||
return 0.;
|
||||
else {
|
||||
yx = y/x;
|
||||
return x*sqrt(1.+yx*yx);
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue