2 \cdot \left(\left(x \cdot y + z \cdot t\right) - \left(\left(a + b \cdot c\right) \cdot c\right) \cdot i\right)
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
t_2 := \mathsf{fma}\left(x, y, z \cdot t\right)\\
\mathbf{if}\;t_1 \leq -\infty \lor \neg \left(t_1 \leq 2.2009087338765767 \cdot 10^{+294}\right):\\
\;\;\;\;2 \cdot \left(t_2 - c \cdot \left(c \cdot \left(b \cdot i\right) + a \cdot i\right)\right)\\
\mathbf{else}:\\
\;\;\;\;2 \cdot \left(t_2 - i \cdot \left(c \cdot \mathsf{fma}\left(b, c, a\right)\right)\right)\\
\end{array}
(FPCore (x y z t a b c i) :precision binary64 (* 2.0 (- (+ (* x y) (* z t)) (* (* (+ a (* b c)) c) i))))
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)) (t_2 (fma x y (* z t))))
(if (or (<= t_1 (- INFINITY)) (not (<= t_1 2.2009087338765767e+294)))
(* 2.0 (- t_2 (* c (+ (* c (* b i)) (* a i)))))
(* 2.0 (- t_2 (* i (* c (fma b c a))))))))double code(double x, double y, double z, double t, double a, double b, double c, double i) {
return 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i));
}
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = (c * (a + (b * c))) * i;
double t_2 = fma(x, y, (z * t));
double tmp;
if ((t_1 <= -((double) INFINITY)) || !(t_1 <= 2.2009087338765767e+294)) {
tmp = 2.0 * (t_2 - (c * ((c * (b * i)) + (a * i))));
} else {
tmp = 2.0 * (t_2 - (i * (c * fma(b, c, a))));
}
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




Bits error versus c




Bits error versus i
| Original | 6.2 |
|---|---|
| Target | 1.7 |
| Herbie | 0.9 |
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -inf.0 or 2.2009087338765767e294 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 60.9
Simplified60.9
Taylor expanded in c around 0 35.5
Simplified10.1
Taylor expanded in c around 0 6.0
if -inf.0 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 2.2009087338765767e294Initial program 0.3
Simplified0.3
Final simplification0.9
herbie shell --seed 2022160
(FPCore (x y z t a b c i)
:name "Diagrams.ThreeD.Shapes:frustum from diagrams-lib-1.3.0.3, A"
:precision binary64
:herbie-target
(* 2.0 (- (+ (* x y) (* z t)) (* (+ a (* b c)) (* c i))))
(* 2.0 (- (+ (* x y) (* z t)) (* (* (+ a (* b c)) c) i))))