\frac{a1 \cdot a2}{b1 \cdot b2}\begin{array}{l}
\mathbf{if}\;a1 \cdot a2 \leq -1.63565235589557 \cdot 10^{+253}:\\
\;\;\;\;\frac{a1}{b1 \cdot \frac{b2}{a2}}\\
\mathbf{elif}\;a1 \cdot a2 \leq -1.5121420007377413 \cdot 10^{-266}:\\
\;\;\;\;\left(a1 \cdot a2\right) \cdot \frac{1}{b1 \cdot b2}\\
\mathbf{elif}\;a1 \cdot a2 \leq 1.5108620396963 \cdot 10^{-295}:\\
\;\;\;\;\frac{a1}{b1 \cdot \frac{b2}{a2}}\\
\mathbf{elif}\;a1 \cdot a2 \leq 3.2359321228486805 \cdot 10^{+236}:\\
\;\;\;\;\left(a1 \cdot a2\right) \cdot \frac{1}{b1 \cdot b2}\\
\mathbf{else}:\\
\;\;\;\;\frac{a1}{b1} \cdot \frac{a2}{b2}\\
\end{array}(FPCore (a1 a2 b1 b2) :precision binary64 (/ (* a1 a2) (* b1 b2)))
(FPCore (a1 a2 b1 b2)
:precision binary64
(if (<= (* a1 a2) -1.63565235589557e+253)
(/ a1 (* b1 (/ b2 a2)))
(if (<= (* a1 a2) -1.5121420007377413e-266)
(* (* a1 a2) (/ 1.0 (* b1 b2)))
(if (<= (* a1 a2) 1.5108620396963e-295)
(/ a1 (* b1 (/ b2 a2)))
(if (<= (* a1 a2) 3.2359321228486805e+236)
(* (* a1 a2) (/ 1.0 (* b1 b2)))
(* (/ a1 b1) (/ a2 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) <= -1.63565235589557e+253) {
tmp = a1 / (b1 * (b2 / a2));
} else if ((a1 * a2) <= -1.5121420007377413e-266) {
tmp = (a1 * a2) * (1.0 / (b1 * b2));
} else if ((a1 * a2) <= 1.5108620396963e-295) {
tmp = a1 / (b1 * (b2 / a2));
} else if ((a1 * a2) <= 3.2359321228486805e+236) {
tmp = (a1 * a2) * (1.0 / (b1 * b2));
} else {
tmp = (a1 / b1) * (a2 / 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 | 5.3 |
if (*.f64 a1 a2) < -1.63565235589557e253 or -1.5121420007377413e-266 < (*.f64 a1 a2) < 1.51086203969630007e-295Initial program 23.9
rmApplied associate-/l*_binary6410.0
rmApplied *-un-lft-identity_binary6410.0
Applied times-frac_binary644.0
Simplified4.0
if -1.63565235589557e253 < (*.f64 a1 a2) < -1.5121420007377413e-266 or 1.51086203969630007e-295 < (*.f64 a1 a2) < 3.2359321228486805e236Initial program 4.9
rmApplied div-inv_binary645.3
if 3.2359321228486805e236 < (*.f64 a1 a2) Initial program 41.2
rmApplied times-frac_binary6410.9
Final simplification5.3
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)))