\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)e^{\sqrt{\log \left(\cos^{-1} \left(\frac{1 - \log \left(e^{5 \cdot \left(v \cdot v\right)}\right)}{v \cdot v - 1}\right)\right)} \cdot \sqrt{\log \left(\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)\right)}}double f(double v) {
double r170160 = 1.0;
double r170161 = 5.0;
double r170162 = v;
double r170163 = r170162 * r170162;
double r170164 = r170161 * r170163;
double r170165 = r170160 - r170164;
double r170166 = r170163 - r170160;
double r170167 = r170165 / r170166;
double r170168 = acos(r170167);
return r170168;
}
double f(double v) {
double r170169 = 1.0;
double r170170 = 5.0;
double r170171 = v;
double r170172 = r170171 * r170171;
double r170173 = r170170 * r170172;
double r170174 = exp(r170173);
double r170175 = log(r170174);
double r170176 = r170169 - r170175;
double r170177 = r170172 - r170169;
double r170178 = r170176 / r170177;
double r170179 = acos(r170178);
double r170180 = log(r170179);
double r170181 = sqrt(r170180);
double r170182 = r170169 - r170173;
double r170183 = r170182 / r170177;
double r170184 = acos(r170183);
double r170185 = log(r170184);
double r170186 = sqrt(r170185);
double r170187 = r170181 * r170186;
double r170188 = exp(r170187);
return r170188;
}



Bits error versus v
Results
Initial program 0.5
rmApplied add-exp-log0.5
rmApplied add-sqr-sqrt0.6
rmApplied add-log-exp0.6
Final simplification0.6
herbie shell --seed 2019323
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 1"
:precision binary64
(acos (/ (- 1 (* 5 (* v v))) (- (* v v) 1))))