\left(\frac{\sqrt{2}}{4} \cdot \sqrt{1 - 3 \cdot \left(v \cdot v\right)}\right) \cdot \left(1 - v \cdot v\right)\left(\frac{\sqrt{2}}{4} \cdot \left(\left|\sqrt[3]{1 - 3 \cdot \left(v \cdot v\right)}\right| \cdot \sqrt{\sqrt[3]{1 - 3 \cdot \left(v \cdot v\right)}}\right)\right) \cdot \left(1 - v \cdot v\right)double f(double v) {
double r178391 = 2.0;
double r178392 = sqrt(r178391);
double r178393 = 4.0;
double r178394 = r178392 / r178393;
double r178395 = 1.0;
double r178396 = 3.0;
double r178397 = v;
double r178398 = r178397 * r178397;
double r178399 = r178396 * r178398;
double r178400 = r178395 - r178399;
double r178401 = sqrt(r178400);
double r178402 = r178394 * r178401;
double r178403 = r178395 - r178398;
double r178404 = r178402 * r178403;
return r178404;
}
double f(double v) {
double r178405 = 2.0;
double r178406 = sqrt(r178405);
double r178407 = 4.0;
double r178408 = r178406 / r178407;
double r178409 = 1.0;
double r178410 = 3.0;
double r178411 = v;
double r178412 = r178411 * r178411;
double r178413 = r178410 * r178412;
double r178414 = r178409 - r178413;
double r178415 = cbrt(r178414);
double r178416 = fabs(r178415);
double r178417 = sqrt(r178415);
double r178418 = r178416 * r178417;
double r178419 = r178408 * r178418;
double r178420 = r178409 - r178412;
double r178421 = r178419 * r178420;
return r178421;
}



Bits error versus v
Results
Initial program 0.0
rmApplied add-cube-cbrt0.0
Applied sqrt-prod0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019303 +o rules:numerics
(FPCore (v)
:name "Falkner and Boettcher, Appendix B, 2"
:precision binary64
(* (* (/ (sqrt 2) 4) (sqrt (- 1 (* 3 (* v v))))) (- 1 (* v v))))