2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{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 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 + x)));
}



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