\cos^{-1} \left(\frac{1 - 5 \cdot \left(v \cdot v\right)}{v \cdot v - 1}\right)\cos^{-1} \left(\sqrt{1 - 5 \cdot \left(v \cdot v\right)} \cdot \frac{\sqrt{1 - 5 \cdot \left(v \cdot v\right)}}{v \cdot v - 1}\right)double f(double v) {
double r144492 = 1.0;
double r144493 = 5.0;
double r144494 = v;
double r144495 = r144494 * r144494;
double r144496 = r144493 * r144495;
double r144497 = r144492 - r144496;
double r144498 = r144495 - r144492;
double r144499 = r144497 / r144498;
double r144500 = acos(r144499);
return r144500;
}
double f(double v) {
double r144501 = 1.0;
double r144502 = 5.0;
double r144503 = v;
double r144504 = r144503 * r144503;
double r144505 = r144502 * r144504;
double r144506 = r144501 - r144505;
double r144507 = sqrt(r144506);
double r144508 = r144504 - r144501;
double r144509 = r144507 / r144508;
double r144510 = r144507 * r144509;
double r144511 = acos(r144510);
return r144511;
}



Bits error versus v
Results
Initial program 0.5
rmApplied *-un-lft-identity0.5
Applied add-sqr-sqrt0.6
Applied times-frac0.6
Simplified0.6
Final simplification0.6
herbie shell --seed 2020047
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 1"
:precision binary64
(acos (/ (- 1 (* 5 (* v v))) (- (* v v) 1))))