\frac{\left(x \cdot y\right) \cdot z}{\sqrt{z \cdot z - t \cdot a}}\begin{array}{l}
\mathbf{if}\;z \leq -2.0295156182980508 \cdot 10^{+142}:\\
\;\;\;\;-x \cdot y\\
\mathbf{elif}\;z \leq 7.14742597666009 \cdot 10^{+61}:\\
\;\;\;\;x \cdot \left(y \cdot \frac{z}{\sqrt{z \cdot z - t \cdot a}}\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot y\\
\end{array}(FPCore (x y z t a) :precision binary64 (/ (* (* x y) z) (sqrt (- (* z z) (* t a)))))
(FPCore (x y z t a)
:precision binary64
(if (<= z -2.0295156182980508e+142)
(- (* x y))
(if (<= z 7.14742597666009e+61)
(* x (* y (/ z (sqrt (- (* z z) (* t a))))))
(* x y))))double code(double x, double y, double z, double t, double a) {
return (((double) (((double) (x * y)) * z)) / ((double) sqrt(((double) (((double) (z * z)) - ((double) (t * a)))))));
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -2.0295156182980508e+142)) {
tmp = ((double) -(((double) (x * y))));
} else {
double tmp_1;
if ((z <= 7.14742597666009e+61)) {
tmp_1 = ((double) (x * ((double) (y * (z / ((double) sqrt(((double) (((double) (z * z)) - ((double) (t * a)))))))))));
} else {
tmp_1 = ((double) (x * y));
}
tmp = tmp_1;
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 24.5 |
|---|---|
| Target | 7.7 |
| Herbie | 6.2 |
if z < -2.0295156182980508e142Initial program 51.3
Taylor expanded around -inf 1.6
Simplified1.6
if -2.0295156182980508e142 < z < 7.14742597666008976e61Initial program 10.7
rmApplied *-un-lft-identity_binary6410.7
Applied sqrt-prod_binary6410.7
Applied times-frac_binary648.9
Simplified8.9
rmApplied associate-*l*_binary648.7
if 7.14742597666008976e61 < z Initial program 38.7
Taylor expanded around inf 3.2
Final simplification6.2
herbie shell --seed 2020219
(FPCore (x y z t a)
:name "Statistics.Math.RootFinding:ridders from math-functions-0.1.5.2"
:precision binary64
:herbie-target
(if (< z -3.1921305903852764e+46) (- (* y x)) (if (< z 5.976268120920894e+90) (/ (* x z) (/ (sqrt (- (* z z) (* a t))) y)) (* y x)))
(/ (* (* x y) z) (sqrt (- (* z z) (* t a)))))