\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)\cos^{-1} \left(\frac{\frac{1 - 5 \cdot \left(v \cdot v\right)}{v + \sqrt{1}}}{v - \sqrt{1}}\right)double code(double v) {
return acos(((1.0 - (5.0 * (v * v))) / ((v * v) - 1.0)));
}
double code(double v) {
return acos((((1.0 - (5.0 * (v * v))) / (v + sqrt(1.0))) / (v - sqrt(1.0))));
}



Bits error versus v
Results
Initial program 0.6
rmApplied add-sqr-sqrt0.6
Applied difference-of-squares0.9
Applied associate-/r*0.9
Final simplification0.9
herbie shell --seed 2020058
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 1"
:precision binary64
(acos (/ (- 1 (* 5 (* v v))) (- (* v v) 1))))