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 r136335 = 2.0;
double r136336 = atan2(1.0, 0.0);
double r136337 = r136335 * r136336;
double r136338 = 3.0;
double r136339 = r136337 / r136338;
double r136340 = g;
double r136341 = -r136340;
double r136342 = h;
double r136343 = r136341 / r136342;
double r136344 = acos(r136343);
double r136345 = r136344 / r136338;
double r136346 = r136339 + r136345;
double r136347 = cos(r136346);
double r136348 = r136335 * r136347;
return r136348;
}
double f(double g, double h) {
double r136349 = 2.0;
double r136350 = atan2(1.0, 0.0);
double r136351 = r136349 * r136350;
double r136352 = 3.0;
double r136353 = r136351 / r136352;
double r136354 = r136350 / r136352;
double r136355 = r136353 + r136354;
double r136356 = cos(r136355);
double r136357 = g;
double r136358 = h;
double r136359 = r136357 / r136358;
double r136360 = acos(r136359);
double r136361 = r136360 / r136352;
double r136362 = cos(r136361);
double r136363 = r136356 * r136362;
double r136364 = sin(r136355);
double r136365 = sin(r136361);
double r136366 = r136364 * r136365;
double r136367 = r136363 + r136366;
double r136368 = r136349 * r136367;
return r136368;
}



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