
(FPCore (x) :precision binary64 (- (cbrt (+ x 1.0)) (cbrt x)))
double code(double x) {
return cbrt((x + 1.0)) - cbrt(x);
}
public static double code(double x) {
return Math.cbrt((x + 1.0)) - Math.cbrt(x);
}
function code(x) return Float64(cbrt(Float64(x + 1.0)) - cbrt(x)) end
code[x_] := N[(N[Power[N[(x + 1.0), $MachinePrecision], 1/3], $MachinePrecision] - N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt[3]{x + 1} - \sqrt[3]{x}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (- (cbrt (+ x 1.0)) (cbrt x)))
double code(double x) {
return cbrt((x + 1.0)) - cbrt(x);
}
public static double code(double x) {
return Math.cbrt((x + 1.0)) - Math.cbrt(x);
}
function code(x) return Float64(cbrt(Float64(x + 1.0)) - cbrt(x)) end
code[x_] := N[(N[Power[N[(x + 1.0), $MachinePrecision], 1/3], $MachinePrecision] - N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt[3]{x + 1} - \sqrt[3]{x}
\end{array}
(FPCore (x)
:precision binary64
(if (<= (- (cbrt (+ x 1.0)) (cbrt x)) 5e-11)
(/ (/ (/ 0.3333333333333333 (cbrt x)) (pow x 0.25)) (pow (cbrt x) 0.25))
(/
(- (+ 1.0 x) x)
(fma
(+ (cbrt (+ 1.0 x)) (cbrt x))
(cbrt x)
(exp (* (log1p x) 0.6666666666666666))))))
double code(double x) {
double tmp;
if ((cbrt((x + 1.0)) - cbrt(x)) <= 5e-11) {
tmp = ((0.3333333333333333 / cbrt(x)) / pow(x, 0.25)) / pow(cbrt(x), 0.25);
} else {
tmp = ((1.0 + x) - x) / fma((cbrt((1.0 + x)) + cbrt(x)), cbrt(x), exp((log1p(x) * 0.6666666666666666)));
}
return tmp;
}
function code(x) tmp = 0.0 if (Float64(cbrt(Float64(x + 1.0)) - cbrt(x)) <= 5e-11) tmp = Float64(Float64(Float64(0.3333333333333333 / cbrt(x)) / (x ^ 0.25)) / (cbrt(x) ^ 0.25)); else tmp = Float64(Float64(Float64(1.0 + x) - x) / fma(Float64(cbrt(Float64(1.0 + x)) + cbrt(x)), cbrt(x), exp(Float64(log1p(x) * 0.6666666666666666)))); end return tmp end
code[x_] := If[LessEqual[N[(N[Power[N[(x + 1.0), $MachinePrecision], 1/3], $MachinePrecision] - N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision], 5e-11], N[(N[(N[(0.3333333333333333 / N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] / N[Power[x, 0.25], $MachinePrecision]), $MachinePrecision] / N[Power[N[Power[x, 1/3], $MachinePrecision], 0.25], $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + x), $MachinePrecision] - x), $MachinePrecision] / N[(N[(N[Power[N[(1.0 + x), $MachinePrecision], 1/3], $MachinePrecision] + N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] * N[Power[x, 1/3], $MachinePrecision] + N[Exp[N[(N[Log[1 + x], $MachinePrecision] * 0.6666666666666666), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\sqrt[3]{x + 1} - \sqrt[3]{x} \leq 5 \cdot 10^{-11}:\\
\;\;\;\;\frac{\frac{\frac{0.3333333333333333}{\sqrt[3]{x}}}{{x}^{0.25}}}{{\left(\sqrt[3]{x}\right)}^{0.25}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(1 + x\right) - x}{\mathsf{fma}\left(\sqrt[3]{1 + x} + \sqrt[3]{x}, \sqrt[3]{x}, e^{\mathsf{log1p}\left(x\right) \cdot 0.6666666666666666}\right)}\\
\end{array}
\end{array}
if (-.f64 (cbrt.f64 (+.f64 x #s(literal 1 binary64))) (cbrt.f64 x)) < 5.00000000000000018e-11Initial program 4.3%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6452.6
Applied rewrites52.6%
Applied rewrites94.9%
Applied rewrites98.6%
if 5.00000000000000018e-11 < (-.f64 (cbrt.f64 (+.f64 x #s(literal 1 binary64))) (cbrt.f64 x)) Initial program 57.5%
lift-cbrt.f64N/A
pow1/3N/A
sqr-powN/A
pow2N/A
lower-pow.f64N/A
lower-pow.f64N/A
metadata-eval54.7
Applied rewrites54.7%
Applied rewrites97.6%
(FPCore (x) :precision binary64 (/ (/ (/ 0.3333333333333333 (cbrt x)) (pow x 0.25)) (pow (cbrt x) 0.25)))
double code(double x) {
return ((0.3333333333333333 / cbrt(x)) / pow(x, 0.25)) / pow(cbrt(x), 0.25);
}
public static double code(double x) {
return ((0.3333333333333333 / Math.cbrt(x)) / Math.pow(x, 0.25)) / Math.pow(Math.cbrt(x), 0.25);
}
function code(x) return Float64(Float64(Float64(0.3333333333333333 / cbrt(x)) / (x ^ 0.25)) / (cbrt(x) ^ 0.25)) end
code[x_] := N[(N[(N[(0.3333333333333333 / N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] / N[Power[x, 0.25], $MachinePrecision]), $MachinePrecision] / N[Power[N[Power[x, 1/3], $MachinePrecision], 0.25], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{\frac{0.3333333333333333}{\sqrt[3]{x}}}{{x}^{0.25}}}{{\left(\sqrt[3]{x}\right)}^{0.25}}
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites93.2%
Applied rewrites96.8%
(FPCore (x) :precision binary64 (/ (/ 0.3333333333333333 (* (cbrt x) (pow x 0.25))) (pow (cbrt x) 0.25)))
double code(double x) {
return (0.3333333333333333 / (cbrt(x) * pow(x, 0.25))) / pow(cbrt(x), 0.25);
}
public static double code(double x) {
return (0.3333333333333333 / (Math.cbrt(x) * Math.pow(x, 0.25))) / Math.pow(Math.cbrt(x), 0.25);
}
function code(x) return Float64(Float64(0.3333333333333333 / Float64(cbrt(x) * (x ^ 0.25))) / (cbrt(x) ^ 0.25)) end
code[x_] := N[(N[(0.3333333333333333 / N[(N[Power[x, 1/3], $MachinePrecision] * N[Power[x, 0.25], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Power[N[Power[x, 1/3], $MachinePrecision], 0.25], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{0.3333333333333333}{\sqrt[3]{x} \cdot {x}^{0.25}}}{{\left(\sqrt[3]{x}\right)}^{0.25}}
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites93.2%
Applied rewrites93.2%
Applied rewrites96.7%
Final simplification96.7%
(FPCore (x) :precision binary64 (* (* (/ -1.0 (cbrt x)) (- (cbrt (pow x -1.0)))) 0.3333333333333333))
double code(double x) {
return ((-1.0 / cbrt(x)) * -cbrt(pow(x, -1.0))) * 0.3333333333333333;
}
public static double code(double x) {
return ((-1.0 / Math.cbrt(x)) * -Math.cbrt(Math.pow(x, -1.0))) * 0.3333333333333333;
}
function code(x) return Float64(Float64(Float64(-1.0 / cbrt(x)) * Float64(-cbrt((x ^ -1.0)))) * 0.3333333333333333) end
code[x_] := N[(N[(N[(-1.0 / N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] * (-N[Power[N[Power[x, -1.0], $MachinePrecision], 1/3], $MachinePrecision])), $MachinePrecision] * 0.3333333333333333), $MachinePrecision]
\begin{array}{l}
\\
\left(\frac{-1}{\sqrt[3]{x}} \cdot \left(-\sqrt[3]{{x}^{-1}}\right)\right) \cdot 0.3333333333333333
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.4%
Taylor expanded in x around 0
Applied rewrites96.5%
Final simplification96.5%
(FPCore (x) :precision binary64 (/ (* (cbrt (/ -1.0 x)) 0.3333333333333333) (cbrt (- x))))
double code(double x) {
return (cbrt((-1.0 / x)) * 0.3333333333333333) / cbrt(-x);
}
public static double code(double x) {
return (Math.cbrt((-1.0 / x)) * 0.3333333333333333) / Math.cbrt(-x);
}
function code(x) return Float64(Float64(cbrt(Float64(-1.0 / x)) * 0.3333333333333333) / cbrt(Float64(-x))) end
code[x_] := N[(N[(N[Power[N[(-1.0 / x), $MachinePrecision], 1/3], $MachinePrecision] * 0.3333333333333333), $MachinePrecision] / N[Power[(-x), 1/3], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\sqrt[3]{\frac{-1}{x}} \cdot 0.3333333333333333}{\sqrt[3]{-x}}
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.5%
(FPCore (x) :precision binary64 (* (/ (cbrt (/ -1.0 x)) (cbrt (- x))) 0.3333333333333333))
double code(double x) {
return (cbrt((-1.0 / x)) / cbrt(-x)) * 0.3333333333333333;
}
public static double code(double x) {
return (Math.cbrt((-1.0 / x)) / Math.cbrt(-x)) * 0.3333333333333333;
}
function code(x) return Float64(Float64(cbrt(Float64(-1.0 / x)) / cbrt(Float64(-x))) * 0.3333333333333333) end
code[x_] := N[(N[(N[Power[N[(-1.0 / x), $MachinePrecision], 1/3], $MachinePrecision] / N[Power[(-x), 1/3], $MachinePrecision]), $MachinePrecision] * 0.3333333333333333), $MachinePrecision]
\begin{array}{l}
\\
\frac{\sqrt[3]{\frac{-1}{x}}}{\sqrt[3]{-x}} \cdot 0.3333333333333333
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.5%
(FPCore (x) :precision binary64 (/ 0.3333333333333333 (pow (cbrt x) 2.0)))
double code(double x) {
return 0.3333333333333333 / pow(cbrt(x), 2.0);
}
public static double code(double x) {
return 0.3333333333333333 / Math.pow(Math.cbrt(x), 2.0);
}
function code(x) return Float64(0.3333333333333333 / (cbrt(x) ^ 2.0)) end
code[x_] := N[(0.3333333333333333 / N[Power[N[Power[x, 1/3], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{0.3333333333333333}{{\left(\sqrt[3]{x}\right)}^{2}}
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.5%
(FPCore (x) :precision binary64 (* (pow (cbrt x) -2.0) 0.3333333333333333))
double code(double x) {
return pow(cbrt(x), -2.0) * 0.3333333333333333;
}
public static double code(double x) {
return Math.pow(Math.cbrt(x), -2.0) * 0.3333333333333333;
}
function code(x) return Float64((cbrt(x) ^ -2.0) * 0.3333333333333333) end
code[x_] := N[(N[Power[N[Power[x, 1/3], $MachinePrecision], -2.0], $MachinePrecision] * 0.3333333333333333), $MachinePrecision]
\begin{array}{l}
\\
{\left(\sqrt[3]{x}\right)}^{-2} \cdot 0.3333333333333333
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.5%
(FPCore (x) :precision binary64 (if (<= x 1.35e+154) (/ 0.3333333333333333 (cbrt (* x x))) (/ 0.3333333333333333 (pow x 0.6666666666666666))))
double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = 0.3333333333333333 / cbrt((x * x));
} else {
tmp = 0.3333333333333333 / pow(x, 0.6666666666666666);
}
return tmp;
}
public static double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = 0.3333333333333333 / Math.cbrt((x * x));
} else {
tmp = 0.3333333333333333 / Math.pow(x, 0.6666666666666666);
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 1.35e+154) tmp = Float64(0.3333333333333333 / cbrt(Float64(x * x))); else tmp = Float64(0.3333333333333333 / (x ^ 0.6666666666666666)); end return tmp end
code[x_] := If[LessEqual[x, 1.35e+154], N[(0.3333333333333333 / N[Power[N[(x * x), $MachinePrecision], 1/3], $MachinePrecision]), $MachinePrecision], N[(0.3333333333333333 / N[Power[x, 0.6666666666666666], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1.35 \cdot 10^{+154}:\\
\;\;\;\;\frac{0.3333333333333333}{\sqrt[3]{x \cdot x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{0.3333333333333333}{{x}^{0.6666666666666666}}\\
\end{array}
\end{array}
if x < 1.35000000000000003e154Initial program 9.1%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6495.1
Applied rewrites95.1%
Applied rewrites94.7%
Applied rewrites95.3%
if 1.35000000000000003e154 < x Initial program 4.7%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f649.7
Applied rewrites9.7%
Applied rewrites98.3%
Applied rewrites89.2%
(FPCore (x) :precision binary64 (/ 0.3333333333333333 (pow x 0.6666666666666666)))
double code(double x) {
return 0.3333333333333333 / pow(x, 0.6666666666666666);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 0.3333333333333333d0 / (x ** 0.6666666666666666d0)
end function
public static double code(double x) {
return 0.3333333333333333 / Math.pow(x, 0.6666666666666666);
}
def code(x): return 0.3333333333333333 / math.pow(x, 0.6666666666666666)
function code(x) return Float64(0.3333333333333333 / (x ^ 0.6666666666666666)) end
function tmp = code(x) tmp = 0.3333333333333333 / (x ^ 0.6666666666666666); end
code[x_] := N[(0.3333333333333333 / N[Power[x, 0.6666666666666666], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{0.3333333333333333}{{x}^{0.6666666666666666}}
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites96.5%
Applied rewrites88.9%
(FPCore (x) :precision binary64 (* (pow x -0.6666666666666666) 0.3333333333333333))
double code(double x) {
return pow(x, -0.6666666666666666) * 0.3333333333333333;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (x ** (-0.6666666666666666d0)) * 0.3333333333333333d0
end function
public static double code(double x) {
return Math.pow(x, -0.6666666666666666) * 0.3333333333333333;
}
def code(x): return math.pow(x, -0.6666666666666666) * 0.3333333333333333
function code(x) return Float64((x ^ -0.6666666666666666) * 0.3333333333333333) end
function tmp = code(x) tmp = (x ^ -0.6666666666666666) * 0.3333333333333333; end
code[x_] := N[(N[Power[x, -0.6666666666666666], $MachinePrecision] * 0.3333333333333333), $MachinePrecision]
\begin{array}{l}
\\
{x}^{-0.6666666666666666} \cdot 0.3333333333333333
\end{array}
Initial program 7.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
sqr-neg-revN/A
associate-/r*N/A
distribute-neg-frac2N/A
distribute-neg-fracN/A
metadata-evalN/A
lower-cbrt.f64N/A
metadata-evalN/A
distribute-neg-fracN/A
distribute-neg-frac2N/A
associate-/r*N/A
sqr-neg-revN/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6453.0
Applied rewrites53.0%
Applied rewrites88.9%
(FPCore (x) :precision binary64 0.0)
double code(double x) {
return 0.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = 0.0d0
end function
public static double code(double x) {
return 0.0;
}
def code(x): return 0.0
function code(x) return 0.0 end
function tmp = code(x) tmp = 0.0; end
code[x_] := 0.0
\begin{array}{l}
\\
0
\end{array}
Initial program 7.0%
rem-exp-logN/A
unpow1N/A
log-powN/A
rem-cube-cbrtN/A
lift-cbrt.f64N/A
pow-to-expN/A
rem-log-expN/A
exp-prodN/A
lower-pow.f64N/A
lower-exp.f64N/A
rem-log-expN/A
pow-to-expN/A
lift-cbrt.f64N/A
rem-cube-cbrtN/A
lift-+.f64N/A
+-commutativeN/A
lower-log1p.f645.0
Applied rewrites5.0%
Taylor expanded in x around inf
Applied rewrites4.1%
(FPCore (x) :precision binary64 (let* ((t_0 (cbrt (+ x 1.0)))) (/ 1.0 (+ (+ (* t_0 t_0) (* (cbrt x) t_0)) (* (cbrt x) (cbrt x))))))
double code(double x) {
double t_0 = cbrt((x + 1.0));
return 1.0 / (((t_0 * t_0) + (cbrt(x) * t_0)) + (cbrt(x) * cbrt(x)));
}
public static double code(double x) {
double t_0 = Math.cbrt((x + 1.0));
return 1.0 / (((t_0 * t_0) + (Math.cbrt(x) * t_0)) + (Math.cbrt(x) * Math.cbrt(x)));
}
function code(x) t_0 = cbrt(Float64(x + 1.0)) return Float64(1.0 / Float64(Float64(Float64(t_0 * t_0) + Float64(cbrt(x) * t_0)) + Float64(cbrt(x) * cbrt(x)))) end
code[x_] := Block[{t$95$0 = N[Power[N[(x + 1.0), $MachinePrecision], 1/3], $MachinePrecision]}, N[(1.0 / N[(N[(N[(t$95$0 * t$95$0), $MachinePrecision] + N[(N[Power[x, 1/3], $MachinePrecision] * t$95$0), $MachinePrecision]), $MachinePrecision] + N[(N[Power[x, 1/3], $MachinePrecision] * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt[3]{x + 1}\\
\frac{1}{\left(t\_0 \cdot t\_0 + \sqrt[3]{x} \cdot t\_0\right) + \sqrt[3]{x} \cdot \sqrt[3]{x}}
\end{array}
\end{array}
herbie shell --seed 2024326
(FPCore (x)
:name "2cbrt (problem 3.3.4)"
:precision binary64
:pre (and (> x 1.0) (< x 1e+308))
:alt
(! :herbie-platform default (/ 1 (+ (* (cbrt (+ x 1)) (cbrt (+ x 1))) (* (cbrt x) (cbrt (+ x 1))) (* (cbrt x) (cbrt x)))))
(- (cbrt (+ x 1.0)) (cbrt x)))