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 r143220 = 2.0;
double r143221 = atan2(1.0, 0.0);
double r143222 = r143220 * r143221;
double r143223 = 3.0;
double r143224 = r143222 / r143223;
double r143225 = g;
double r143226 = -r143225;
double r143227 = h;
double r143228 = r143226 / r143227;
double r143229 = acos(r143228);
double r143230 = r143229 / r143223;
double r143231 = r143224 + r143230;
double r143232 = cos(r143231);
double r143233 = r143220 * r143232;
return r143233;
}
double f(double g, double h) {
double r143234 = 2.0;
double r143235 = atan2(1.0, 0.0);
double r143236 = r143234 * r143235;
double r143237 = 3.0;
double r143238 = r143236 / r143237;
double r143239 = r143235 / r143237;
double r143240 = r143238 + r143239;
double r143241 = cos(r143240);
double r143242 = g;
double r143243 = h;
double r143244 = r143242 / r143243;
double r143245 = acos(r143244);
double r143246 = r143245 / r143237;
double r143247 = cos(r143246);
double r143248 = r143241 * r143247;
double r143249 = sin(r143240);
double r143250 = sin(r143246);
double r143251 = r143249 * r143250;
double r143252 = r143248 + r143251;
double r143253 = r143234 * r143252;
return r143253;
}



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