diff options
-rw-r--r-- | Python/hypot.c | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/Python/hypot.c b/Python/hypot.c new file mode 100644 index 0000000..293aeb8 --- /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); + } +} |