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}\right) \cdot \cos \left(\mathsf{fma}\left(\frac{2}{3}, \pi, \frac{\pi}{3}\right)\right) + \sin \left(\mathsf{fma}\left(\frac{2}{3}, \pi, \frac{\pi}{3}\right)\right) \cdot \sin \left(\frac{\cos^{-1} \left(\frac{g}{h}\right)}{3}\right)\right)double f(double g, double h) {
double r200220 = 2.0;
double r200221 = atan2(1.0, 0.0);
double r200222 = r200220 * r200221;
double r200223 = 3.0;
double r200224 = r200222 / r200223;
double r200225 = g;
double r200226 = -r200225;
double r200227 = h;
double r200228 = r200226 / r200227;
double r200229 = acos(r200228);
double r200230 = r200229 / r200223;
double r200231 = r200224 + r200230;
double r200232 = cos(r200231);
double r200233 = r200220 * r200232;
return r200233;
}
double f(double g, double h) {
double r200234 = 2.0;
double r200235 = g;
double r200236 = h;
double r200237 = r200235 / r200236;
double r200238 = acos(r200237);
double r200239 = 3.0;
double r200240 = r200238 / r200239;
double r200241 = cos(r200240);
double r200242 = r200234 / r200239;
double r200243 = atan2(1.0, 0.0);
double r200244 = r200243 / r200239;
double r200245 = fma(r200242, r200243, r200244);
double r200246 = cos(r200245);
double r200247 = r200241 * r200246;
double r200248 = sin(r200245);
double r200249 = sin(r200240);
double r200250 = r200248 * r200249;
double r200251 = r200247 + r200250;
double r200252 = r200234 * r200251;
return r200252;
}



Bits error versus g



Bits error versus h
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
Simplified0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020045 +o rules:numerics
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))