2 \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)
\begin{array}{l}
t_0 := \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{\sqrt{3}}\\
2 \cdot \left(\cos \left(\pi \cdot 0.6666666666666666\right) \cdot \cos \left(\log \left(e^{{3}^{-0.5}}\right) \cdot t_0\right) - \sin \left(\pi \cdot 0.6666666666666666\right) \cdot \sin \left(t_0 \cdot \log \left(e^{\frac{1}{\sqrt{3}}}\right)\right)\right)
\end{array}
(FPCore (g h) :precision binary64 (* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))
(FPCore (g h)
:precision binary64
(let* ((t_0 (/ (acos (/ (- g) h)) (sqrt 3.0))))
(*
2.0
(-
(*
(cos (* PI 0.6666666666666666))
(cos (* (log (exp (pow 3.0 -0.5))) t_0)))
(*
(sin (* PI 0.6666666666666666))
(sin (* t_0 (log (exp (/ 1.0 (sqrt 3.0)))))))))))double code(double g, double h) {
return 2.0 * cos(((2.0 * ((double) M_PI)) / 3.0) + (acos(-g / h) / 3.0));
}
double code(double g, double h) {
double t_0 = acos(-g / h) / sqrt(3.0);
return 2.0 * ((cos(((double) M_PI) * 0.6666666666666666) * cos(log(exp(pow(3.0, -0.5))) * t_0)) - (sin(((double) M_PI) * 0.6666666666666666) * sin(t_0 * log(exp(1.0 / sqrt(3.0))))));
}



Bits error versus g



Bits error versus h
Results
Initial program 1.0
Simplified1.0
Applied add-sqr-sqrt_binary641.0
Applied *-un-lft-identity_binary641.0
Applied times-frac_binary641.0
Applied add-log-exp_binary641.0
Applied fma-udef_binary641.0
Applied cos-sum_binary640.0
Applied pow1/2_binary640.0
Applied pow-flip_binary640.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2022104
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))