2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\sqrt{\frac{\sqrt{1 - x}}{\sqrt{1 + x}} \cdot \frac{\sqrt{1 - x}}{\sqrt{1 + x}}}\right)double f(double x) {
double r16190 = 2.0;
double r16191 = 1.0;
double r16192 = x;
double r16193 = r16191 - r16192;
double r16194 = r16191 + r16192;
double r16195 = r16193 / r16194;
double r16196 = sqrt(r16195);
double r16197 = atan(r16196);
double r16198 = r16190 * r16197;
return r16198;
}
double f(double x) {
double r16199 = 2.0;
double r16200 = 1.0;
double r16201 = x;
double r16202 = r16200 - r16201;
double r16203 = sqrt(r16202);
double r16204 = r16200 + r16201;
double r16205 = sqrt(r16204);
double r16206 = r16203 / r16205;
double r16207 = r16206 * r16206;
double r16208 = sqrt(r16207);
double r16209 = atan(r16208);
double r16210 = r16199 * r16209;
return r16210;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-sqr-sqrt0.0
Applied add-sqr-sqrt0.0
Applied times-frac0.0
Final simplification0.0
herbie shell --seed 2020062 +o rules:numerics
(FPCore (x)
:name "arccos"
:precision binary64
(* 2 (atan (sqrt (/ (- 1 x) (+ 1 x))))))