\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 r800767 = x;
double r800768 = y;
double r800769 = z;
double r800770 = r800768 * r800769;
double r800771 = r800767 - r800770;
double r800772 = t;
double r800773 = a;
double r800774 = r800773 * r800769;
double r800775 = r800772 - r800774;
double r800776 = r800771 / r800775;
return r800776;
}
double f(double x, double y, double z, double t, double a) {
double r800777 = x;
double r800778 = y;
double r800779 = z;
double r800780 = r800778 * r800779;
double r800781 = r800777 - r800780;
double r800782 = t;
double r800783 = a;
double r800784 = r800783 * r800779;
double r800785 = r800782 - r800784;
double r800786 = r800781 / r800785;
return r800786;
}




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.7 |
| Herbie | 10.7 |
Initial program 10.7
Final simplification10.7
herbie shell --seed 2019353
(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))))