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 r9565 = 2.0;
double r9566 = 1.0;
double r9567 = x;
double r9568 = r9566 - r9567;
double r9569 = r9566 + r9567;
double r9570 = r9568 / r9569;
double r9571 = sqrt(r9570);
double r9572 = atan(r9571);
double r9573 = r9565 * r9572;
return r9573;
}
double f(double x) {
double r9574 = 2.0;
double r9575 = 1.0;
double r9576 = x;
double r9577 = r9575 - r9576;
double r9578 = sqrt(r9577);
double r9579 = r9575 + r9576;
double r9580 = sqrt(r9579);
double r9581 = r9578 / r9580;
double r9582 = r9581 * r9581;
double r9583 = sqrt(r9582);
double r9584 = atan(r9583);
double r9585 = r9574 * r9584;
return r9585;
}



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 2020060
(FPCore (x)
:name "arccos"
:precision binary64
(* 2 (atan (sqrt (/ (- 1 x) (+ 1 x))))))