\frac{x - y \cdot z}{t - a \cdot z}\begin{array}{l}
\mathbf{if}\;z \le -4.06401190083563283 \cdot 10^{38} \lor \neg \left(z \le 2.50952591182416396 \cdot 10^{-42}\right):\\
\;\;\;\;\frac{x}{t - a \cdot z} - y \cdot \frac{1}{\frac{t - a \cdot z}{z}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{t - a \cdot z} - \frac{y \cdot z}{t - a \cdot z}\\
\end{array}double f(double x, double y, double z, double t, double a) {
double r1001527 = x;
double r1001528 = y;
double r1001529 = z;
double r1001530 = r1001528 * r1001529;
double r1001531 = r1001527 - r1001530;
double r1001532 = t;
double r1001533 = a;
double r1001534 = r1001533 * r1001529;
double r1001535 = r1001532 - r1001534;
double r1001536 = r1001531 / r1001535;
return r1001536;
}
double f(double x, double y, double z, double t, double a) {
double r1001537 = z;
double r1001538 = -4.064011900835633e+38;
bool r1001539 = r1001537 <= r1001538;
double r1001540 = 2.509525911824164e-42;
bool r1001541 = r1001537 <= r1001540;
double r1001542 = !r1001541;
bool r1001543 = r1001539 || r1001542;
double r1001544 = x;
double r1001545 = t;
double r1001546 = a;
double r1001547 = r1001546 * r1001537;
double r1001548 = r1001545 - r1001547;
double r1001549 = r1001544 / r1001548;
double r1001550 = y;
double r1001551 = 1.0;
double r1001552 = r1001548 / r1001537;
double r1001553 = r1001551 / r1001552;
double r1001554 = r1001550 * r1001553;
double r1001555 = r1001549 - r1001554;
double r1001556 = r1001550 * r1001537;
double r1001557 = r1001556 / r1001548;
double r1001558 = r1001549 - r1001557;
double r1001559 = r1001543 ? r1001555 : r1001558;
return r1001559;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.3 |
|---|---|
| Target | 1.7 |
| Herbie | 6.5 |
if z < -4.064011900835633e+38 or 2.509525911824164e-42 < z Initial program 20.2
rmApplied div-sub20.2
Simplified12.7
rmApplied clear-num12.8
if -4.064011900835633e+38 < z < 2.509525911824164e-42Initial program 0.3
rmApplied div-sub0.3
Simplified2.9
rmApplied associate-*r/0.3
Final simplification6.5
herbie shell --seed 2020042
(FPCore (x y z t a)
:name "Diagrams.Solve.Tridiagonal:solveTriDiagonal from diagrams-solve-0.1, A"
:precision binary64
:herbie-target
(if (< z -32113435955957344) (- (/ x (- t (* a z))) (/ y (- (/ t z) a))) (if (< z 3.5139522372978296e-86) (* (- x (* y z)) (/ 1 (- t (* a z)))) (- (/ x (- t (* a z))) (/ y (- (/ t z) a)))))
(/ (- x (* y z)) (- t (* a z))))