\frac{x \cdot y - \left(z \cdot 9\right) \cdot t}{a \cdot 2}\begin{array}{l}
\mathbf{if}\;x \cdot y - \left(z \cdot 9\right) \cdot t \leq -7.349536588218303 \cdot 10^{+171}:\\
\;\;\;\;\frac{x}{\frac{a}{\frac{y}{2}}} - \frac{\left(z \cdot 9\right) \cdot t}{a \cdot 2}\\
\mathbf{elif}\;x \cdot y - \left(z \cdot 9\right) \cdot t \leq 2.810012605276234 \cdot 10^{+214}:\\
\;\;\;\;\frac{\frac{1}{a}}{\frac{1}{\frac{x \cdot y - \left(z \cdot 9\right) \cdot t}{2}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{y}{2} \cdot \frac{x}{a} - \frac{\left(z \cdot 9\right) \cdot t}{a \cdot 2}\\
\end{array}(FPCore (x y z t a) :precision binary64 (/ (- (* x y) (* (* z 9.0) t)) (* a 2.0)))
(FPCore (x y z t a)
:precision binary64
(if (<= (- (* x y) (* (* z 9.0) t)) -7.349536588218303e+171)
(- (/ x (/ a (/ y 2.0))) (/ (* (* z 9.0) t) (* a 2.0)))
(if (<= (- (* x y) (* (* z 9.0) t)) 2.810012605276234e+214)
(/ (/ 1.0 a) (/ 1.0 (/ (- (* x y) (* (* z 9.0) t)) 2.0)))
(- (* (/ y 2.0) (/ x a)) (/ (* (* z 9.0) t) (* a 2.0))))))double code(double x, double y, double z, double t, double a) {
return ((x * y) - ((z * 9.0) * t)) / (a * 2.0);
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if (((x * y) - ((z * 9.0) * t)) <= -7.349536588218303e+171) {
tmp = (x / (a / (y / 2.0))) - (((z * 9.0) * t) / (a * 2.0));
} else if (((x * y) - ((z * 9.0) * t)) <= 2.810012605276234e+214) {
tmp = (1.0 / a) / (1.0 / (((x * y) - ((z * 9.0) * t)) / 2.0));
} else {
tmp = ((y / 2.0) * (x / a)) - (((z * 9.0) * t) / (a * 2.0));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 7.9 |
|---|---|
| Target | 5.9 |
| Herbie | 5.1 |
if (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9) t)) < -7.34953658821830306e171Initial program 23.8
rmApplied div-sub_binary6423.8
rmApplied associate-/l*_binary6413.9
Simplified13.8
if -7.34953658821830306e171 < (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9) t)) < 2.81001260527623391e214Initial program 1.2
rmApplied clear-num_binary641.5
Simplified1.4
rmApplied div-inv_binary641.6
Applied associate-/r*_binary641.4
if 2.81001260527623391e214 < (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9) t)) Initial program 29.9
rmApplied div-sub_binary6429.9
rmApplied times-frac_binary6417.5
Final simplification5.1
herbie shell --seed 2020268
(FPCore (x y z t a)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, I"
:precision binary64
:herbie-target
(if (< a -2.090464557976709e+86) (- (* 0.5 (/ (* y x) a)) (* 4.5 (/ t (/ a z)))) (if (< a 2.144030707833976e+99) (/ (- (* x y) (* z (* 9.0 t))) (* a 2.0)) (- (* (/ y a) (* x 0.5)) (* (/ t a) (* z 4.5)))))
(/ (- (* x y) (* (* z 9.0) t)) (* a 2.0)))