\frac{x - y \cdot z}{t - a \cdot z}\frac{x}{t - a \cdot z} - \frac{y}{\frac{t}{z} - a}double f(double x, double y, double z, double t, double a) {
double r823397 = x;
double r823398 = y;
double r823399 = z;
double r823400 = r823398 * r823399;
double r823401 = r823397 - r823400;
double r823402 = t;
double r823403 = a;
double r823404 = r823403 * r823399;
double r823405 = r823402 - r823404;
double r823406 = r823401 / r823405;
return r823406;
}
double f(double x, double y, double z, double t, double a) {
double r823407 = x;
double r823408 = t;
double r823409 = a;
double r823410 = z;
double r823411 = r823409 * r823410;
double r823412 = r823408 - r823411;
double r823413 = r823407 / r823412;
double r823414 = y;
double r823415 = r823408 / r823410;
double r823416 = r823415 - r823409;
double r823417 = r823414 / r823416;
double r823418 = r823413 - r823417;
return r823418;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.3 |
|---|---|
| Target | 1.5 |
| Herbie | 2.7 |
Initial program 10.3
rmApplied div-sub10.3
rmApplied associate-/l*7.7
Taylor expanded around 0 2.7
Final simplification2.7
herbie shell --seed 2020057 +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))))