\frac{\left(x \cdot y\right) \cdot z}{\sqrt{z \cdot z - t \cdot a}}
\begin{array}{l}
\mathbf{if}\;z \leq -6.796797640097235 \cdot 10^{+161}:\\
\;\;\;\;-y \cdot x\\
\mathbf{elif}\;z \leq 1.870606781150024 \cdot 10^{+79}:\\
\;\;\;\;x \cdot \frac{y}{\frac{\sqrt{z \cdot z - t \cdot a}}{z}}\\
\mathbf{else}:\\
\;\;\;\;y \cdot x\\
\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 -6.796797640097235e+161)
(- (* y x))
(if (<= z 1.870606781150024e+79)
(* x (/ y (/ (sqrt (- (* z z) (* t a))) z)))
(* y x))))double code(double x, double y, double z, double t, double a) {
return ((x * y) * z) / sqrt((z * z) - (t * a));
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if (z <= -6.796797640097235e+161) {
tmp = -(y * x);
} else if (z <= 1.870606781150024e+79) {
tmp = x * (y / (sqrt((z * z) - (t * a)) / z));
} else {
tmp = y * x;
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 25.1 |
|---|---|
| Target | 7.3 |
| Herbie | 6.5 |
if z < -6.7967976400972349e161Initial program 55.5
Taylor expanded in z around -inf 1.0
Simplified1.0
if -6.7967976400972349e161 < z < 1.87060678115002416e79Initial program 11.1
Applied associate-/l*_binary649.6
Applied *-un-lft-identity_binary649.6
Applied times-frac_binary649.4
Applied *-un-lft-identity_binary649.4
Applied *-un-lft-identity_binary649.4
Applied sqrt-prod_binary649.4
Applied times-frac_binary649.4
Applied *-un-lft-identity_binary649.4
Applied times-frac_binary649.4
Applied associate-*r*_binary649.4
Simplified9.4
if 1.87060678115002416e79 < z Initial program 41.4
Taylor expanded in z around inf 2.6
Final simplification6.5
herbie shell --seed 2022068
(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)))))