\frac{x \cdot x - \left(y \cdot 4\right) \cdot y}{x \cdot x + \left(y \cdot 4\right) \cdot y}\begin{array}{l}
\mathbf{if}\;x \cdot x \le 3.8294891824959408 \cdot 10^{-274}:\\
\;\;\;\;-1\\
\mathbf{elif}\;x \cdot x \le 266773995513865110000:\\
\;\;\;\;\sqrt[3]{{\left(\frac{x \cdot x - \left(y \cdot 4\right) \cdot y}{x \cdot x + \left(y \cdot 4\right) \cdot y}\right)}^{3}}\\
\mathbf{elif}\;x \cdot x \le 5.49876266685562049 \cdot 10^{31}:\\
\;\;\;\;-1\\
\mathbf{elif}\;x \cdot x \le 7.5837520276094458 \cdot 10^{303}:\\
\;\;\;\;\frac{x \cdot x - \left(y \cdot 4\right) \cdot y}{x \cdot x + \left(y \cdot 4\right) \cdot y}\\
\mathbf{else}:\\
\;\;\;\;1\\
\end{array}double code(double x, double y) {
return ((double) (((double) (((double) (x * x)) - ((double) (((double) (y * 4.0)) * y)))) / ((double) (((double) (x * x)) + ((double) (((double) (y * 4.0)) * y))))));
}
double code(double x, double y) {
double VAR;
if ((((double) (x * x)) <= 3.829489182495941e-274)) {
VAR = -1.0;
} else {
double VAR_1;
if ((((double) (x * x)) <= 2.667739955138651e+20)) {
VAR_1 = ((double) cbrt(((double) pow(((double) (((double) (((double) (x * x)) - ((double) (((double) (y * 4.0)) * y)))) / ((double) (((double) (x * x)) + ((double) (((double) (y * 4.0)) * y)))))), 3.0))));
} else {
double VAR_2;
if ((((double) (x * x)) <= 5.4987626668556205e+31)) {
VAR_2 = -1.0;
} else {
double VAR_3;
if ((((double) (x * x)) <= 7.583752027609446e+303)) {
VAR_3 = ((double) (((double) (((double) (x * x)) - ((double) (((double) (y * 4.0)) * y)))) / ((double) (((double) (x * x)) + ((double) (((double) (y * 4.0)) * y))))));
} else {
VAR_3 = 1.0;
}
VAR_2 = VAR_3;
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus x




Bits error versus y
Results
| Original | 31.2 |
|---|---|
| Target | 30.9 |
| Herbie | 12.1 |
if (* x x) < 3.8294891824959408e-274 or 266773995513865110000 < (* x x) < 5.49876266685562049e31Initial program 27.3
Taylor expanded around 0 10.1
if 3.8294891824959408e-274 < (* x x) < 266773995513865110000Initial program 14.9
rmApplied add-cbrt-cube41.0
Applied add-cbrt-cube40.9
Applied cbrt-undiv40.9
Simplified14.9
if 5.49876266685562049e31 < (* x x) < 7.5837520276094458e303Initial program 16.5
if 7.5837520276094458e303 < (* x x) Initial program 63.2
Taylor expanded around inf 7.8
Final simplification12.1
herbie shell --seed 2020162
(FPCore (x y)
:name "Diagrams.TwoD.Arc:arcBetween from diagrams-lib-1.3.0.3"
:precision binary64
:herbie-target
(if (< (/ (- (* x x) (* (* y 4.0) y)) (+ (* x x) (* (* y 4.0) y))) 0.9743233849626781) (- (/ (* x x) (+ (* x x) (* (* y y) 4.0))) (/ (* (* y y) 4.0) (+ (* x x) (* (* y y) 4.0)))) (- (pow (/ x (sqrt (+ (* x x) (* (* y y) 4.0)))) 2.0) (/ (* (* y y) 4.0) (+ (* x x) (* (* y y) 4.0)))))
(/ (- (* x x) (* (* y 4.0) y)) (+ (* x x) (* (* y 4.0) y))))