\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 r854171 = x;
double r854172 = y;
double r854173 = z;
double r854174 = r854172 * r854173;
double r854175 = r854171 - r854174;
double r854176 = t;
double r854177 = a;
double r854178 = r854177 * r854173;
double r854179 = r854176 - r854178;
double r854180 = r854175 / r854179;
return r854180;
}
double f(double x, double y, double z, double t, double a) {
double r854181 = x;
double r854182 = y;
double r854183 = z;
double r854184 = r854182 * r854183;
double r854185 = r854181 - r854184;
double r854186 = t;
double r854187 = a;
double r854188 = r854187 * r854183;
double r854189 = r854186 - r854188;
double r854190 = r854185 / r854189;
return r854190;
}




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))))