double code(double x, double y, double z, double t, double a, double b) {
return ((double) (((double) (x + ((double) (((double) (y * z)) / t)))) / ((double) (((double) (a + 1.0)) + ((double) (((double) (y * b)) / t))))));
}
double code(double x, double y, double z, double t, double a, double b) {
double VAR;
if ((y <= -8.796357687792906e-230)) {
VAR = ((double) (((double) (x + ((double) (((double) (((double) cbrt(y)) * ((double) (((double) cbrt(y)) / t)))) * ((double) (((double) cbrt(y)) * z)))))) * ((double) (1.0 / ((double) (a + ((double) (1.0 + ((double) (y * ((double) (b / t))))))))))));
} else {
double VAR_1;
if ((y <= 1.649048289790591e-41)) {
VAR_1 = ((double) (((double) (x + ((double) (((double) (y * z)) / t)))) / ((double) (((double) (a + 1.0)) + ((double) (((double) (y * b)) / t))))));
} else {
VAR_1 = ((double) (((double) (x + ((double) (((double) sqrt(y)) * ((double) (((double) sqrt(y)) * ((double) (z / t)))))))) / ((double) (a + ((double) (1.0 + ((double) (y * ((double) (b / t))))))))));
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b
Results
| Original | 16.5 |
|---|---|
| Target | 13.1 |
| Herbie | 14.2 |
if y < -8.7963576877929056e-230Initial program 18.3
Simplified16.6
rmApplied div-inv16.6
rmApplied associate-*r/18.1
rmApplied associate-/l*16.5
rmApplied div-inv16.5
Applied add-cube-cbrt16.7
Applied times-frac17.5
Simplified17.5
Simplified17.4
if -8.7963576877929056e-230 < y < 1.649048289790591e-41Initial program 3.2
if 1.649048289790591e-41 < y Initial program 27.5
Simplified20.3
rmApplied add-sqr-sqrt20.4
Applied associate-*l*20.4
Simplified20.4
Final simplification14.2
herbie shell --seed 2020181
(FPCore (x y z t a b)
:name "Diagrams.Solve.Tridiagonal:solveCyclicTriDiagonal from diagrams-solve-0.1, B"
:precision binary64
:herbie-target
(if (< t -1.3659085366310088e-271) (* 1.0 (* (+ x (* (/ y t) z)) (/ 1.0 (+ (+ a 1.0) (* (/ y t) b))))) (if (< t 3.036967103737246e-130) (/ z b) (* 1.0 (* (+ x (* (/ y t) z)) (/ 1.0 (+ (+ a 1.0) (* (/ y t) b)))))))
(/ (+ x (/ (* y z) t)) (+ (+ a 1.0) (/ (* y b) t))))