ref: 1bb96d542cd43a027934ca372e0ab8c87f523db9
dir: /sys/src/cmd/python/Python/hypot.c/
/* hypot() replacement */
#include "pyconfig.h"
#include "pyport.h"
double hypot(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);
}
}