(FPCore (g a) :precision binary64 (cbrt (/ g (* 2.0 a))))
(FPCore (g a) :precision binary64 (/ 1.0 (/ (- (cbrt (* 2.0 a))) (- (cbrt g)))))
double code(double g, double a) {
return cbrt((g / (2.0 * a)));
}
double code(double g, double a) {
return 1.0 / (-cbrt((2.0 * a)) / -cbrt(g));
}
public static double code(double g, double a) {
return Math.cbrt((g / (2.0 * a)));
}
public static double code(double g, double a) {
return 1.0 / (-Math.cbrt((2.0 * a)) / -Math.cbrt(g));
}
function code(g, a) return cbrt(Float64(g / Float64(2.0 * a))) end
function code(g, a) return Float64(1.0 / Float64(Float64(-cbrt(Float64(2.0 * a))) / Float64(-cbrt(g)))) end
code[g_, a_] := N[Power[N[(g / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], 1/3], $MachinePrecision]
code[g_, a_] := N[(1.0 / N[((-N[Power[N[(2.0 * a), $MachinePrecision], 1/3], $MachinePrecision]) / (-N[Power[g, 1/3], $MachinePrecision])), $MachinePrecision]), $MachinePrecision]
\sqrt[3]{\frac{g}{2 \cdot a}}
\frac{1}{\frac{-\sqrt[3]{2 \cdot a}}{-\sqrt[3]{g}}}
Results
Initial program 15.8
Applied egg-rr0.9
Applied egg-rr0.9
Final simplification0.9
herbie shell --seed 2022181
(FPCore (g a)
:name "2-ancestry mixing, zero discriminant"
:precision binary64
(cbrt (/ g (* 2.0 a))))