\frac{\left(x - y\right) \cdot \left(x + y\right)}{x \cdot x + y \cdot y}\frac{x - y}{\mathsf{hypot}\left(x, y\right)} \cdot \frac{x + y}{\mathsf{hypot}\left(x, y\right)}double f(double x, double y) {
double r89014 = x;
double r89015 = y;
double r89016 = r89014 - r89015;
double r89017 = r89014 + r89015;
double r89018 = r89016 * r89017;
double r89019 = r89014 * r89014;
double r89020 = r89015 * r89015;
double r89021 = r89019 + r89020;
double r89022 = r89018 / r89021;
return r89022;
}
double f(double x, double y) {
double r89023 = x;
double r89024 = y;
double r89025 = r89023 - r89024;
double r89026 = hypot(r89023, r89024);
double r89027 = r89025 / r89026;
double r89028 = r89023 + r89024;
double r89029 = r89028 / r89026;
double r89030 = r89027 * r89029;
return r89030;
}




Bits error versus x




Bits error versus y
Results
| Original | 20.3 |
|---|---|
| Target | 0.1 |
| Herbie | 0.0 |
Initial program 20.3
rmApplied add-sqr-sqrt20.3
Simplified20.3
Simplified20.3
rmApplied times-frac0.0
Final simplification0.0
herbie shell --seed 2019354 +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))))