\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 r727084 = x;
double r727085 = y;
double r727086 = z;
double r727087 = r727085 * r727086;
double r727088 = r727084 - r727087;
double r727089 = t;
double r727090 = a;
double r727091 = r727090 * r727086;
double r727092 = r727089 - r727091;
double r727093 = r727088 / r727092;
return r727093;
}
double f(double x, double y, double z, double t, double a) {
double r727094 = x;
double r727095 = y;
double r727096 = z;
double r727097 = r727095 * r727096;
double r727098 = r727094 - r727097;
double r727099 = t;
double r727100 = a;
double r727101 = r727100 * r727096;
double r727102 = r727099 - r727101;
double r727103 = r727098 / r727102;
return r727103;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




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