\frac{\left(x - y\right) \cdot \left(x + y\right)}{x \cdot x + y \cdot y}\left(\frac{x}{\mathsf{hypot}\left(x, y\right)} - \frac{y}{\mathsf{hypot}\left(x, y\right)}\right) \cdot \frac{x + y}{\mathsf{hypot}\left(x, y\right)}double f(double x, double y) {
double r98024 = x;
double r98025 = y;
double r98026 = r98024 - r98025;
double r98027 = r98024 + r98025;
double r98028 = r98026 * r98027;
double r98029 = r98024 * r98024;
double r98030 = r98025 * r98025;
double r98031 = r98029 + r98030;
double r98032 = r98028 / r98031;
return r98032;
}
double f(double x, double y) {
double r98033 = x;
double r98034 = y;
double r98035 = hypot(r98033, r98034);
double r98036 = r98033 / r98035;
double r98037 = r98034 / r98035;
double r98038 = r98036 - r98037;
double r98039 = r98033 + r98034;
double r98040 = r98039 / r98035;
double r98041 = r98038 * r98040;
return r98041;
}




Bits error versus x




Bits error versus y
Results
| Original | 19.9 |
|---|---|
| Target | 0.1 |
| Herbie | 0.0 |
Initial program 19.9
rmApplied add-sqr-sqrt19.9
Applied times-frac20.0
Simplified20.0
Simplified0.0
rmApplied div-sub0.0
Final simplification0.0
herbie shell --seed 2019303 +o rules:numerics
(FPCore (x y)
:name "Kahan p9 Example"
:precision binary64
:pre (and (< 0.0 x 1) (< y 1))
:herbie-target
(if (< 0.5 (fabs (/ x y)) 2) (/ (* (- x y) (+ x y)) (+ (* x x) (* y y))) (- 1 (/ 2 (+ 1 (* (/ x y) (/ x y))))))
(/ (* (- x y) (+ x y)) (+ (* x x) (* y y))))