\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 r546019 = x;
double r546020 = y;
double r546021 = z;
double r546022 = r546020 * r546021;
double r546023 = r546019 - r546022;
double r546024 = t;
double r546025 = a;
double r546026 = r546025 * r546021;
double r546027 = r546024 - r546026;
double r546028 = r546023 / r546027;
return r546028;
}
double f(double x, double y, double z, double t, double a) {
double r546029 = x;
double r546030 = y;
double r546031 = z;
double r546032 = r546030 * r546031;
double r546033 = r546029 - r546032;
double r546034 = t;
double r546035 = a;
double r546036 = r546035 * r546031;
double r546037 = r546034 - r546036;
double r546038 = r546033 / r546037;
return r546038;
}




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.7 |
| Herbie | 10.6 |
Initial program 10.6
Final simplification10.6
herbie shell --seed 2020089
(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))))