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 r134587 = 2.0;
double r134588 = atan2(1.0, 0.0);
double r134589 = r134587 * r134588;
double r134590 = 3.0;
double r134591 = r134589 / r134590;
double r134592 = g;
double r134593 = -r134592;
double r134594 = h;
double r134595 = r134593 / r134594;
double r134596 = acos(r134595);
double r134597 = r134596 / r134590;
double r134598 = r134591 + r134597;
double r134599 = cos(r134598);
double r134600 = r134587 * r134599;
return r134600;
}
double f(double g, double h) {
double r134601 = 2.0;
double r134602 = atan2(1.0, 0.0);
double r134603 = r134601 * r134602;
double r134604 = 3.0;
double r134605 = r134603 / r134604;
double r134606 = r134602 / r134604;
double r134607 = r134605 + r134606;
double r134608 = cos(r134607);
double r134609 = g;
double r134610 = h;
double r134611 = r134609 / r134610;
double r134612 = acos(r134611);
double r134613 = r134612 / r134604;
double r134614 = cos(r134613);
double r134615 = r134608 * r134614;
double r134616 = sin(r134607);
double r134617 = sin(r134613);
double r134618 = r134616 * r134617;
double r134619 = r134615 + r134618;
double r134620 = r134601 * r134619;
return r134620;
}



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