2 \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)2 \cdot \left(\cos \left(\frac{2 \cdot \pi}{3} + \frac{\pi}{3}\right) \cdot \cos \left(\frac{\cos^{-1} \left(\frac{g}{h}\right)}{3}\right) + \sin \left(\frac{2 \cdot \pi}{3} + \frac{\pi}{3}\right) \cdot \sin \left(\frac{\cos^{-1} \left(\frac{g}{h}\right)}{3}\right)\right)double f(double g, double h) {
double r150896 = 2.0;
double r150897 = atan2(1.0, 0.0);
double r150898 = r150896 * r150897;
double r150899 = 3.0;
double r150900 = r150898 / r150899;
double r150901 = g;
double r150902 = -r150901;
double r150903 = h;
double r150904 = r150902 / r150903;
double r150905 = acos(r150904);
double r150906 = r150905 / r150899;
double r150907 = r150900 + r150906;
double r150908 = cos(r150907);
double r150909 = r150896 * r150908;
return r150909;
}
double f(double g, double h) {
double r150910 = 2.0;
double r150911 = atan2(1.0, 0.0);
double r150912 = r150910 * r150911;
double r150913 = 3.0;
double r150914 = r150912 / r150913;
double r150915 = r150911 / r150913;
double r150916 = r150914 + r150915;
double r150917 = cos(r150916);
double r150918 = g;
double r150919 = h;
double r150920 = r150918 / r150919;
double r150921 = acos(r150920);
double r150922 = r150921 / r150913;
double r150923 = cos(r150922);
double r150924 = r150917 * r150923;
double r150925 = sin(r150916);
double r150926 = sin(r150922);
double r150927 = r150925 * r150926;
double r150928 = r150924 + r150927;
double r150929 = r150910 * r150928;
return r150929;
}



Bits error versus g



Bits error versus h
Results
Initial program 1.0
rmApplied distribute-frac-neg1.0
Applied acos-neg1.0
Applied div-sub1.0
Applied associate-+r-1.0
Applied cos-diff0.0
Final simplification0.0
herbie shell --seed 2020002
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))