2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\frac{\sqrt{1 \cdot 1 - x \cdot x}}{1 + x}\right)double f(double x) {
double r22695 = 2.0;
double r22696 = 1.0;
double r22697 = x;
double r22698 = r22696 - r22697;
double r22699 = r22696 + r22697;
double r22700 = r22698 / r22699;
double r22701 = sqrt(r22700);
double r22702 = atan(r22701);
double r22703 = r22695 * r22702;
return r22703;
}
double f(double x) {
double r22704 = 2.0;
double r22705 = 1.0;
double r22706 = r22705 * r22705;
double r22707 = x;
double r22708 = r22707 * r22707;
double r22709 = r22706 - r22708;
double r22710 = sqrt(r22709);
double r22711 = r22705 + r22707;
double r22712 = r22710 / r22711;
double r22713 = atan(r22712);
double r22714 = r22704 * r22713;
return r22714;
}



Bits error versus x
Results
Initial program 0.0
Simplified0.0
rmApplied sqrt-div0.0
Simplified0.0
rmApplied flip--0.0
Applied sqrt-div0.0
Applied associate-/l/0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019194 +o rules:numerics
(FPCore (x)
:name "arccos"
(* 2.0 (atan (sqrt (/ (- 1.0 x) (+ 1.0 x))))))