\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 r820426 = x;
double r820427 = y;
double r820428 = z;
double r820429 = r820427 * r820428;
double r820430 = r820426 - r820429;
double r820431 = t;
double r820432 = a;
double r820433 = r820432 * r820428;
double r820434 = r820431 - r820433;
double r820435 = r820430 / r820434;
return r820435;
}
double f(double x, double y, double z, double t, double a) {
double r820436 = x;
double r820437 = y;
double r820438 = z;
double r820439 = r820437 * r820438;
double r820440 = r820436 - r820439;
double r820441 = t;
double r820442 = a;
double r820443 = r820442 * r820438;
double r820444 = r820441 - r820443;
double r820445 = r820440 / r820444;
return r820445;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.7 |
|---|---|
| Target | 1.7 |
| Herbie | 10.7 |
Initial program 10.7
Final simplification10.7
herbie shell --seed 2020060
(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))))