2 \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)2 \cdot \left(\sqrt[3]{\cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)} \cdot \sqrt[3]{\cos \left(\left(\sqrt[3]{\frac{2 \cdot \pi}{3}} \cdot \sqrt[3]{\frac{2 \cdot \pi}{3}}\right) \cdot \sqrt[3]{\frac{2 \cdot \pi}{3}} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right) \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)}\right)double code(double g, double h) {
return (2.0 * cos((((2.0 * ((double) M_PI)) / 3.0) + (acos((-g / h)) / 3.0))));
}
double code(double g, double h) {
return (2.0 * (cbrt(cos((((2.0 * ((double) M_PI)) / 3.0) + (acos((-g / h)) / 3.0)))) * cbrt((cos((((cbrt(((2.0 * ((double) M_PI)) / 3.0)) * cbrt(((2.0 * ((double) M_PI)) / 3.0))) * cbrt(((2.0 * ((double) M_PI)) / 3.0))) + (acos((-g / h)) / 3.0))) * cos((((2.0 * ((double) M_PI)) / 3.0) + (acos((-g / h)) / 3.0)))))));
}



Bits error versus g



Bits error versus h
Results
Initial program 1.0
rmApplied add-cbrt-cube1.5
Simplified1.0
rmApplied cube-mult1.5
Applied cbrt-prod0.1
rmApplied add-cube-cbrt0.0
Final simplification0.0
herbie shell --seed 2020065
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))