\sqrt[3]{x + 1} - \sqrt[3]{x}\begin{array}{l}
\mathbf{if}\;\sqrt[3]{x + 1} - \sqrt[3]{x} \leq 1.5432653867719637 \cdot 10^{-05}:\\
\;\;\;\;\frac{\sqrt[3]{x}}{x} \cdot \left(0.3333333333333333 + \frac{-0.1111111111111111}{x}\right) + \left(\sqrt[3]{x} - \sqrt[3]{-x} \cdot \sqrt[3]{-1}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt[3]{-1 + x \cdot x}}{\sqrt[3]{x + -1}} - \sqrt[3]{x}\\
\end{array}(FPCore (x) :precision binary64 (- (cbrt (+ x 1.0)) (cbrt x)))
(FPCore (x)
:precision binary64
(if (<= (- (cbrt (+ x 1.0)) (cbrt x)) 1.5432653867719637e-05)
(+
(* (/ (cbrt x) x) (+ 0.3333333333333333 (/ -0.1111111111111111 x)))
(- (cbrt x) (* (cbrt (- x)) (cbrt -1.0))))
(- (/ (cbrt (+ -1.0 (* x x))) (cbrt (+ x -1.0))) (cbrt x))))double code(double x) {
return cbrt(x + 1.0) - cbrt(x);
}
double code(double x) {
double tmp;
if ((cbrt(x + 1.0) - cbrt(x)) <= 1.5432653867719637e-05) {
tmp = ((cbrt(x) / x) * (0.3333333333333333 + (-0.1111111111111111 / x))) + (cbrt(x) - (cbrt(-x) * cbrt(-1.0)));
} else {
tmp = (cbrt(-1.0 + (x * x)) / cbrt(x + -1.0)) - cbrt(x);
}
return tmp;
}



Bits error versus x
Results
if (-.f64 (cbrt.f64 (+.f64 x 1)) (cbrt.f64 x)) < 1.543265387e-5Initial program 60.6
rmApplied add-cube-cbrt_binary6460.9
rmApplied add-cube-cbrt_binary6460.9
Taylor expanded around -inf 64.0
Simplified0.6
if 1.543265387e-5 < (-.f64 (cbrt.f64 (+.f64 x 1)) (cbrt.f64 x)) Initial program 0.3
rmApplied flip-+_binary640.3
Applied cbrt-div_binary640.3
Simplified0.3
Final simplification0.5
herbie shell --seed 2020224
(FPCore (x)
:name "2cbrt (problem 3.3.4)"
:precision binary64
(- (cbrt (+ x 1.0)) (cbrt x)))