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 r116885 = 2.0;
double r116886 = atan2(1.0, 0.0);
double r116887 = r116885 * r116886;
double r116888 = 3.0;
double r116889 = r116887 / r116888;
double r116890 = g;
double r116891 = -r116890;
double r116892 = h;
double r116893 = r116891 / r116892;
double r116894 = acos(r116893);
double r116895 = r116894 / r116888;
double r116896 = r116889 + r116895;
double r116897 = cos(r116896);
double r116898 = r116885 * r116897;
return r116898;
}
double f(double g, double h) {
double r116899 = 2.0;
double r116900 = atan2(1.0, 0.0);
double r116901 = r116899 * r116900;
double r116902 = 3.0;
double r116903 = r116901 / r116902;
double r116904 = r116900 / r116902;
double r116905 = r116903 + r116904;
double r116906 = cos(r116905);
double r116907 = g;
double r116908 = h;
double r116909 = r116907 / r116908;
double r116910 = acos(r116909);
double r116911 = r116910 / r116902;
double r116912 = cos(r116911);
double r116913 = r116906 * r116912;
double r116914 = sin(r116905);
double r116915 = sin(r116911);
double r116916 = r116914 * r116915;
double r116917 = r116913 + r116916;
double r116918 = r116899 * r116917;
return r116918;
}



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 2020060 +o rules:numerics
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))