2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\sqrt{\left(1 - x\right) \cdot \frac{1}{1 + x}}\right)(FPCore (x) :precision binary64 (* 2.0 (atan (sqrt (/ (- 1.0 x) (+ 1.0 x))))))
(FPCore (x) :precision binary64 (* 2.0 (atan (sqrt (* (- 1.0 x) (/ 1.0 (+ 1.0 x)))))))
double code(double x) {
return 2.0 * atan(sqrt((1.0 - x) / (1.0 + x)));
}
double code(double x) {
return 2.0 * atan(sqrt((1.0 - x) * (1.0 / (1.0 + x))));
}



Bits error versus x
Results
Initial program 0.0
rmApplied div-inv_binary640.0
Final simplification0.0
herbie shell --seed 2020356
(FPCore (x)
:name "arccos"
:precision binary64
(* 2.0 (atan (sqrt (/ (- 1.0 x) (+ 1.0 x))))))