Staging
v0.8.1
v0.8.1
Revision 841815e2b244725c54225aaaf5965704a461ca7c authored by cvs2svn on 09 October 2000, 23:43:55 UTC, committed by cvs2svn on 09 October 2000, 23:43:55 UTC
1 parent cfc4178
hypot.c
/* hypot() replacement */
#include "config.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);
}
}
Computing file changes ...