\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 r586170 = x;
double r586171 = y;
double r586172 = z;
double r586173 = r586171 * r586172;
double r586174 = r586170 - r586173;
double r586175 = t;
double r586176 = a;
double r586177 = r586176 * r586172;
double r586178 = r586175 - r586177;
double r586179 = r586174 / r586178;
return r586179;
}
double f(double x, double y, double z, double t, double a) {
double r586180 = x;
double r586181 = y;
double r586182 = z;
double r586183 = r586181 * r586182;
double r586184 = r586180 - r586183;
double r586185 = t;
double r586186 = a;
double r586187 = r586186 * r586182;
double r586188 = r586185 - r586187;
double r586189 = r586184 / r586188;
return r586189;
}




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