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 r129961 = 2.0;
double r129962 = atan2(1.0, 0.0);
double r129963 = r129961 * r129962;
double r129964 = 3.0;
double r129965 = r129963 / r129964;
double r129966 = g;
double r129967 = -r129966;
double r129968 = h;
double r129969 = r129967 / r129968;
double r129970 = acos(r129969);
double r129971 = r129970 / r129964;
double r129972 = r129965 + r129971;
double r129973 = cos(r129972);
double r129974 = r129961 * r129973;
return r129974;
}
double f(double g, double h) {
double r129975 = 2.0;
double r129976 = atan2(1.0, 0.0);
double r129977 = r129975 * r129976;
double r129978 = 3.0;
double r129979 = r129977 / r129978;
double r129980 = r129976 / r129978;
double r129981 = r129979 + r129980;
double r129982 = cos(r129981);
double r129983 = g;
double r129984 = h;
double r129985 = r129983 / r129984;
double r129986 = acos(r129985);
double r129987 = r129986 / r129978;
double r129988 = cos(r129987);
double r129989 = r129982 * r129988;
double r129990 = sin(r129981);
double r129991 = sin(r129987);
double r129992 = r129990 * r129991;
double r129993 = r129989 + r129992;
double r129994 = r129975 * r129993;
return r129994;
}



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