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{\cos^{-1} \left(\frac{g}{h}\right)}{3} - \frac{\pi}{\frac{3}{2}}\right) \cdot \frac{1}{2} + \frac{\sqrt{3}}{2} \cdot \sin \left(\frac{\cos^{-1} \left(\frac{g}{h}\right)}{3} - \frac{\pi}{\frac{3}{2}}\right)\right)double f(double g, double h) {
double r2776633 = 2.0;
double r2776634 = atan2(1.0, 0.0);
double r2776635 = r2776633 * r2776634;
double r2776636 = 3.0;
double r2776637 = r2776635 / r2776636;
double r2776638 = g;
double r2776639 = -r2776638;
double r2776640 = h;
double r2776641 = r2776639 / r2776640;
double r2776642 = acos(r2776641);
double r2776643 = r2776642 / r2776636;
double r2776644 = r2776637 + r2776643;
double r2776645 = cos(r2776644);
double r2776646 = r2776633 * r2776645;
return r2776646;
}
double f(double g, double h) {
double r2776647 = 2.0;
double r2776648 = g;
double r2776649 = h;
double r2776650 = r2776648 / r2776649;
double r2776651 = acos(r2776650);
double r2776652 = 3.0;
double r2776653 = r2776651 / r2776652;
double r2776654 = atan2(1.0, 0.0);
double r2776655 = 1.5;
double r2776656 = r2776654 / r2776655;
double r2776657 = r2776653 - r2776656;
double r2776658 = cos(r2776657);
double r2776659 = 0.5;
double r2776660 = r2776658 * r2776659;
double r2776661 = sqrt(r2776652);
double r2776662 = r2776661 / r2776647;
double r2776663 = sin(r2776657);
double r2776664 = r2776662 * r2776663;
double r2776665 = r2776660 + r2776664;
double r2776666 = r2776647 * r2776665;
return r2776666;
}



Bits error versus g



Bits error versus h
Results
Initial program 1.0
Simplified1.0
rmApplied distribute-frac-neg1.0
Applied acos-neg1.0
Applied div-sub1.0
Applied associate-+l-1.0
Applied cos-diff0.1
Simplified0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019154
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))