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 r122488 = 2.0;
double r122489 = atan2(1.0, 0.0);
double r122490 = r122488 * r122489;
double r122491 = 3.0;
double r122492 = r122490 / r122491;
double r122493 = g;
double r122494 = -r122493;
double r122495 = h;
double r122496 = r122494 / r122495;
double r122497 = acos(r122496);
double r122498 = r122497 / r122491;
double r122499 = r122492 + r122498;
double r122500 = cos(r122499);
double r122501 = r122488 * r122500;
return r122501;
}
double f(double g, double h) {
double r122502 = 2.0;
double r122503 = atan2(1.0, 0.0);
double r122504 = r122502 * r122503;
double r122505 = 3.0;
double r122506 = r122504 / r122505;
double r122507 = r122503 / r122505;
double r122508 = r122506 + r122507;
double r122509 = cos(r122508);
double r122510 = g;
double r122511 = h;
double r122512 = r122510 / r122511;
double r122513 = acos(r122512);
double r122514 = r122513 / r122505;
double r122515 = cos(r122514);
double r122516 = r122509 * r122515;
double r122517 = sin(r122508);
double r122518 = sin(r122514);
double r122519 = r122517 * r122518;
double r122520 = r122516 + r122519;
double r122521 = r122502 * r122520;
return r122521;
}



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