\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 r115601 = x;
double r115602 = y;
double r115603 = r115601 - r115602;
double r115604 = r115601 + r115602;
double r115605 = r115603 * r115604;
double r115606 = r115601 * r115601;
double r115607 = r115602 * r115602;
double r115608 = r115606 + r115607;
double r115609 = r115605 / r115608;
return r115609;
}
double f(double x, double y) {
double r115610 = x;
double r115611 = y;
double r115612 = r115610 - r115611;
double r115613 = hypot(r115610, r115611);
double r115614 = r115612 / r115613;
double r115615 = r115610 + r115611;
double r115616 = r115615 / r115613;
double r115617 = r115614 * r115616;
return r115617;
}




Bits error versus x




Bits error versus y
Results
| Original | 20.1 |
|---|---|
| Target | 0.1 |
| Herbie | 0.0 |
Initial program 20.1
rmApplied add-sqr-sqrt20.1
Applied times-frac20.2
Simplified20.2
Simplified0.0
Final simplification0.0
herbie shell --seed 2019326 +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))))