\frac{x - y \cdot z}{t - a \cdot z}\frac{x - y \cdot z}{t - a \cdot z}double f(double x, double y, double z, double t, double a) {
double r800541 = x;
double r800542 = y;
double r800543 = z;
double r800544 = r800542 * r800543;
double r800545 = r800541 - r800544;
double r800546 = t;
double r800547 = a;
double r800548 = r800547 * r800543;
double r800549 = r800546 - r800548;
double r800550 = r800545 / r800549;
return r800550;
}
double f(double x, double y, double z, double t, double a) {
double r800551 = x;
double r800552 = y;
double r800553 = z;
double r800554 = r800552 * r800553;
double r800555 = r800551 - r800554;
double r800556 = t;
double r800557 = a;
double r800558 = r800557 * r800553;
double r800559 = r800556 - r800558;
double r800560 = r800555 / r800559;
return r800560;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.6 |
|---|---|
| Target | 1.8 |
| Herbie | 10.6 |
Initial program 10.6
Final simplification10.6
herbie shell --seed 2020065
(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))))