2 \cdot \tan^{-1} \left(\sqrt{\frac{1 - x}{1 + x}}\right)2 \cdot \tan^{-1} \left(\sqrt{\frac{1}{\sqrt{1 + x}}} \cdot \sqrt{\frac{1 - x}{\sqrt{1 + x}}}\right)double f(double x) {
double r11337 = 2.0;
double r11338 = 1.0;
double r11339 = x;
double r11340 = r11338 - r11339;
double r11341 = r11338 + r11339;
double r11342 = r11340 / r11341;
double r11343 = sqrt(r11342);
double r11344 = atan(r11343);
double r11345 = r11337 * r11344;
return r11345;
}
double f(double x) {
double r11346 = 2.0;
double r11347 = 1.0;
double r11348 = 1.0;
double r11349 = x;
double r11350 = r11348 + r11349;
double r11351 = sqrt(r11350);
double r11352 = r11347 / r11351;
double r11353 = sqrt(r11352);
double r11354 = r11348 - r11349;
double r11355 = r11354 / r11351;
double r11356 = sqrt(r11355);
double r11357 = r11353 * r11356;
double r11358 = atan(r11357);
double r11359 = r11346 * r11358;
return r11359;
}



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