\left(\left(\left(\left(\left(\left(x \cdot 18\right) \cdot y\right) \cdot z\right) \cdot t - \left(a \cdot 4\right) \cdot t\right) + b \cdot c\right) - \left(x \cdot 4\right) \cdot i\right) - \left(j \cdot 27\right) \cdot k
\begin{array}{l}
t_1 := t \cdot \left(a \cdot 4\right)\\
t_2 := \left(x \cdot 4\right) \cdot i\\
\mathbf{if}\;t \leq -9.975292116768165 \cdot 10^{-80}:\\
\;\;\;\;\left(\left(\left(t \cdot \left(18 \cdot \left(y \cdot \left(z \cdot x\right)\right)\right) - t_1\right) + b \cdot c\right) - t_2\right) - \left(j \cdot 27\right) \cdot k\\
\mathbf{elif}\;t \leq 7.421598214929802 \cdot 10^{-228}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(18, y \cdot \left(t \cdot z\right), i \cdot -4\right), \mathsf{fma}\left(a, t \cdot -4, \mathsf{fma}\left(-27, j \cdot k, b \cdot c\right)\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\left(b \cdot c + \left(t \cdot \left(z \cdot \left(y \cdot \left(18 \cdot x\right)\right)\right) - t_1\right)\right) - t_2\right) - 27 \cdot \left(j \cdot k\right)\\
\end{array}
(FPCore (x y z t a b c i j k) :precision binary64 (- (- (+ (- (* (* (* (* x 18.0) y) z) t) (* (* a 4.0) t)) (* b c)) (* (* x 4.0) i)) (* (* j 27.0) k)))
(FPCore (x y z t a b c i j k)
:precision binary64
(let* ((t_1 (* t (* a 4.0))) (t_2 (* (* x 4.0) i)))
(if (<= t -9.975292116768165e-80)
(-
(- (+ (- (* t (* 18.0 (* y (* z x)))) t_1) (* b c)) t_2)
(* (* j 27.0) k))
(if (<= t 7.421598214929802e-228)
(fma
x
(fma 18.0 (* y (* t z)) (* i -4.0))
(fma a (* t -4.0) (fma -27.0 (* j k) (* b c))))
(-
(- (+ (* b c) (- (* t (* z (* y (* 18.0 x)))) t_1)) t_2)
(* 27.0 (* j k)))))))double code(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
return (((((((x * 18.0) * y) * z) * t) - ((a * 4.0) * t)) + (b * c)) - ((x * 4.0) * i)) - ((j * 27.0) * k);
}
double code(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
double t_1 = t * (a * 4.0);
double t_2 = (x * 4.0) * i;
double tmp;
if (t <= -9.975292116768165e-80) {
tmp = ((((t * (18.0 * (y * (z * x)))) - t_1) + (b * c)) - t_2) - ((j * 27.0) * k);
} else if (t <= 7.421598214929802e-228) {
tmp = fma(x, fma(18.0, (y * (t * z)), (i * -4.0)), fma(a, (t * -4.0), fma(-27.0, (j * k), (b * c))));
} else {
tmp = (((b * c) + ((t * (z * (y * (18.0 * x)))) - t_1)) - t_2) - (27.0 * (j * k));
}
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




Bits error versus j




Bits error versus k
| Original | 5.1 |
|---|---|
| Target | 1.6 |
| Herbie | 2.9 |
if t < -9.97529211676816536e-80Initial program 2.3
Taylor expanded in x around 0 2.8
if -9.97529211676816536e-80 < t < 7.4215982149298018e-228Initial program 8.1
Simplified1.0
if 7.4215982149298018e-228 < t Initial program 4.6
Taylor expanded in j around 0 4.5
Final simplification2.9
herbie shell --seed 2021280
(FPCore (x y z t a b c i j k)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, E"
:precision binary64
:herbie-target
(if (< t -1.6210815397541398e-69) (- (- (* (* 18.0 t) (* (* x y) z)) (* (+ (* a t) (* i x)) 4.0)) (- (* (* k j) 27.0) (* c b))) (if (< t 165.68027943805222) (+ (- (* (* 18.0 y) (* x (* z t))) (* (+ (* a t) (* i x)) 4.0)) (- (* c b) (* 27.0 (* k j)))) (- (- (* (* 18.0 t) (* (* x y) z)) (* (+ (* a t) (* i x)) 4.0)) (- (* (* k j) 27.0) (* c b)))))
(- (- (+ (- (* (* (* (* x 18.0) y) z) t) (* (* a 4.0) t)) (* b c)) (* (* x 4.0) i)) (* (* j 27.0) k)))