\frac{1}{3} \cdot \cos^{-1} \left(\frac{3 \cdot \frac{x}{y \cdot 27}}{z \cdot 2} \cdot \sqrt{t}\right)0.3333333333333333 \cdot \cos^{-1} \left(x \cdot \left(0.05555555555555555 \cdot \left(\frac{\left|\sqrt[3]{t}\right|}{y} \cdot \frac{\sqrt{\sqrt[3]{t}}}{z}\right)\right)\right)(FPCore (x y z t) :precision binary64 (* (/ 1.0 3.0) (acos (* (/ (* 3.0 (/ x (* y 27.0))) (* z 2.0)) (sqrt t)))))
(FPCore (x y z t)
:precision binary64
(*
0.3333333333333333
(acos
(*
x
(* 0.05555555555555555 (* (/ (fabs (cbrt t)) y) (/ (sqrt (cbrt t)) z)))))))double code(double x, double y, double z, double t) {
return (1.0 / 3.0) * acos(((3.0 * (x / (y * 27.0))) / (z * 2.0)) * sqrt(t));
}
double code(double x, double y, double z, double t) {
return 0.3333333333333333 * acos(x * (0.05555555555555555 * ((fabs(cbrt(t)) / y) * (sqrt(cbrt(t)) / z))));
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 1.3 |
|---|---|
| Target | 1.2 |
| Herbie | 1.5 |
Initial program 1.3
Simplified1.2
rmApplied add-cube-cbrt_binary641.2
Applied sqrt-prod_binary641.2
Applied times-frac_binary641.5
Simplified1.5
Final simplification1.5
herbie shell --seed 2020224
(FPCore (x y z t)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, D"
:precision binary64
:herbie-target
(/ (acos (* (/ (/ x 27.0) (* y z)) (/ (sqrt t) (/ 2.0 3.0)))) 3.0)
(* (/ 1.0 3.0) (acos (* (/ (* 3.0 (/ x (* y 27.0))) (* z 2.0)) (sqrt t)))))