\frac{x \cdot y - \left(z \cdot 9\right) \cdot t}{a \cdot 2}\begin{array}{l}
\mathbf{if}\;\left(z \cdot 9\right) \cdot t \leq -9.318790882667149 \cdot 10^{+153} \lor \neg \left(\left(z \cdot 9\right) \cdot t \leq 8.410646428049127 \cdot 10^{+305}\right):\\
\;\;\;\;\frac{x \cdot y}{a \cdot 2} - t \cdot \left(4.5 \cdot \frac{z}{a}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{x \cdot y - \left(z \cdot 9\right) \cdot t}{a}}{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 (or (<= (* (* z 9.0) t) -9.318790882667149e+153)
(not (<= (* (* z 9.0) t) 8.410646428049127e+305)))
(- (/ (* x y) (* a 2.0)) (* t (* 4.5 (/ z a))))
(/ (/ (- (* x y) (* (* 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 ((((z * 9.0) * t) <= -9.318790882667149e+153) || !(((z * 9.0) * t) <= 8.410646428049127e+305)) {
tmp = ((x * y) / (a * 2.0)) - (t * (4.5 * (z / a)));
} else {
tmp = (((x * y) - ((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.5 |
|---|---|
| Target | 5.8 |
| Herbie | 4.3 |
if (*.f64 (*.f64 z 9) t) < -9.3187908826671487e153 or 8.410646428049127e305 < (*.f64 (*.f64 z 9) t) Initial program 32.7
rmApplied div-sub_binary64_1849732.7
Simplified6.5
if -9.3187908826671487e153 < (*.f64 (*.f64 z 9) t) < 8.410646428049127e305Initial program 4.1
rmApplied associate-/r*_binary64_184364.1
Final simplification4.3
herbie shell --seed 2021007
(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)))