\frac{x}{y} \cdot \left(z - t\right) + t\begin{array}{l}
\mathbf{if}\;y \le -4.87632604569760037637408890268880098973 \cdot 10^{75} \lor \neg \left(y \le -5.330647358840705908227051774940756230968 \cdot 10^{-307}\right):\\
\;\;\;\;\frac{x}{y} \cdot \left(z - t\right) + t\\
\mathbf{else}:\\
\;\;\;\;\left(t + \frac{x \cdot z}{y}\right) - \frac{t \cdot x}{y}\\
\end{array}double f(double x, double y, double z, double t) {
double r414341 = x;
double r414342 = y;
double r414343 = r414341 / r414342;
double r414344 = z;
double r414345 = t;
double r414346 = r414344 - r414345;
double r414347 = r414343 * r414346;
double r414348 = r414347 + r414345;
return r414348;
}
double f(double x, double y, double z, double t) {
double r414349 = y;
double r414350 = -4.8763260456976e+75;
bool r414351 = r414349 <= r414350;
double r414352 = -5.330647358840706e-307;
bool r414353 = r414349 <= r414352;
double r414354 = !r414353;
bool r414355 = r414351 || r414354;
double r414356 = x;
double r414357 = r414356 / r414349;
double r414358 = z;
double r414359 = t;
double r414360 = r414358 - r414359;
double r414361 = r414357 * r414360;
double r414362 = r414361 + r414359;
double r414363 = r414356 * r414358;
double r414364 = r414363 / r414349;
double r414365 = r414359 + r414364;
double r414366 = r414359 * r414356;
double r414367 = r414366 / r414349;
double r414368 = r414365 - r414367;
double r414369 = r414355 ? r414362 : r414368;
return r414369;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 1.9 |
|---|---|
| Target | 2.3 |
| Herbie | 1.7 |
if y < -4.8763260456976e+75 or -5.330647358840706e-307 < y Initial program 1.6
if -4.8763260456976e+75 < y < -5.330647358840706e-307Initial program 2.8
Taylor expanded around 0 2.1
Final simplification1.7
herbie shell --seed 2019235
(FPCore (x y z t)
:name "Numeric.Signal.Multichannel:$cget from hsignal-0.2.7.1"
:precision binary64
:herbie-target
(if (< z 2.7594565545626922e-282) (+ (* (/ x y) (- z t)) t) (if (< z 2.326994450874436e-110) (+ (* x (/ (- z t) y)) t) (+ (* (/ x y) (- z t)) t)))
(+ (* (/ x y) (- z t)) t))