\left(\left(\left(\left(\left(x \cdot y - z \cdot t\right) \cdot \left(a \cdot b - c \cdot i\right) - \left(x \cdot j - z \cdot k\right) \cdot \left(y0 \cdot b - y1 \cdot i\right)\right) + \left(x \cdot y2 - z \cdot y3\right) \cdot \left(y0 \cdot c - y1 \cdot a\right)\right) + \left(t \cdot j - y \cdot k\right) \cdot \left(y4 \cdot b - y5 \cdot i\right)\right) - \left(t \cdot y2 - y \cdot y3\right) \cdot \left(y4 \cdot c - y5 \cdot a\right)\right) + \left(k \cdot y2 - j \cdot y3\right) \cdot \left(y4 \cdot y1 - y5 \cdot y0\right)
\begin{array}{l}
t_1 := t \cdot y2 - y \cdot y3\\
t_2 := a \cdot y5 - c \cdot y4\\
t_3 := x \cdot y2 - z \cdot y3\\
t_4 := x \cdot y - z \cdot t\\
t_5 := c \cdot y0 - a \cdot y1\\
t_6 := \left(t \cdot j - y \cdot k\right) \cdot \left(b \cdot y4 - i \cdot y5\right)\\
t_7 := y1 \cdot y4 - y0 \cdot y5\\
t_8 := x \cdot j - z \cdot k\\
t_9 := a \cdot b - c \cdot i\\
t_10 := k \cdot y2 - j \cdot y3\\
t_11 := \left(\left(\left(\left(t_4 \cdot t_9 - t_8 \cdot \left(b \cdot y0 - i \cdot y1\right)\right) + t_3 \cdot t_5\right) + t_6\right) - t_1 \cdot \left(c \cdot y4 - a \cdot y5\right)\right) + t_10 \cdot t_7\\
\mathbf{if}\;t_11 \leq -\infty:\\
\;\;\;\;\mathsf{fma}\left(t_10, t_7, \mathsf{fma}\left(t_1, t_2, k \cdot \left(\mathsf{fma}\left(i, y \cdot y5, y0 \cdot \left(z \cdot b\right)\right) - \mathsf{fma}\left(i, z \cdot y1, y4 \cdot \left(y \cdot b\right)\right)\right)\right)\right)\\
\mathbf{elif}\;t_11 \leq 8.841855543709725 \cdot 10^{+307}:\\
\;\;\;\;\mathsf{fma}\left(t_10, t_7, \mathsf{fma}\left(t_1, t_2, \mathsf{fma}\left(t_4, t_9, \mathsf{fma}\left(t_8, i \cdot y1 - b \cdot y0, \mathsf{fma}\left(t_3, t_5, t_6\right)\right)\right)\right)\right)\\
\mathbf{elif}\;t_11 \leq \infty:\\
\;\;\;\;\mathsf{fma}\left(t_10, t_7, \mathsf{fma}\left(t_1, t_2, b \cdot \left(\mathsf{fma}\left(y4, t \cdot j, \mathsf{fma}\left(k, z \cdot y0, \left(x \cdot y\right) \cdot a\right)\right) - \mathsf{fma}\left(y0, x \cdot j, \mathsf{fma}\left(a, z \cdot t, k \cdot \left(y \cdot y4\right)\right)\right)\right)\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(t_10, t_7, \mathsf{fma}\left(t_1, t_2, x \cdot \left(\mathsf{fma}\left(a, y \cdot b, \mathsf{fma}\left(c, y0 \cdot y2, y1 \cdot \left(i \cdot j\right)\right)\right) - \mathsf{fma}\left(c, y \cdot i, \mathsf{fma}\left(y0, b \cdot j, a \cdot \left(y1 \cdot y2\right)\right)\right)\right)\right)\right)\\
\end{array}
(FPCore (x y z t a b c i j k y0 y1 y2 y3 y4 y5)
:precision binary64
(+
(-
(+
(+
(-
(* (- (* x y) (* z t)) (- (* a b) (* c i)))
(* (- (* x j) (* z k)) (- (* y0 b) (* y1 i))))
(* (- (* x y2) (* z y3)) (- (* y0 c) (* y1 a))))
(* (- (* t j) (* y k)) (- (* y4 b) (* y5 i))))
(* (- (* t y2) (* y y3)) (- (* y4 c) (* y5 a))))
(* (- (* k y2) (* j y3)) (- (* y4 y1) (* y5 y0)))))(FPCore (x y z t a b c i j k y0 y1 y2 y3 y4 y5)
:precision binary64
(let* ((t_1 (- (* t y2) (* y y3)))
(t_2 (- (* a y5) (* c y4)))
(t_3 (- (* x y2) (* z y3)))
(t_4 (- (* x y) (* z t)))
(t_5 (- (* c y0) (* a y1)))
(t_6 (* (- (* t j) (* y k)) (- (* b y4) (* i y5))))
(t_7 (- (* y1 y4) (* y0 y5)))
(t_8 (- (* x j) (* z k)))
(t_9 (- (* a b) (* c i)))
(t_10 (- (* k y2) (* j y3)))
(t_11
(+
(-
(+
(+ (- (* t_4 t_9) (* t_8 (- (* b y0) (* i y1)))) (* t_3 t_5))
t_6)
(* t_1 (- (* c y4) (* a y5))))
(* t_10 t_7))))
(if (<= t_11 (- INFINITY))
(fma
t_10
t_7
(fma
t_1
t_2
(*
k
(- (fma i (* y y5) (* y0 (* z b))) (fma i (* z y1) (* y4 (* y b)))))))
(if (<= t_11 8.841855543709725e+307)
(fma
t_10
t_7
(fma
t_1
t_2
(fma t_4 t_9 (fma t_8 (- (* i y1) (* b y0)) (fma t_3 t_5 t_6)))))
(if (<= t_11 INFINITY)
(fma
t_10
t_7
(fma
t_1
t_2
(*
b
(-
(fma y4 (* t j) (fma k (* z y0) (* (* x y) a)))
(fma y0 (* x j) (fma a (* z t) (* k (* y y4))))))))
(fma
t_10
t_7
(fma
t_1
t_2
(*
x
(-
(fma a (* y b) (fma c (* y0 y2) (* y1 (* i j))))
(fma c (* y i) (fma y0 (* b j) (* a (* y1 y2)))))))))))))double code(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k, double y0, double y1, double y2, double y3, double y4, double y5) {
return (((((((x * y) - (z * t)) * ((a * b) - (c * i))) - (((x * j) - (z * k)) * ((y0 * b) - (y1 * i)))) + (((x * y2) - (z * y3)) * ((y0 * c) - (y1 * a)))) + (((t * j) - (y * k)) * ((y4 * b) - (y5 * i)))) - (((t * y2) - (y * y3)) * ((y4 * c) - (y5 * a)))) + (((k * y2) - (j * y3)) * ((y4 * y1) - (y5 * y0)));
}
double code(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k, double y0, double y1, double y2, double y3, double y4, double y5) {
double t_1 = (t * y2) - (y * y3);
double t_2 = (a * y5) - (c * y4);
double t_3 = (x * y2) - (z * y3);
double t_4 = (x * y) - (z * t);
double t_5 = (c * y0) - (a * y1);
double t_6 = ((t * j) - (y * k)) * ((b * y4) - (i * y5));
double t_7 = (y1 * y4) - (y0 * y5);
double t_8 = (x * j) - (z * k);
double t_9 = (a * b) - (c * i);
double t_10 = (k * y2) - (j * y3);
double t_11 = (((((t_4 * t_9) - (t_8 * ((b * y0) - (i * y1)))) + (t_3 * t_5)) + t_6) - (t_1 * ((c * y4) - (a * y5)))) + (t_10 * t_7);
double tmp;
if (t_11 <= -((double) INFINITY)) {
tmp = fma(t_10, t_7, fma(t_1, t_2, (k * (fma(i, (y * y5), (y0 * (z * b))) - fma(i, (z * y1), (y4 * (y * b)))))));
} else if (t_11 <= 8.841855543709725e+307) {
tmp = fma(t_10, t_7, fma(t_1, t_2, fma(t_4, t_9, fma(t_8, ((i * y1) - (b * y0)), fma(t_3, t_5, t_6)))));
} else if (t_11 <= ((double) INFINITY)) {
tmp = fma(t_10, t_7, fma(t_1, t_2, (b * (fma(y4, (t * j), fma(k, (z * y0), ((x * y) * a))) - fma(y0, (x * j), fma(a, (z * t), (k * (y * y4))))))));
} else {
tmp = fma(t_10, t_7, fma(t_1, t_2, (x * (fma(a, (y * b), fma(c, (y0 * y2), (y1 * (i * j)))) - fma(c, (y * i), fma(y0, (b * j), (a * (y1 * y2))))))));
}
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




Bits error versus y0




Bits error versus y1




Bits error versus y2




Bits error versus y3




Bits error versus y4




Bits error versus y5
| Original | 26.8 |
|---|---|
| Target | 30.9 |
| Herbie | 22.0 |
if (+.f64 (-.f64 (+.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 x y) (*.f64 z t)) (-.f64 (*.f64 a b) (*.f64 c i))) (*.f64 (-.f64 (*.f64 x j) (*.f64 z k)) (-.f64 (*.f64 y0 b) (*.f64 y1 i)))) (*.f64 (-.f64 (*.f64 x y2) (*.f64 z y3)) (-.f64 (*.f64 y0 c) (*.f64 y1 a)))) (*.f64 (-.f64 (*.f64 t j) (*.f64 y k)) (-.f64 (*.f64 y4 b) (*.f64 y5 i)))) (*.f64 (-.f64 (*.f64 t y2) (*.f64 y y3)) (-.f64 (*.f64 y4 c) (*.f64 y5 a)))) (*.f64 (-.f64 (*.f64 k y2) (*.f64 j y3)) (-.f64 (*.f64 y4 y1) (*.f64 y5 y0)))) < -inf.0Initial program 64.0
Simplified64.0
Taylor expanded in k around -inf 52.2
Simplified51.4
if -inf.0 < (+.f64 (-.f64 (+.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 x y) (*.f64 z t)) (-.f64 (*.f64 a b) (*.f64 c i))) (*.f64 (-.f64 (*.f64 x j) (*.f64 z k)) (-.f64 (*.f64 y0 b) (*.f64 y1 i)))) (*.f64 (-.f64 (*.f64 x y2) (*.f64 z y3)) (-.f64 (*.f64 y0 c) (*.f64 y1 a)))) (*.f64 (-.f64 (*.f64 t j) (*.f64 y k)) (-.f64 (*.f64 y4 b) (*.f64 y5 i)))) (*.f64 (-.f64 (*.f64 t y2) (*.f64 y y3)) (-.f64 (*.f64 y4 c) (*.f64 y5 a)))) (*.f64 (-.f64 (*.f64 k y2) (*.f64 j y3)) (-.f64 (*.f64 y4 y1) (*.f64 y5 y0)))) < 8.8418555437097251e307Initial program 0.6
Simplified0.6
Applied *-un-lft-identity_binary640.6
Applied associate-*l*_binary640.6
Simplified0.6
if 8.8418555437097251e307 < (+.f64 (-.f64 (+.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 x y) (*.f64 z t)) (-.f64 (*.f64 a b) (*.f64 c i))) (*.f64 (-.f64 (*.f64 x j) (*.f64 z k)) (-.f64 (*.f64 y0 b) (*.f64 y1 i)))) (*.f64 (-.f64 (*.f64 x y2) (*.f64 z y3)) (-.f64 (*.f64 y0 c) (*.f64 y1 a)))) (*.f64 (-.f64 (*.f64 t j) (*.f64 y k)) (-.f64 (*.f64 y4 b) (*.f64 y5 i)))) (*.f64 (-.f64 (*.f64 t y2) (*.f64 y y3)) (-.f64 (*.f64 y4 c) (*.f64 y5 a)))) (*.f64 (-.f64 (*.f64 k y2) (*.f64 j y3)) (-.f64 (*.f64 y4 y1) (*.f64 y5 y0)))) < +inf.0Initial program 63.9
Simplified63.9
Taylor expanded in b around -inf 51.1
Simplified51.1
if +inf.0 < (+.f64 (-.f64 (+.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 x y) (*.f64 z t)) (-.f64 (*.f64 a b) (*.f64 c i))) (*.f64 (-.f64 (*.f64 x j) (*.f64 z k)) (-.f64 (*.f64 y0 b) (*.f64 y1 i)))) (*.f64 (-.f64 (*.f64 x y2) (*.f64 z y3)) (-.f64 (*.f64 y0 c) (*.f64 y1 a)))) (*.f64 (-.f64 (*.f64 t j) (*.f64 y k)) (-.f64 (*.f64 y4 b) (*.f64 y5 i)))) (*.f64 (-.f64 (*.f64 t y2) (*.f64 y y3)) (-.f64 (*.f64 y4 c) (*.f64 y5 a)))) (*.f64 (-.f64 (*.f64 k y2) (*.f64 j y3)) (-.f64 (*.f64 y4 y1) (*.f64 y5 y0)))) Initial program 64.0
Simplified64.0
Taylor expanded in x around inf 54.1
Simplified54.4
Final simplification22.0
herbie shell --seed 2022081
(FPCore (x y z t a b c i j k y0 y1 y2 y3 y4 y5)
:name "Linear.Matrix:det44 from linear-1.19.1.3"
:precision binary64
:herbie-target
(if (< y4 -7.206256231996481e+60) (- (- (* (- (* b a) (* i c)) (- (* y x) (* t z))) (- (* (- (* j x) (* k z)) (- (* y0 b) (* i y1))) (* (- (* j t) (* k y)) (- (* y4 b) (* y5 i))))) (- (/ (- (* y2 t) (* y3 y)) (/ 1.0 (- (* y4 c) (* y5 a)))) (* (- (* y2 k) (* y3 j)) (- (* y4 y1) (* y5 y0))))) (if (< y4 -3.364603505246317e-66) (+ (- (- (- (* (* t c) (* i z)) (* (* a t) (* b z))) (* (* y c) (* i x))) (* (- (* b y0) (* i y1)) (- (* j x) (* k z)))) (- (* (- (* y0 c) (* a y1)) (- (* x y2) (* z y3))) (- (* (- (* t y2) (* y y3)) (- (* y4 c) (* a y5))) (* (- (* y1 y4) (* y5 y0)) (- (* k y2) (* j y3)))))) (if (< y4 -1.2000065055686116e-105) (+ (+ (- (* (- (* j t) (* k y)) (- (* y4 b) (* y5 i))) (* (* y3 y) (- (* y5 a) (* y4 c)))) (+ (* (* y5 a) (* t y2)) (* (- (* k y2) (* j y3)) (- (* y4 y1) (* y5 y0))))) (- (* (- (* x y2) (* z y3)) (- (* c y0) (* a y1))) (- (* (- (* b y0) (* i y1)) (- (* j x) (* k z))) (* (- (* y x) (* z t)) (- (* b a) (* i c)))))) (if (< y4 6.718963124057495e-279) (+ (- (- (- (* (* k y) (* y5 i)) (* (* y b) (* y4 k))) (* (* y5 t) (* i j))) (- (* (- (* y2 t) (* y3 y)) (- (* y4 c) (* y5 a))) (* (- (* y2 k) (* y3 j)) (- (* y4 y1) (* y5 y0))))) (- (* (- (* b a) (* i c)) (- (* y x) (* t z))) (- (* (- (* j x) (* k z)) (- (* y0 b) (* i y1))) (* (- (* y2 x) (* y3 z)) (- (* c y0) (* y1 a)))))) (if (< y4 4.77962681403792e-222) (+ (+ (- (* (- (* j t) (* k y)) (- (* y4 b) (* y5 i))) (* (* y3 y) (- (* y5 a) (* y4 c)))) (+ (* (* y5 a) (* t y2)) (* (- (* k y2) (* j y3)) (- (* y4 y1) (* y5 y0))))) (- (* (- (* x y2) (* z y3)) (- (* c y0) (* a y1))) (- (* (- (* b y0) (* i y1)) (- (* j x) (* k z))) (* (- (* y x) (* z t)) (- (* b a) (* i c)))))) (if (< y4 2.2852241541266835e-175) (+ (- (- (- (* (* k y) (* y5 i)) (* (* y b) (* y4 k))) (* (* y5 t) (* i j))) (- (* (- (* y2 t) (* y3 y)) (- (* y4 c) (* y5 a))) (* (- (* y2 k) (* y3 j)) (- (* y4 y1) (* y5 y0))))) (- (* (- (* b a) (* i c)) (- (* y x) (* t z))) (- (* (- (* j x) (* k z)) (- (* y0 b) (* i y1))) (* (- (* y2 x) (* y3 z)) (- (* c y0) (* y1 a)))))) (+ (- (+ (+ (- (* (- (* x y) (* z t)) (- (* a b) (* c i))) (- (* k (* i (* z y1))) (+ (* j (* i (* x y1))) (* y0 (* k (* z b)))))) (- (* z (* y3 (* a y1))) (+ (* y2 (* x (* a y1))) (* y0 (* z (* c y3)))))) (* (- (* t j) (* y k)) (- (* y4 b) (* y5 i)))) (* (- (* t y2) (* y y3)) (- (* y4 c) (* y5 a)))) (* (- (* k y2) (* j y3)) (- (* y4 y1) (* y5 y0))))))))))
(+ (- (+ (+ (- (* (- (* x y) (* z t)) (- (* a b) (* c i))) (* (- (* x j) (* z k)) (- (* y0 b) (* y1 i)))) (* (- (* x y2) (* z y3)) (- (* y0 c) (* y1 a)))) (* (- (* t j) (* y k)) (- (* y4 b) (* y5 i)))) (* (- (* t y2) (* y y3)) (- (* y4 c) (* y5 a)))) (* (- (* k y2) (* j y3)) (- (* y4 y1) (* y5 y0)))))