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}\right) \cdot \cos \left(\frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right) - \left(\sqrt{\sin \left(\frac{2 \cdot \pi}{3}\right)} \cdot \sqrt{\sin \left(\frac{2 \cdot \pi}{3}\right)}\right) \cdot \sin \left(\frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)\right)(FPCore (g h) :precision binary64 (* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))
(FPCore (g h)
:precision binary64
(*
2.0
(-
(* (cos (/ (* 2.0 PI) 3.0)) (cos (/ (acos (/ (- g) h)) 3.0)))
(*
(* (sqrt (sin (/ (* 2.0 PI) 3.0))) (sqrt (sin (/ (* 2.0 PI) 3.0))))
(sin (/ (acos (/ (- g) h)) 3.0))))))double code(double g, double h) {
return ((double) (2.0 * ((double) cos(((double) ((((double) (2.0 * ((double) M_PI))) / 3.0) + (((double) acos((((double) -(g)) / h))) / 3.0)))))));
}
double code(double g, double h) {
return ((double) (2.0 * ((double) (((double) (((double) cos((((double) (2.0 * ((double) M_PI))) / 3.0))) * ((double) cos((((double) acos((((double) -(g)) / h))) / 3.0))))) - ((double) (((double) (((double) sqrt(((double) sin((((double) (2.0 * ((double) M_PI))) / 3.0))))) * ((double) sqrt(((double) sin((((double) (2.0 * ((double) M_PI))) / 3.0))))))) * ((double) sin((((double) acos((((double) -(g)) / h))) / 3.0)))))))));
}



Bits error versus g



Bits error versus h
Results
Initial program 1.0
rmApplied cos-sum_binary641.0
rmApplied add-sqr-sqrt_binary640.0
Final simplification0.0
herbie shell --seed 2020204
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))