\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 r613964 = x;
double r613965 = y;
double r613966 = z;
double r613967 = r613965 * r613966;
double r613968 = r613964 - r613967;
double r613969 = t;
double r613970 = a;
double r613971 = r613970 * r613966;
double r613972 = r613969 - r613971;
double r613973 = r613968 / r613972;
return r613973;
}
double f(double x, double y, double z, double t, double a) {
double r613974 = x;
double r613975 = y;
double r613976 = z;
double r613977 = r613975 * r613976;
double r613978 = r613974 - r613977;
double r613979 = t;
double r613980 = a;
double r613981 = r613980 * r613976;
double r613982 = r613979 - r613981;
double r613983 = r613978 / r613982;
return r613983;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.9 |
|---|---|
| Target | 1.8 |
| Herbie | 10.9 |
Initial program 10.9
Final simplification10.9
herbie shell --seed 2020002 +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))))