\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\begin{array}{l}
\mathbf{if}\;\left(\frac{1}{1 + x} - \frac{2}{x}\right) + \frac{1}{x - 1} \leq -47.53180757808395:\\
\;\;\;\;\frac{1}{x - 1} + \left(\frac{1}{\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}} \cdot \frac{1}{\sqrt[3]{1 + x}} - \frac{2}{x}\right)\\
\mathbf{elif}\;\left(\frac{1}{1 + x} - \frac{2}{x}\right) + \frac{1}{x - 1} \leq 1.0755405800569676 \cdot 10^{-08}:\\
\;\;\;\;\frac{2}{{x}^{7}} + \left(\frac{2}{{x}^{5}} + \frac{\frac{2}{x \cdot x}}{x}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x - 1} + \frac{x - \left(1 + x\right) \cdot 2}{x \cdot \left(1 + x\right)}\\
\end{array}(FPCore (x) :precision binary64 (+ (- (/ 1.0 (+ x 1.0)) (/ 2.0 x)) (/ 1.0 (- x 1.0))))
(FPCore (x)
:precision binary64
(if (<=
(+ (- (/ 1.0 (+ 1.0 x)) (/ 2.0 x)) (/ 1.0 (- x 1.0)))
-47.53180757808395)
(+
(/ 1.0 (- x 1.0))
(-
(* (/ 1.0 (* (cbrt (+ 1.0 x)) (cbrt (+ 1.0 x)))) (/ 1.0 (cbrt (+ 1.0 x))))
(/ 2.0 x)))
(if (<=
(+ (- (/ 1.0 (+ 1.0 x)) (/ 2.0 x)) (/ 1.0 (- x 1.0)))
1.0755405800569676e-08)
(+ (/ 2.0 (pow x 7.0)) (+ (/ 2.0 (pow x 5.0)) (/ (/ 2.0 (* x x)) x)))
(+ (/ 1.0 (- x 1.0)) (/ (- x (* (+ 1.0 x) 2.0)) (* x (+ 1.0 x)))))))double code(double x) {
return ((1.0 / (x + 1.0)) - (2.0 / x)) + (1.0 / (x - 1.0));
}
double code(double x) {
double tmp;
if ((((1.0 / (1.0 + x)) - (2.0 / x)) + (1.0 / (x - 1.0))) <= -47.53180757808395) {
tmp = (1.0 / (x - 1.0)) + (((1.0 / (cbrt(1.0 + x) * cbrt(1.0 + x))) * (1.0 / cbrt(1.0 + x))) - (2.0 / x));
} else if ((((1.0 / (1.0 + x)) - (2.0 / x)) + (1.0 / (x - 1.0))) <= 1.0755405800569676e-08) {
tmp = (2.0 / pow(x, 7.0)) + ((2.0 / pow(x, 5.0)) + ((2.0 / (x * x)) / x));
} else {
tmp = (1.0 / (x - 1.0)) + ((x - ((1.0 + x) * 2.0)) / (x * (1.0 + x)));
}
return tmp;
}




Bits error versus x
Results
| Original | 9.7 |
|---|---|
| Target | 0.3 |
| Herbie | 0.2 |
if (+.f64 (-.f64 (/.f64 1 (+.f64 x 1)) (/.f64 2 x)) (/.f64 1 (-.f64 x 1))) < -47.5318075780839493Initial program 0.0
rmApplied add-cube-cbrt_binary64_14770.0
Applied add-sqr-sqrt_binary64_14640.0
Applied times-frac_binary64_14480.0
Simplified0.0
Simplified0.0
if -47.5318075780839493 < (+.f64 (-.f64 (/.f64 1 (+.f64 x 1)) (/.f64 2 x)) (/.f64 1 (-.f64 x 1))) < 1.07554058006e-8Initial program 19.8
Taylor expanded around inf 0.8
Simplified0.8
rmApplied unpow3_binary64_15080.8
Applied associate-/r*_binary64_13860.4
if 1.07554058006e-8 < (+.f64 (-.f64 (/.f64 1 (+.f64 x 1)) (/.f64 2 x)) (/.f64 1 (-.f64 x 1))) Initial program 0.1
rmApplied frac-sub_binary64_14510.1
Simplified0.1
Simplified0.1
Final simplification0.2
herbie shell --seed 2020343
(FPCore (x)
:name "3frac (problem 3.3.3)"
:precision binary64
:herbie-target
(/ 2.0 (* x (- (* x x) 1.0)))
(+ (- (/ 1.0 (+ x 1.0)) (/ 2.0 x)) (/ 1.0 (- x 1.0))))