\frac{x}{y - z \cdot t}\left(-x\right) \cdot \frac{1}{\mathsf{fma}\left(t, z, -y\right)}double f(double x, double y, double z, double t) {
double r814162 = x;
double r814163 = y;
double r814164 = z;
double r814165 = t;
double r814166 = r814164 * r814165;
double r814167 = r814163 - r814166;
double r814168 = r814162 / r814167;
return r814168;
}
double f(double x, double y, double z, double t) {
double r814169 = x;
double r814170 = -r814169;
double r814171 = 1.0;
double r814172 = t;
double r814173 = z;
double r814174 = y;
double r814175 = -r814174;
double r814176 = fma(r814172, r814173, r814175);
double r814177 = r814171 / r814176;
double r814178 = r814170 * r814177;
return r814178;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
| Original | 2.9 |
|---|---|
| Target | 1.7 |
| Herbie | 3.0 |
Initial program 2.9
rmApplied frac-2neg2.9
Simplified2.9
rmApplied div-inv3.0
Final simplification3.0
herbie shell --seed 2020057 +o rules:numerics
(FPCore (x y z t)
:name "Diagrams.Solve.Tridiagonal:solveTriDiagonal from diagrams-solve-0.1, B"
:precision binary64
:herbie-target
(if (< x -1.618195973607049e+50) (/ 1 (- (/ y x) (* (/ z x) t))) (if (< x 2.1378306434876444e+131) (/ x (- y (* z t))) (/ 1 (- (/ y x) (* (/ z x) t)))))
(/ x (- y (* z t))))