\sqrt[3]{\frac{g}{2 \cdot a}}\sqrt[3]{\frac{\left(\sqrt[3]{\sqrt[3]{g} \cdot \sqrt[3]{g}} \cdot \sqrt[3]{\sqrt[3]{g}}\right) \cdot \left(1 \cdot \sqrt[3]{g}\right)}{2}} \cdot \frac{\sqrt[3]{\sqrt[3]{g}}}{\sqrt[3]{a}}double f(double g, double a) {
double r142006 = g;
double r142007 = 2.0;
double r142008 = a;
double r142009 = r142007 * r142008;
double r142010 = r142006 / r142009;
double r142011 = cbrt(r142010);
return r142011;
}
double f(double g, double a) {
double r142012 = g;
double r142013 = cbrt(r142012);
double r142014 = r142013 * r142013;
double r142015 = cbrt(r142014);
double r142016 = cbrt(r142013);
double r142017 = r142015 * r142016;
double r142018 = 1.0;
double r142019 = r142018 * r142013;
double r142020 = r142017 * r142019;
double r142021 = 2.0;
double r142022 = r142020 / r142021;
double r142023 = cbrt(r142022);
double r142024 = a;
double r142025 = cbrt(r142024);
double r142026 = r142016 / r142025;
double r142027 = r142023 * r142026;
return r142027;
}



Bits error versus g



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