\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 r799177 = x;
double r799178 = y;
double r799179 = z;
double r799180 = r799178 * r799179;
double r799181 = r799177 - r799180;
double r799182 = t;
double r799183 = a;
double r799184 = r799183 * r799179;
double r799185 = r799182 - r799184;
double r799186 = r799181 / r799185;
return r799186;
}
double f(double x, double y, double z, double t, double a) {
double r799187 = x;
double r799188 = y;
double r799189 = z;
double r799190 = r799188 * r799189;
double r799191 = r799187 - r799190;
double r799192 = t;
double r799193 = a;
double r799194 = r799193 * r799189;
double r799195 = r799192 - r799194;
double r799196 = r799191 / r799195;
return r799196;
}




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