\frac{a1 \cdot a2}{b1 \cdot b2}\begin{array}{l}
\mathbf{if}\;\frac{a1 \cdot a2}{b1 \cdot b2} \leq -1.20887730078496 \cdot 10^{+277}:\\
\;\;\;\;a1 \cdot \frac{\frac{a2}{b1}}{b2}\\
\mathbf{elif}\;\frac{a1 \cdot a2}{b1 \cdot b2} \leq -2.7900592547123306 \cdot 10^{-197}:\\
\;\;\;\;\left(a1 \cdot a2\right) \cdot \frac{1}{b1 \cdot b2}\\
\mathbf{elif}\;\frac{a1 \cdot a2}{b1 \cdot b2} \leq 0 \lor \neg \left(\frac{a1 \cdot a2}{b1 \cdot b2} \leq 1.6872465957563077 \cdot 10^{+266}\right):\\
\;\;\;\;a1 \cdot \frac{\frac{a2}{b1}}{b2}\\
\mathbf{else}:\\
\;\;\;\;\frac{a1 \cdot a2}{b1 \cdot b2}\\
\end{array}(FPCore (a1 a2 b1 b2) :precision binary64 (/ (* a1 a2) (* b1 b2)))
(FPCore (a1 a2 b1 b2)
:precision binary64
(if (<= (/ (* a1 a2) (* b1 b2)) -1.20887730078496e+277)
(* a1 (/ (/ a2 b1) b2))
(if (<= (/ (* a1 a2) (* b1 b2)) -2.7900592547123306e-197)
(* (* a1 a2) (/ 1.0 (* b1 b2)))
(if (or (<= (/ (* a1 a2) (* b1 b2)) 0.0)
(not (<= (/ (* a1 a2) (* b1 b2)) 1.6872465957563077e+266)))
(* a1 (/ (/ a2 b1) b2))
(/ (* a1 a2) (* b1 b2))))))double code(double a1, double a2, double b1, double b2) {
return (a1 * a2) / (b1 * b2);
}
double code(double a1, double a2, double b1, double b2) {
double tmp;
if (((a1 * a2) / (b1 * b2)) <= -1.20887730078496e+277) {
tmp = a1 * ((a2 / b1) / b2);
} else if (((a1 * a2) / (b1 * b2)) <= -2.7900592547123306e-197) {
tmp = (a1 * a2) * (1.0 / (b1 * b2));
} else if ((((a1 * a2) / (b1 * b2)) <= 0.0) || !(((a1 * a2) / (b1 * b2)) <= 1.6872465957563077e+266)) {
tmp = a1 * ((a2 / b1) / b2);
} else {
tmp = (a1 * a2) / (b1 * b2);
}
return tmp;
}




Bits error versus a1




Bits error versus a2




Bits error versus b1




Bits error versus b2
Results
| Original | 11.2 |
|---|---|
| Target | 11.3 |
| Herbie | 4.2 |
if (/.f64 (*.f64 a1 a2) (*.f64 b1 b2)) < -1.20887730078496e277 or -2.79005925471233059e-197 < (/.f64 (*.f64 a1 a2) (*.f64 b1 b2)) < -0.0 or 1.68724659575630769e266 < (/.f64 (*.f64 a1 a2) (*.f64 b1 b2)) Initial program 22.7
rmApplied div-inv_binary64_179622.9
rmApplied associate-*l*_binary64_174016.0
Simplified15.8
rmApplied associate-/r*_binary64_17437.9
if -1.20887730078496e277 < (/.f64 (*.f64 a1 a2) (*.f64 b1 b2)) < -2.79005925471233059e-197Initial program 0.8
rmApplied div-inv_binary64_17961.1
if -0.0 < (/.f64 (*.f64 a1 a2) (*.f64 b1 b2)) < 1.68724659575630769e266Initial program 0.8
Final simplification4.2
herbie shell --seed 2020277
(FPCore (a1 a2 b1 b2)
:name "Quotient of products"
:precision binary64
:herbie-target
(* (/ a1 b1) (/ a2 b2))
(/ (* a1 a2) (* b1 b2)))