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



Bits error versus v
Results
Initial program 0.6
rmApplied add-sqr-sqrt_binary64_18050.6
Applied associate-*l*_binary64_17240.6
Simplified0.6
Final simplification0.6
herbie shell --seed 2021075
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 1"
:precision binary64
(acos (/ (- 1.0 (* 5.0 (* v v))) (- (* v v) 1.0))))