\frac{x - y \cdot z}{t - a \cdot z}\left(x - y \cdot z\right) \cdot \frac{1}{t - z \cdot a}double f(double x, double y, double z, double t, double a) {
double r28643889 = x;
double r28643890 = y;
double r28643891 = z;
double r28643892 = r28643890 * r28643891;
double r28643893 = r28643889 - r28643892;
double r28643894 = t;
double r28643895 = a;
double r28643896 = r28643895 * r28643891;
double r28643897 = r28643894 - r28643896;
double r28643898 = r28643893 / r28643897;
return r28643898;
}
double f(double x, double y, double z, double t, double a) {
double r28643899 = x;
double r28643900 = y;
double r28643901 = z;
double r28643902 = r28643900 * r28643901;
double r28643903 = r28643899 - r28643902;
double r28643904 = 1.0;
double r28643905 = t;
double r28643906 = a;
double r28643907 = r28643901 * r28643906;
double r28643908 = r28643905 - r28643907;
double r28643909 = r28643904 / r28643908;
double r28643910 = r28643903 * r28643909;
return r28643910;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.2 |
|---|---|
| Target | 1.6 |
| Herbie | 10.4 |
Initial program 10.2
rmApplied *-un-lft-identity10.2
Applied associate-/r*10.2
Simplified10.2
rmApplied div-inv10.4
Final simplification10.4
herbie shell --seed 2019163 +o rules:numerics
(FPCore (x y z t a)
:name "Diagrams.Solve.Tridiagonal:solveTriDiagonal from diagrams-solve-0.1, A"
:herbie-target
(if (< z -32113435955957344.0) (- (/ 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))))