2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\sqrt{\frac{1}{\sqrt{1 + x}} \cdot \frac{1 - x}{\sqrt{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 (sqrt (+ 1.0 x))) (/ (- 1.0 x) (sqrt (+ 1.0 x))))))))
double code(double x) {
return ((double) (2.0 * ((double) atan(((double) sqrt((((double) (1.0 - x)) / ((double) (1.0 + x)))))))));
}
double code(double x) {
return ((double) (2.0 * ((double) atan(((double) sqrt(((double) ((1.0 / ((double) sqrt(((double) (1.0 + x))))) * (((double) (1.0 - x)) / ((double) sqrt(((double) (1.0 + x)))))))))))));
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-sqr-sqrt_binary640.0
Applied *-un-lft-identity_binary640.0
Applied times-frac_binary640.0
Final simplification0.0
herbie shell --seed 2020210
(FPCore (x)
:name "arccos"
:precision binary64
(* 2.0 (atan (sqrt (/ (- 1.0 x) (+ 1.0 x))))))