double code(double x, double y, double z, double t, double a) {
return ((double) (((double) (x - ((double) (y * z)))) / ((double) (t - ((double) (a * z))))));
}
double code(double x, double y, double z, double t, double a) {
double VAR;
if (((z <= -1.2583693790391414e-48) || !(z <= 10.275809148984232))) {
VAR = ((double) (((double) (x / ((double) (t - ((double) (z * a)))))) - ((double) (y / ((double) (((double) (t / z)) - a))))));
} else {
VAR = ((double) (((double) (x - ((double) (z * y)))) / ((double) (t - ((double) (z * a))))));
}
return VAR;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 10.2 |
|---|---|
| Target | 1.7 |
| Herbie | 1.5 |
if z < -1.25836937903914137e-48 or 10.2758091489842318 < z Initial program 19.2
rmApplied div-sub19.2
Simplified19.2
Simplified11.8
rmApplied sub-neg11.8
Simplified2.8
if -1.25836937903914137e-48 < z < 10.2758091489842318Initial program 0.1
Final simplification1.5
herbie shell --seed 2020191
(FPCore (x y z t a)
:name "Diagrams.Solve.Tridiagonal:solveTriDiagonal from diagrams-solve-0.1, A"
:precision binary64
:herbie-target
(if (< z -32113435955957344.0) (- (/ x (- t (* a z))) (/ y (- (/ t z) a))) (if (< z 3.5139522372978296e-86) (* (- x (* y z)) (/ 1.0 (- t (* a z)))) (- (/ x (- t (* a z))) (/ y (- (/ t z) a)))))
(/ (- x (* y z)) (- t (* a z))))