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)double f(double x) {
double r729688 = 2.0;
double r729689 = 1.0;
double r729690 = x;
double r729691 = r729689 - r729690;
double r729692 = r729689 + r729690;
double r729693 = r729691 / r729692;
double r729694 = sqrt(r729693);
double r729695 = atan(r729694);
double r729696 = r729688 * r729695;
return r729696;
}
double f(double x) {
double r729697 = 2.0;
double r729698 = 1.0;
double r729699 = x;
double r729700 = r729698 - r729699;
double r729701 = r729699 * r729699;
double r729702 = r729698 - r729701;
double r729703 = r729700 / r729702;
double r729704 = r729700 * r729703;
double r729705 = sqrt(r729704);
double r729706 = atan(r729705);
double r729707 = r729697 * r729706;
return r729707;
}



Bits error versus x
Results
Initial program 0.0
rmApplied flip-+0.0
Applied associate-/r/0.0
Final simplification0.0
herbie shell --seed 2019119 +o rules:numerics
(FPCore (x)
:name "arccos"
(* 2 (atan (sqrt (/ (- 1 x) (+ 1 x))))))