\frac{1}{3} \cdot \cos^{-1} \left(\frac{3 \cdot \frac{x}{y \cdot 27}}{z \cdot 2} \cdot \sqrt{t}\right)\left(0.3333333333333333 \cdot \sqrt{\cos^{-1} \left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \left(\sqrt[3]{x} \cdot \frac{\frac{\sqrt{t}}{z}}{y \cdot 18}\right)\right)}\right) \cdot \sqrt{\cos^{-1} \left(x \cdot \frac{\frac{\sqrt{t}}{z}}{y \cdot 18}\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
(sqrt
(acos
(* (* (cbrt x) (cbrt x)) (* (cbrt x) (/ (/ (sqrt t) z) (* y 18.0)))))))
(sqrt (acos (* x (/ (/ (sqrt t) z) (* y 18.0)))))))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 * sqrt(acos((cbrt(x) * cbrt(x)) * (cbrt(x) * ((sqrt(t) / z) / (y * 18.0)))))) * sqrt(acos(x * ((sqrt(t) / z) / (y * 18.0))));
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 1.4 |
|---|---|
| Target | 1.3 |
| Herbie | 1.7 |
Initial program 1.4
Simplified1.7
rmApplied add-sqr-sqrt_binary64_195372.2
Applied associate-*r*_binary64_194551.7
rmApplied add-cube-cbrt_binary64_195501.7
Applied associate-*l*_binary64_194561.7
Simplified1.7
Final simplification1.7
herbie shell --seed 2020322
(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)))))