diff --git a/Python/hypot.c b/Python/hypot.c new file mode 100644 index 00000000000..293aeb819c7 --- /dev/null +++ b/Python/hypot.c @@ -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); + } +}