\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 -9.450001500785823 \cdot 10^{+234} \lor \neg \left(x \cdot y - \left(z \cdot 9\right) \cdot t \leq 1.2657093729560723 \cdot 10^{+272}\right):\\
\;\;\;\;0.5 \cdot \left(x \cdot \frac{y}{a}\right) - 4.5 \cdot \left(z \cdot \frac{t}{a}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{a} \cdot \frac{x \cdot y - \left(z \cdot 9\right) \cdot t}{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 (<= (- (* x y) (* (* z 9.0) t)) -9.450001500785823e+234)
(not (<= (- (* x y) (* (* z 9.0) t)) 1.2657093729560723e+272)))
(- (* 0.5 (* x (/ y a))) (* 4.5 (* z (/ t a))))
(* (/ 1.0 a) (/ (- (* x y) (* (* z 9.0) t)) 2.0))))double code(double x, double y, double z, double t, double a) {
return (((double) (((double) (x * y)) - ((double) (((double) (z * 9.0)) * t)))) / ((double) (a * 2.0)));
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if (((((double) (((double) (x * y)) - ((double) (((double) (z * 9.0)) * t)))) <= -9.450001500785823e+234) || !(((double) (((double) (x * y)) - ((double) (((double) (z * 9.0)) * t)))) <= 1.2657093729560723e+272))) {
tmp = ((double) (((double) (0.5 * ((double) (x * (y / a))))) - ((double) (4.5 * ((double) (z * (t / a)))))));
} else {
tmp = ((double) ((1.0 / a) * (((double) (((double) (x * y)) - ((double) (((double) (z * 9.0)) * t)))) / 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.6 |
|---|---|
| Target | 5.6 |
| Herbie | 0.9 |
if (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9.0) t)) < -9.4500015007858227e234 or 1.2657093729560723e272 < (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9.0) t)) Initial program 38.8
Taylor expanded around 0 38.3
Simplified38.3
rmApplied *-un-lft-identity_binary6438.3
Applied times-frac_binary6421.2
Simplified21.2
rmApplied *-un-lft-identity_binary6421.2
Applied times-frac_binary640.6
Simplified0.6
if -9.4500015007858227e234 < (-.f64 (*.f64 x y) (*.f64 (*.f64 z 9.0) t)) < 1.2657093729560723e272Initial program 0.9
rmApplied *-un-lft-identity_binary640.9
Applied times-frac_binary640.9
Final simplification0.9
herbie shell --seed 2020205
(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)))