\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)e^{\log \left({\left(\sqrt[3]{\sqrt[3]{\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)}} \cdot {\left(\sqrt[3]{\sqrt[3]{\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)}}\right)}^{2}\right)}^{2}\right) + \log \left(\sqrt[3]{\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)}\right)}(FPCore (v) :precision binary64 (acos (/ (- 1.0 (* 5.0 (* v v))) (- (* v v) 1.0))))
(FPCore (v)
:precision binary64
(exp
(+
(log
(pow
(*
(cbrt (cbrt (acos (/ (- 1.0 (* 5.0 (* v v))) (- (* v v) 1.0)))))
(pow
(cbrt (cbrt (acos (/ (- 1.0 (* 5.0 (* v v))) (- (* v v) 1.0)))))
2.0))
2.0))
(log (cbrt (acos (/ (- 1.0 (* 5.0 (* v 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 exp(log(pow((cbrt(cbrt(acos((1.0 - (5.0 * (v * v))) / ((v * v) - 1.0)))) * pow(cbrt(cbrt(acos((1.0 - (5.0 * (v * v))) / ((v * v) - 1.0)))), 2.0)), 2.0)) + log(cbrt(acos((1.0 - (5.0 * (v * v))) / ((v * v) - 1.0)))));
}



Bits error versus v
Results
Initial program 0.5
rmApplied add-exp-log_binary64_18210.5
rmApplied add-cube-cbrt_binary64_18181.5
Applied log-prod_binary64_18692.4
Simplified2.4
rmApplied add-cube-cbrt_binary64_18180.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2020342
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 1"
:precision binary64
(acos (/ (- 1.0 (* 5.0 (* v v))) (- (* v v) 1.0))))