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 r143965 = 2.0;
double r143966 = atan2(1.0, 0.0);
double r143967 = r143965 * r143966;
double r143968 = 3.0;
double r143969 = r143967 / r143968;
double r143970 = g;
double r143971 = -r143970;
double r143972 = h;
double r143973 = r143971 / r143972;
double r143974 = acos(r143973);
double r143975 = r143974 / r143968;
double r143976 = r143969 + r143975;
double r143977 = cos(r143976);
double r143978 = r143965 * r143977;
return r143978;
}
double f(double g, double h) {
double r143979 = 2.0;
double r143980 = atan2(1.0, 0.0);
double r143981 = r143979 * r143980;
double r143982 = 3.0;
double r143983 = r143981 / r143982;
double r143984 = r143980 / r143982;
double r143985 = r143983 + r143984;
double r143986 = cos(r143985);
double r143987 = g;
double r143988 = h;
double r143989 = r143987 / r143988;
double r143990 = acos(r143989);
double r143991 = r143990 / r143982;
double r143992 = cos(r143991);
double r143993 = r143986 * r143992;
double r143994 = sin(r143985);
double r143995 = sin(r143991);
double r143996 = r143994 * r143995;
double r143997 = r143993 + r143996;
double r143998 = r143979 * r143997;
return r143998;
}



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