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 r112184 = 2.0;
double r112185 = atan2(1.0, 0.0);
double r112186 = r112184 * r112185;
double r112187 = 3.0;
double r112188 = r112186 / r112187;
double r112189 = g;
double r112190 = -r112189;
double r112191 = h;
double r112192 = r112190 / r112191;
double r112193 = acos(r112192);
double r112194 = r112193 / r112187;
double r112195 = r112188 + r112194;
double r112196 = cos(r112195);
double r112197 = r112184 * r112196;
return r112197;
}
double f(double g, double h) {
double r112198 = 2.0;
double r112199 = atan2(1.0, 0.0);
double r112200 = r112198 * r112199;
double r112201 = 3.0;
double r112202 = r112200 / r112201;
double r112203 = r112199 / r112201;
double r112204 = r112202 + r112203;
double r112205 = cos(r112204);
double r112206 = g;
double r112207 = h;
double r112208 = r112206 / r112207;
double r112209 = acos(r112208);
double r112210 = r112209 / r112201;
double r112211 = cos(r112210);
double r112212 = r112205 * r112211;
double r112213 = sin(r112204);
double r112214 = sin(r112210);
double r112215 = r112213 * r112214;
double r112216 = r112212 + r112215;
double r112217 = r112198 * r112216;
return r112217;
}



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.1
Final simplification0.1
herbie shell --seed 2019303
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2 (cos (+ (/ (* 2 PI) 3) (/ (acos (/ (- g) h)) 3)))))