
(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 10 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
(let* ((t_0 (cbrt (+ 1.0 x))))
(if (<= (- t_0 (cbrt x)) 1e-10)
(/ 1.0 (* 3.0 (pow (cbrt x) 2.0)))
(/
(- (+ 1.0 x) x)
(fma
(cbrt x)
(+ t_0 (cbrt x))
(pow (exp 0.6666666666666666) (log1p x)))))))
double code(double x) {
double t_0 = cbrt((1.0 + x));
double tmp;
if ((t_0 - cbrt(x)) <= 1e-10) {
tmp = 1.0 / (3.0 * pow(cbrt(x), 2.0));
} else {
tmp = ((1.0 + x) - x) / fma(cbrt(x), (t_0 + cbrt(x)), pow(exp(0.6666666666666666), log1p(x)));
}
return tmp;
}
function code(x) t_0 = cbrt(Float64(1.0 + x)) tmp = 0.0 if (Float64(t_0 - cbrt(x)) <= 1e-10) tmp = Float64(1.0 / Float64(3.0 * (cbrt(x) ^ 2.0))); else tmp = Float64(Float64(Float64(1.0 + x) - x) / fma(cbrt(x), Float64(t_0 + cbrt(x)), (exp(0.6666666666666666) ^ log1p(x)))); end return tmp end
code[x_] := Block[{t$95$0 = N[Power[N[(1.0 + x), $MachinePrecision], 1/3], $MachinePrecision]}, If[LessEqual[N[(t$95$0 - N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision], 1e-10], N[(1.0 / N[(3.0 * N[Power[N[Power[x, 1/3], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + x), $MachinePrecision] - x), $MachinePrecision] / N[(N[Power[x, 1/3], $MachinePrecision] * N[(t$95$0 + N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] + N[Power[N[Exp[0.6666666666666666], $MachinePrecision], N[Log[1 + x], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt[3]{1 + x}\\
\mathbf{if}\;t\_0 - \sqrt[3]{x} \leq 10^{-10}:\\
\;\;\;\;\frac{1}{3 \cdot {\left(\sqrt[3]{x}\right)}^{2}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(1 + x\right) - x}{\mathsf{fma}\left(\sqrt[3]{x}, t\_0 + \sqrt[3]{x}, {\left(e^{0.6666666666666666}\right)}^{\left(\mathsf{log1p}\left(x\right)\right)}\right)}\\
\end{array}
\end{array}
if (-.f64 (cbrt.f64 (+.f64 x #s(literal 1 binary64))) (cbrt.f64 x)) < 1.00000000000000004e-10Initial program 4.3%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6451.2
Applied rewrites51.2%
Applied rewrites98.5%
Applied rewrites98.5%
Applied rewrites98.5%
if 1.00000000000000004e-10 < (-.f64 (cbrt.f64 (+.f64 x #s(literal 1 binary64))) (cbrt.f64 x)) Initial program 54.6%
lift-cbrt.f64N/A
pow1/3N/A
sqr-powN/A
pow2N/A
lower-pow.f64N/A
lower-pow.f64N/A
metadata-eval51.3
Applied rewrites51.3%
Applied rewrites97.8%
Final simplification98.5%
(FPCore (x)
:precision binary64
(if (<= x 4e+76)
(/
(fma
(cbrt (pow x 4.0))
0.3333333333333333
(fma
(cbrt (/ (/ 1.0 x) x))
0.06172839506172839
(* -0.1111111111111111 (cbrt x))))
(* x x))
(/ -1.0 (* (* -3.0 (cbrt x)) (cbrt x)))))
double code(double x) {
double tmp;
if (x <= 4e+76) {
tmp = fma(cbrt(pow(x, 4.0)), 0.3333333333333333, fma(cbrt(((1.0 / x) / x)), 0.06172839506172839, (-0.1111111111111111 * cbrt(x)))) / (x * x);
} else {
tmp = -1.0 / ((-3.0 * cbrt(x)) * cbrt(x));
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 4e+76) tmp = Float64(fma(cbrt((x ^ 4.0)), 0.3333333333333333, fma(cbrt(Float64(Float64(1.0 / x) / x)), 0.06172839506172839, Float64(-0.1111111111111111 * cbrt(x)))) / Float64(x * x)); else tmp = Float64(-1.0 / Float64(Float64(-3.0 * cbrt(x)) * cbrt(x))); end return tmp end
code[x_] := If[LessEqual[x, 4e+76], N[(N[(N[Power[N[Power[x, 4.0], $MachinePrecision], 1/3], $MachinePrecision] * 0.3333333333333333 + N[(N[Power[N[(N[(1.0 / x), $MachinePrecision] / x), $MachinePrecision], 1/3], $MachinePrecision] * 0.06172839506172839 + N[(-0.1111111111111111 * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(x * x), $MachinePrecision]), $MachinePrecision], N[(-1.0 / N[(N[(-3.0 * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 4 \cdot 10^{+76}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\sqrt[3]{{x}^{4}}, 0.3333333333333333, \mathsf{fma}\left(\sqrt[3]{\frac{\frac{1}{x}}{x}}, 0.06172839506172839, -0.1111111111111111 \cdot \sqrt[3]{x}\right)\right)}{x \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{\left(-3 \cdot \sqrt[3]{x}\right) \cdot \sqrt[3]{x}}\\
\end{array}
\end{array}
if x < 4.0000000000000002e76Initial program 16.0%
Taylor expanded in x around inf
lower-/.f64N/A
Applied rewrites96.8%
if 4.0000000000000002e76 < x Initial program 4.5%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6436.2
Applied rewrites36.2%
Applied rewrites98.5%
Applied rewrites98.5%
Applied rewrites98.6%
Final simplification98.0%
(FPCore (x)
:precision binary64
(if (<= x 4e+76)
(/
(fma
(cbrt (/ 1.0 (* x x)))
0.06172839506172839
(fma
(cbrt (pow x 4.0))
0.3333333333333333
(* -0.1111111111111111 (cbrt x))))
(* x x))
(/ -1.0 (* (* -3.0 (cbrt x)) (cbrt x)))))
double code(double x) {
double tmp;
if (x <= 4e+76) {
tmp = fma(cbrt((1.0 / (x * x))), 0.06172839506172839, fma(cbrt(pow(x, 4.0)), 0.3333333333333333, (-0.1111111111111111 * cbrt(x)))) / (x * x);
} else {
tmp = -1.0 / ((-3.0 * cbrt(x)) * cbrt(x));
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 4e+76) tmp = Float64(fma(cbrt(Float64(1.0 / Float64(x * x))), 0.06172839506172839, fma(cbrt((x ^ 4.0)), 0.3333333333333333, Float64(-0.1111111111111111 * cbrt(x)))) / Float64(x * x)); else tmp = Float64(-1.0 / Float64(Float64(-3.0 * cbrt(x)) * cbrt(x))); end return tmp end
code[x_] := If[LessEqual[x, 4e+76], N[(N[(N[Power[N[(1.0 / N[(x * x), $MachinePrecision]), $MachinePrecision], 1/3], $MachinePrecision] * 0.06172839506172839 + N[(N[Power[N[Power[x, 4.0], $MachinePrecision], 1/3], $MachinePrecision] * 0.3333333333333333 + N[(-0.1111111111111111 * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(x * x), $MachinePrecision]), $MachinePrecision], N[(-1.0 / N[(N[(-3.0 * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision] * N[Power[x, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 4 \cdot 10^{+76}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\sqrt[3]{\frac{1}{x \cdot x}}, 0.06172839506172839, \mathsf{fma}\left(\sqrt[3]{{x}^{4}}, 0.3333333333333333, -0.1111111111111111 \cdot \sqrt[3]{x}\right)\right)}{x \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{\left(-3 \cdot \sqrt[3]{x}\right) \cdot \sqrt[3]{x}}\\
\end{array}
\end{array}
if x < 4.0000000000000002e76Initial program 16.0%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6490.7
Applied rewrites90.7%
Applied rewrites90.4%
Taylor expanded in x around inf
Applied rewrites96.8%
if 4.0000000000000002e76 < x Initial program 4.5%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6436.2
Applied rewrites36.2%
Applied rewrites98.5%
Applied rewrites98.5%
Applied rewrites98.6%
Final simplification98.0%
(FPCore (x) :precision binary64 (/ 1.0 (* 3.0 (pow (cbrt x) 2.0))))
double code(double x) {
return 1.0 / (3.0 * pow(cbrt(x), 2.0));
}
public static double code(double x) {
return 1.0 / (3.0 * Math.pow(Math.cbrt(x), 2.0));
}
function code(x) return Float64(1.0 / Float64(3.0 * (cbrt(x) ^ 2.0))) end
code[x_] := N[(1.0 / N[(3.0 * N[Power[N[Power[x, 1/3], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{3 \cdot {\left(\sqrt[3]{x}\right)}^{2}}
\end{array}
Initial program 7.9%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6452.2
Applied rewrites52.2%
Applied rewrites96.1%
Applied rewrites96.1%
Applied rewrites96.2%
Final simplification96.2%
(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.9%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6452.2
Applied rewrites52.2%
Applied rewrites96.1%
(FPCore (x) :precision binary64 (if (<= x 2.7e+155) (* (cbrt (/ (/ 1.0 x) x)) 0.3333333333333333) (* (pow x -0.6666666666666666) 0.3333333333333333)))
double code(double x) {
double tmp;
if (x <= 2.7e+155) {
tmp = cbrt(((1.0 / x) / x)) * 0.3333333333333333;
} else {
tmp = pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
public static double code(double x) {
double tmp;
if (x <= 2.7e+155) {
tmp = Math.cbrt(((1.0 / x) / x)) * 0.3333333333333333;
} else {
tmp = Math.pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 2.7e+155) tmp = Float64(cbrt(Float64(Float64(1.0 / x) / x)) * 0.3333333333333333); else tmp = Float64((x ^ -0.6666666666666666) * 0.3333333333333333); end return tmp end
code[x_] := If[LessEqual[x, 2.7e+155], N[(N[Power[N[(N[(1.0 / x), $MachinePrecision] / x), $MachinePrecision], 1/3], $MachinePrecision] * 0.3333333333333333), $MachinePrecision], N[(N[Power[x, -0.6666666666666666], $MachinePrecision] * 0.3333333333333333), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 2.7 \cdot 10^{+155}:\\
\;\;\;\;\sqrt[3]{\frac{\frac{1}{x}}{x}} \cdot 0.3333333333333333\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.6666666666666666} \cdot 0.3333333333333333\\
\end{array}
\end{array}
if x < 2.69999999999999994e155Initial program 10.7%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6494.1
Applied rewrites94.1%
if 2.69999999999999994e155 < x Initial program 4.8%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f646.2
Applied rewrites6.2%
Applied rewrites89.1%
(FPCore (x) :precision binary64 (if (<= x 1.35e+154) (* (/ 1.0 (cbrt (* x x))) 0.3333333333333333) (* (pow x -0.6666666666666666) 0.3333333333333333)))
double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = (1.0 / cbrt((x * x))) * 0.3333333333333333;
} else {
tmp = pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
public static double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = (1.0 / Math.cbrt((x * x))) * 0.3333333333333333;
} else {
tmp = Math.pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 1.35e+154) tmp = Float64(Float64(1.0 / cbrt(Float64(x * x))) * 0.3333333333333333); else tmp = Float64((x ^ -0.6666666666666666) * 0.3333333333333333); end return tmp end
code[x_] := If[LessEqual[x, 1.35e+154], N[(N[(1.0 / N[Power[N[(x * x), $MachinePrecision], 1/3], $MachinePrecision]), $MachinePrecision] * 0.3333333333333333), $MachinePrecision], N[(N[Power[x, -0.6666666666666666], $MachinePrecision] * 0.3333333333333333), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1.35 \cdot 10^{+154}:\\
\;\;\;\;\frac{1}{\sqrt[3]{x \cdot x}} \cdot 0.3333333333333333\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.6666666666666666} \cdot 0.3333333333333333\\
\end{array}
\end{array}
if x < 1.35000000000000003e154Initial program 10.7%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6494.0
Applied rewrites94.0%
Applied rewrites94.3%
if 1.35000000000000003e154 < x Initial program 4.8%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f646.9
Applied rewrites6.9%
Applied rewrites89.2%
Final simplification91.8%
(FPCore (x) :precision binary64 (if (<= x 1.35e+154) (* (cbrt (/ 1.0 (* x x))) 0.3333333333333333) (* (pow x -0.6666666666666666) 0.3333333333333333)))
double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = cbrt((1.0 / (x * x))) * 0.3333333333333333;
} else {
tmp = pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
public static double code(double x) {
double tmp;
if (x <= 1.35e+154) {
tmp = Math.cbrt((1.0 / (x * x))) * 0.3333333333333333;
} else {
tmp = Math.pow(x, -0.6666666666666666) * 0.3333333333333333;
}
return tmp;
}
function code(x) tmp = 0.0 if (x <= 1.35e+154) tmp = Float64(cbrt(Float64(1.0 / Float64(x * x))) * 0.3333333333333333); else tmp = Float64((x ^ -0.6666666666666666) * 0.3333333333333333); end return tmp end
code[x_] := If[LessEqual[x, 1.35e+154], N[(N[Power[N[(1.0 / N[(x * x), $MachinePrecision]), $MachinePrecision], 1/3], $MachinePrecision] * 0.3333333333333333), $MachinePrecision], N[(N[Power[x, -0.6666666666666666], $MachinePrecision] * 0.3333333333333333), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1.35 \cdot 10^{+154}:\\
\;\;\;\;\sqrt[3]{\frac{1}{x \cdot x}} \cdot 0.3333333333333333\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.6666666666666666} \cdot 0.3333333333333333\\
\end{array}
\end{array}
if x < 1.35000000000000003e154Initial program 10.7%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6494.0
Applied rewrites94.0%
Applied rewrites94.0%
if 1.35000000000000003e154 < x Initial program 4.8%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f646.9
Applied rewrites6.9%
Applied rewrites89.2%
(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.9%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f64N/A
metadata-evalN/A
associate-*r/N/A
lower-cbrt.f64N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
lower-/.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6452.2
Applied rewrites52.2%
Applied rewrites88.6%
(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.9%
unpow1N/A
metadata-evalN/A
pow-powN/A
pow-to-expN/A
pow-expN/A
*-commutativeN/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.f646.3
Applied rewrites6.3%
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 2024296
(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)))