*** empty log message ***

diff --git a/Python/hypot.c b/Python/hypot.c
new file mode 100644 (file)
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);
+       }
+}