\frac{x - y \cdot z}{t - a \cdot z}\begin{array}{l}
\mathbf{if}\;z \le -3.10185718647149596 \cdot 10^{-19} \lor \neg \left(z \le 2.3170079174536806 \cdot 10^{-12}\right):\\
\;\;\;\;\frac{x}{t - a \cdot z} - y \cdot \frac{1}{\frac{t}{z} - a}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{t - a \cdot z} - \frac{y \cdot z}{t - z \cdot a}\\
\end{array}double f(double x, double y, double z, double t, double a) {
double r673699 = x;
double r673700 = y;
double r673701 = z;
double r673702 = r673700 * r673701;
double r673703 = r673699 - r673702;
double r673704 = t;
double r673705 = a;
double r673706 = r673705 * r673701;
double r673707 = r673704 - r673706;
double r673708 = r673703 / r673707;
return r673708;
}
double f(double x, double y, double z, double t, double a) {
double r673709 = z;
double r673710 = -3.101857186471496e-19;
bool r673711 = r673709 <= r673710;
double r673712 = 2.3170079174536806e-12;
bool r673713 = r673709 <= r673712;
double r673714 = !r673713;
bool r673715 = r673711 || r673714;
double r673716 = x;
double r673717 = t;
double r673718 = a;
double r673719 = r673718 * r673709;
double r673720 = r673717 - r673719;
double r673721 = r673716 / r673720;
double r673722 = y;
double r673723 = 1.0;
double r673724 = r673717 / r673709;
double r673725 = r673724 - r673718;
double r673726 = r673723 / r673725;
double r673727 = r673722 * r673726;
double r673728 = r673721 - r673727;
double r673729 = r673722 * r673709;
double r673730 = r673709 * r673718;
double r673731 = r673717 - r673730;
double r673732 = r673729 / r673731;
double r673733 = r673721 - r673732;
double r673734 = r673715 ? r673728 : r673733;
return r673734;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.0 |
|---|---|
| Target | 1.5 |
| Herbie | 1.4 |
if z < -3.101857186471496e-19 or 2.3170079174536806e-12 < z Initial program 19.4
rmApplied div-sub19.4
Simplified12.0
rmApplied clear-num12.0
Taylor expanded around 0 2.6
if -3.101857186471496e-19 < z < 2.3170079174536806e-12Initial program 0.1
rmApplied div-sub0.1
Simplified3.1
rmApplied associate-*r/0.1
Final simplification1.4
herbie shell --seed 2020045 +o rules:numerics
(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))))