home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
py2s152.zip
/
Python
/
hypot.c
< prev
next >
Wrap
C/C++ Source or Header
|
1999-06-27
|
335b
|
27 lines
/* 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);
}
}