\frac{x + \frac{y \cdot z}{t}}{\left(a + 1\right) + \frac{y \cdot b}{t}}\begin{array}{l}
\mathbf{if}\;t \le -5.3718742783043084 \cdot 10^{-31} \lor \neg \left(t \le 0.136926633612809517\right):\\
\;\;\;\;\left(x + \frac{y}{\frac{t}{z}}\right) \cdot \frac{1}{\left(a + 1\right) + \frac{y}{\frac{t}{b}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{\left(a + 1\right) + \frac{y \cdot b}{t}}{x + \frac{y \cdot z}{t}}}\\
\end{array}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 (((t <= -5.371874278304308e-31) || !(t <= 0.13692663361280952))) {
VAR = ((double) (((double) (x + ((double) (y / ((double) (t / z)))))) * ((double) (1.0 / ((double) (((double) (a + 1.0)) + ((double) (y / ((double) (t / b))))))))));
} else {
VAR = ((double) (1.0 / ((double) (((double) (((double) (a + 1.0)) + ((double) (((double) (y * b)) / t)))) / ((double) (x + ((double) (((double) (y * z)) / t))))))));
}
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.7 |
|---|---|
| Target | 13.2 |
| Herbie | 13.1 |
if t < -5.3718742783043084e-31 or 0.136926633612809517 < t Initial program 11.4
rmApplied associate-/l*8.2
rmApplied div-inv8.2
rmApplied associate-/l*4.6
if -5.3718742783043084e-31 < t < 0.136926633612809517Initial program 22.9
rmApplied clear-num23.1
Final simplification13.1
herbie shell --seed 2020162
(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))))