\frac{x + \frac{y \cdot z}{t}}{\left(a + 1\right) + \frac{y \cdot b}{t}}\begin{array}{l}
\mathbf{if}\;t \leq -1.4321878169708876 \cdot 10^{-55} \lor \neg \left(t \leq 4.5828853116986545 \cdot 10^{-18}\right):\\
\;\;\;\;\frac{x + y \cdot \frac{z}{t}}{\left(a + 1\right) + \frac{y}{\frac{t}{b}}}\\
\mathbf{else}:\\
\;\;\;\;\left(\sqrt[3]{x + \frac{y \cdot z}{t}} \cdot \sqrt[3]{x + \frac{y \cdot z}{t}}\right) \cdot \frac{\sqrt[3]{x + \frac{y \cdot z}{t}}}{\left(a + 1\right) + \frac{y \cdot b}{t}}\\
\end{array}(FPCore (x y z t a b) :precision binary64 (/ (+ x (/ (* y z) t)) (+ (+ a 1.0) (/ (* y b) t))))
(FPCore (x y z t a b)
:precision binary64
(if (or (<= t -1.4321878169708876e-55) (not (<= t 4.5828853116986545e-18)))
(/ (+ x (* y (/ z t))) (+ (+ a 1.0) (/ y (/ t b))))
(*
(* (cbrt (+ x (/ (* y z) t))) (cbrt (+ x (/ (* y z) t))))
(/ (cbrt (+ x (/ (* y z) t))) (+ (+ a 1.0) (/ (* y b) t))))))double code(double x, double y, double z, double t, double a, double b) {
return (x + ((y * z) / t)) / ((a + 1.0) + ((y * b) / t));
}
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if ((t <= -1.4321878169708876e-55) || !(t <= 4.5828853116986545e-18)) {
tmp = (x + (y * (z / t))) / ((a + 1.0) + (y / (t / b)));
} else {
tmp = (cbrt(x + ((y * z) / t)) * cbrt(x + ((y * z) / t))) * (cbrt(x + ((y * z) / t)) / ((a + 1.0) + ((y * b) / t)));
}
return tmp;
}




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.1 |
|---|---|
| Target | 12.9 |
| Herbie | 12.9 |
if t < -1.43218781697088762e-55 or 4.5828853116986545e-18 < t Initial program 11.1
rmApplied associate-/l*_binary648.6
rmApplied *-un-lft-identity_binary648.6
Applied times-frac_binary645.1
Simplified5.1
if -1.43218781697088762e-55 < t < 4.5828853116986545e-18Initial program 23.2
rmApplied *-un-lft-identity_binary6423.2
Applied add-cube-cbrt_binary6423.7
Applied times-frac_binary6423.7
Simplified23.7
Final simplification12.9
herbie shell --seed 2020219
(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))))