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 r136121 = 2.0;
double r136122 = atan2(1.0, 0.0);
double r136123 = r136121 * r136122;
double r136124 = 3.0;
double r136125 = r136123 / r136124;
double r136126 = g;
double r136127 = -r136126;
double r136128 = h;
double r136129 = r136127 / r136128;
double r136130 = acos(r136129);
double r136131 = r136130 / r136124;
double r136132 = r136125 + r136131;
double r136133 = cos(r136132);
double r136134 = r136121 * r136133;
return r136134;
}
double f(double g, double h) {
double r136135 = 2.0;
double r136136 = atan2(1.0, 0.0);
double r136137 = r136135 * r136136;
double r136138 = 3.0;
double r136139 = r136137 / r136138;
double r136140 = r136136 / r136138;
double r136141 = r136139 + r136140;
double r136142 = cos(r136141);
double r136143 = g;
double r136144 = h;
double r136145 = r136143 / r136144;
double r136146 = acos(r136145);
double r136147 = r136146 / r136138;
double r136148 = cos(r136147);
double r136149 = r136142 * r136148;
double r136150 = sin(r136141);
double r136151 = sin(r136147);
double r136152 = r136150 * r136151;
double r136153 = r136149 + r136152;
double r136154 = r136135 * r136153;
return r136154;
}



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