\frac{x + y}{1 - \frac{y}{z}}\begin{array}{l}
\mathbf{if}\;\frac{x + y}{1 - \frac{y}{z}} \leq -1.1359061377414788 \cdot 10^{-287} \lor \neg \left(\frac{x + y}{1 - \frac{y}{z}} \leq 0\right):\\
\;\;\;\;\frac{x + y}{1 - \frac{y}{z}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{x + y}}{1 + \frac{\sqrt{y}}{\sqrt{z}}} \cdot \frac{\sqrt{x + y}}{1 - \frac{\sqrt{y}}{\sqrt{z}}}\\
\end{array}(FPCore (x y z) :precision binary64 (/ (+ x y) (- 1.0 (/ y z))))
(FPCore (x y z)
:precision binary64
(if (or (<= (/ (+ x y) (- 1.0 (/ y z))) -1.1359061377414788e-287)
(not (<= (/ (+ x y) (- 1.0 (/ y z))) 0.0)))
(/ (+ x y) (- 1.0 (/ y z)))
(*
(/ (sqrt (+ x y)) (+ 1.0 (/ (sqrt y) (sqrt z))))
(/ (sqrt (+ x y)) (- 1.0 (/ (sqrt y) (sqrt z)))))))double code(double x, double y, double z) {
return (x + y) / (1.0 - (y / z));
}
double code(double x, double y, double z) {
double tmp;
if ((((x + y) / (1.0 - (y / z))) <= -1.1359061377414788e-287) || !(((x + y) / (1.0 - (y / z))) <= 0.0)) {
tmp = (x + y) / (1.0 - (y / z));
} else {
tmp = (sqrt(x + y) / (1.0 + (sqrt(y) / sqrt(z)))) * (sqrt(x + y) / (1.0 - (sqrt(y) / sqrt(z))));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 7.2 |
|---|---|
| Target | 3.8 |
| Herbie | 5.9 |
if (/.f64 (+.f64 x y) (-.f64 1 (/.f64 y z))) < -1.13590613774147875e-287 or -0.0 < (/.f64 (+.f64 x y) (-.f64 1 (/.f64 y z))) Initial program 0.1
if -1.13590613774147875e-287 < (/.f64 (+.f64 x y) (-.f64 1 (/.f64 y z))) < -0.0Initial program 58.7
rmApplied add-sqr-sqrt_binary64_1646860.5
Applied add-sqr-sqrt_binary64_1646862.1
Applied times-frac_binary64_1645262.1
Applied add-sqr-sqrt_binary64_1646862.1
Applied difference-of-squares_binary64_1641562.1
Applied add-sqr-sqrt_binary64_1646862.2
Applied times-frac_binary64_1645248.0
Simplified48.0
Simplified48.0
Final simplification5.9
herbie shell --seed 2020355
(FPCore (x y z)
:name "Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1, A"
:precision binary64
:herbie-target
(if (< y -3.7429310762689856e+171) (* (/ (+ y x) (- y)) z) (if (< y 3.5534662456086734e+168) (/ (+ x y) (- 1.0 (/ y z))) (* (/ (+ y x) (- y)) z)))
(/ (+ x y) (- 1.0 (/ y z))))