\frac{x \cdot y}{z}\begin{array}{l}
\mathbf{if}\;x \cdot y \leq -\infty:\\
\;\;\;\;x \cdot \frac{y}{z}\\
\mathbf{elif}\;x \cdot y \leq -2.4757073048510033 \cdot 10^{-150} \lor \neg \left(x \cdot y \leq 2.9882567291840723 \cdot 10^{-243}\right) \land x \cdot y \leq 2.4536894245315225 \cdot 10^{+146}:\\
\;\;\;\;\frac{x \cdot y}{z}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\frac{z}{y}}\\
\end{array}(FPCore (x y z) :precision binary64 (/ (* x y) z))
(FPCore (x y z)
:precision binary64
(if (<= (* x y) (- INFINITY))
(* x (/ y z))
(if (or (<= (* x y) -2.4757073048510033e-150)
(and (not (<= (* x y) 2.9882567291840723e-243))
(<= (* x y) 2.4536894245315225e+146)))
(/ (* x y) z)
(/ x (/ z y)))))double code(double x, double y, double z) {
return (x * y) / z;
}
double code(double x, double y, double z) {
double tmp;
if ((x * y) <= -((double) INFINITY)) {
tmp = x * (y / z);
} else if (((x * y) <= -2.4757073048510033e-150) || (!((x * y) <= 2.9882567291840723e-243) && ((x * y) <= 2.4536894245315225e+146))) {
tmp = (x * y) / z;
} else {
tmp = x / (z / y);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.4 |
|---|---|
| Target | 6.3 |
| Herbie | 0.6 |
if (*.f64 x y) < -inf.0Initial program 64.0
rmApplied *-un-lft-identity_binary64_1781064.0
Applied times-frac_binary64_178160.3
if -inf.0 < (*.f64 x y) < -2.4757073048510033e-150 or 2.9882567291840723e-243 < (*.f64 x y) < 2.45368942453152248e146Initial program 0.2
if -2.4757073048510033e-150 < (*.f64 x y) < 2.9882567291840723e-243 or 2.45368942453152248e146 < (*.f64 x y) Initial program 12.3
rmApplied associate-/l*_binary64_177551.2
Final simplification0.6
herbie shell --seed 2021044
(FPCore (x y z)
:name "Diagrams.Solve.Tridiagonal:solveCyclicTriDiagonal from diagrams-solve-0.1, A"
:precision binary64
:herbie-target
(if (< z -4.262230790519429e-138) (/ (* x y) z) (if (< z 1.7042130660650472e-164) (/ x (/ z y)) (* (/ x z) y)))
(/ (* x y) z))