\tan^{-1} \left(\frac{\sqrt{1 - a}}{\sqrt{a}}\right)\tan^{-1} \left(\frac{\sqrt{1 - a}}{\sqrt{a}}\right)double code(double a) {
return ((double) atan(((double) (((double) sqrt(((double) (1.0 - a)))) / ((double) sqrt(a))))));
}
double code(double a) {
return ((double) atan(((double) (((double) sqrt(((double) (1.0 - a)))) / ((double) sqrt(a))))));
}



Bits error versus a
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 2020152
(FPCore (a)
:name "(atan (/ (sqrt (- 1.0 a)) (sqrt a)))"
:precision binary64
(atan (/ (sqrt (- 1.0 a)) (sqrt a))))