\sqrt[3]{\frac{g}{2 \cdot a}}\sqrt[3]{\frac{\sqrt[3]{g} \cdot \left(\left(\left(\sqrt[3]{\sqrt[3]{\sqrt[3]{g} \cdot \sqrt[3]{g}}} \cdot \sqrt[3]{\sqrt[3]{\sqrt[3]{g} \cdot \sqrt[3]{g}}}\right) \cdot \sqrt[3]{\sqrt[3]{\sqrt[3]{g} \cdot \sqrt[3]{g}}}\right) \cdot \sqrt[3]{\sqrt[3]{g}}\right)}{2}} \cdot \frac{\sqrt[3]{\sqrt[3]{g}}}{\sqrt[3]{a}}double code(double g, double a) {
return cbrt((g / (2.0 * a)));
}
double code(double g, double a) {
return (cbrt(((cbrt(g) * (((cbrt(cbrt((cbrt(g) * cbrt(g)))) * cbrt(cbrt((cbrt(g) * cbrt(g))))) * cbrt(cbrt((cbrt(g) * cbrt(g))))) * cbrt(cbrt(g)))) / 2.0)) * (cbrt(cbrt(g)) / cbrt(a)));
}



Bits error versus g



Bits error versus a
Results
Initial program 15.9
rmApplied add-cube-cbrt16.1
Applied times-frac16.1
Applied cbrt-prod5.6
rmApplied cbrt-div1.2
rmApplied add-cube-cbrt1.2
Applied cbrt-prod1.2
rmApplied add-cube-cbrt1.4
Final simplification1.4
herbie shell --seed 2020060 +o rules:numerics
(FPCore (g a)
:name "2-ancestry mixing, zero discriminant"
:precision binary64
(cbrt (/ g (* 2 a))))