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 - x}{1 - x \cdot 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) (- 1.0 (* x 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) / (1.0 - (x * x)))));
}



Bits error versus x
Results
Initial program 0.0
rmApplied flip-+_binary640.0
Applied associate-/r/_binary640.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020224
(FPCore (x)
:name "arccos"
:precision binary64
(* 2.0 (atan (sqrt (/ (- 1.0 x) (+ 1.0 x))))))