
(FPCore (x y z t a b c i) :precision binary64 (* 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) {
return 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i));
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
code = 2.0d0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i))
end function
public static 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));
}
def code(x, y, z, t, a, b, c, i): return 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i))
function code(x, y, z, t, a, b, c, i) return Float64(2.0 * Float64(Float64(Float64(x * y) + Float64(z * t)) - Float64(Float64(Float64(a + Float64(b * c)) * c) * i))) end
function tmp = code(x, y, z, t, a, b, c, i) tmp = 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i)); end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(2.0 * N[(N[(N[(x * y), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision] - N[(N[(N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision] * c), $MachinePrecision] * i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \left(\left(x \cdot y + z \cdot t\right) - \left(\left(a + b \cdot c\right) \cdot c\right) \cdot i\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 17 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t a b c i) :precision binary64 (* 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) {
return 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i));
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
code = 2.0d0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i))
end function
public static 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));
}
def code(x, y, z, t, a, b, c, i): return 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i))
function code(x, y, z, t, a, b, c, i) return Float64(2.0 * Float64(Float64(Float64(x * y) + Float64(z * t)) - Float64(Float64(Float64(a + Float64(b * c)) * c) * i))) end
function tmp = code(x, y, z, t, a, b, c, i) tmp = 2.0 * (((x * y) + (z * t)) - (((a + (b * c)) * c) * i)); end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(2.0 * N[(N[(N[(x * y), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision] - N[(N[(N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision] * c), $MachinePrecision] * i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \left(\left(x \cdot y + z \cdot t\right) - \left(\left(a + b \cdot c\right) \cdot c\right) \cdot i\right)
\end{array}
(FPCore (x y z t a b c i) :precision binary64 (if (<= (- (+ (* x y) (* z t)) (* (* c (+ a (* b c))) i)) INFINITY) (* 2.0 (fma (fma b c a) (- (* c i)) (fma x y (* z t)))) (* (* -2.0 (* c c)) (* i (+ b (/ a c))))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double tmp;
if ((((x * y) + (z * t)) - ((c * (a + (b * c))) * i)) <= ((double) INFINITY)) {
tmp = 2.0 * fma(fma(b, c, a), -(c * i), fma(x, y, (z * t)));
} else {
tmp = (-2.0 * (c * c)) * (i * (b + (a / c)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) tmp = 0.0 if (Float64(Float64(Float64(x * y) + Float64(z * t)) - Float64(Float64(c * Float64(a + Float64(b * c))) * i)) <= Inf) tmp = Float64(2.0 * fma(fma(b, c, a), Float64(-Float64(c * i)), fma(x, y, Float64(z * t)))); else tmp = Float64(Float64(-2.0 * Float64(c * c)) * Float64(i * Float64(b + Float64(a / c)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(x * y), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision] - N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]), $MachinePrecision], Infinity], N[(2.0 * N[(N[(b * c + a), $MachinePrecision] * (-N[(c * i), $MachinePrecision]) + N[(x * y + N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision] * N[(i * N[(b + N[(a / c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot y + z \cdot t\right) - \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i \leq \infty:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(\mathsf{fma}\left(b, c, a\right), -c \cdot i, \mathsf{fma}\left(x, y, z \cdot t\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\left(-2 \cdot \left(c \cdot c\right)\right) \cdot \left(i \cdot \left(b + \frac{a}{c}\right)\right)\\
\end{array}
\end{array}
if (-.f64 (+.f64 (*.f64 x y) (*.f64 z t)) (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i)) < +inf.0Initial program 96.6%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6499.1
Applied egg-rr99.1%
if +inf.0 < (-.f64 (+.f64 (*.f64 x y) (*.f64 z t)) (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i)) Initial program 0.0%
Taylor expanded in c around inf
distribute-lft-outN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-commutativeN/A
associate-/l*N/A
distribute-lft-outN/A
*-lowering-*.f64N/A
+-lowering-+.f64N/A
/-lowering-/.f6470.6
Simplified70.6%
Final simplification97.2%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* 2.0 (fma (- i) (* c (fma b c a)) (* z t))))
(t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -4e+21)
t_1
(if (<= t_2 1e+86)
(* 2.0 (fma x y (fma t z (* i (* b (* c (- c)))))))
(if (<= t_2 1e+298) t_1 (* (* -2.0 (* c c)) (* i (+ b (/ a c)))))))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = 2.0 * fma(-i, (c * fma(b, c, a)), (z * t));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -4e+21) {
tmp = t_1;
} else if (t_2 <= 1e+86) {
tmp = 2.0 * fma(x, y, fma(t, z, (i * (b * (c * -c)))));
} else if (t_2 <= 1e+298) {
tmp = t_1;
} else {
tmp = (-2.0 * (c * c)) * (i * (b + (a / c)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(2.0 * fma(Float64(-i), Float64(c * fma(b, c, a)), Float64(z * t))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -4e+21) tmp = t_1; elseif (t_2 <= 1e+86) tmp = Float64(2.0 * fma(x, y, fma(t, z, Float64(i * Float64(b * Float64(c * Float64(-c))))))); elseif (t_2 <= 1e+298) tmp = t_1; else tmp = Float64(Float64(-2.0 * Float64(c * c)) * Float64(i * Float64(b + Float64(a / c)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(2.0 * N[((-i) * N[(c * N[(b * c + a), $MachinePrecision]), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -4e+21], t$95$1, If[LessEqual[t$95$2, 1e+86], N[(2.0 * N[(x * y + N[(t * z + N[(i * N[(b * N[(c * (-c)), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$2, 1e+298], t$95$1, N[(N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision] * N[(i * N[(b + N[(a / c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := 2 \cdot \mathsf{fma}\left(-i, c \cdot \mathsf{fma}\left(b, c, a\right), z \cdot t\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -4 \cdot 10^{+21}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 10^{+86}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(x, y, \mathsf{fma}\left(t, z, i \cdot \left(b \cdot \left(c \cdot \left(-c\right)\right)\right)\right)\right)\\
\mathbf{elif}\;t\_2 \leq 10^{+298}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;\left(-2 \cdot \left(c \cdot c\right)\right) \cdot \left(i \cdot \left(b + \frac{a}{c}\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -4e21 or 1e86 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 9.9999999999999996e297Initial program 85.9%
Taylor expanded in x around 0
*-lowering-*.f64N/A
--lowering--.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6479.9
Simplified79.9%
*-commutativeN/A
*-lowering-*.f64N/A
cancel-sign-sub-invN/A
*-commutativeN/A
associate-*r*N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-outN/A
*-commutativeN/A
+-commutativeN/A
associate-*r*N/A
*-commutativeN/A
accelerator-lowering-fma.f64N/A
neg-lowering-neg.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
*-lowering-*.f6487.9
Applied egg-rr87.9%
if -4e21 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1e86Initial program 99.6%
Taylor expanded in a around 0
*-lowering-*.f64N/A
sub-negN/A
+-commutativeN/A
associate-+r+N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
*-commutativeN/A
associate-*l*N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
distribute-rgt-neg-outN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
unpow2N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
Simplified94.5%
if 9.9999999999999996e297 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 77.5%
Taylor expanded in c around inf
distribute-lft-outN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-commutativeN/A
associate-/l*N/A
distribute-lft-outN/A
*-lowering-*.f64N/A
+-lowering-+.f64N/A
/-lowering-/.f6495.8
Simplified95.8%
Final simplification92.2%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -2e+187)
(* a (* c (* i -2.0)))
(if (<= t_1 5e-81)
(* t (* z 2.0))
(if (<= t_1 5e+94) (* x (* y 2.0)) (* (* i -2.0) (* a c)))))))
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 tmp;
if (t_1 <= -2e+187) {
tmp = a * (c * (i * -2.0));
} else if (t_1 <= 5e-81) {
tmp = t * (z * 2.0);
} else if (t_1 <= 5e+94) {
tmp = x * (y * 2.0);
} else {
tmp = (i * -2.0) * (a * c);
}
return tmp;
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
real(8) :: t_1
real(8) :: tmp
t_1 = (c * (a + (b * c))) * i
if (t_1 <= (-2d+187)) then
tmp = a * (c * (i * (-2.0d0)))
else if (t_1 <= 5d-81) then
tmp = t * (z * 2.0d0)
else if (t_1 <= 5d+94) then
tmp = x * (y * 2.0d0)
else
tmp = (i * (-2.0d0)) * (a * c)
end if
code = tmp
end function
public static 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 tmp;
if (t_1 <= -2e+187) {
tmp = a * (c * (i * -2.0));
} else if (t_1 <= 5e-81) {
tmp = t * (z * 2.0);
} else if (t_1 <= 5e+94) {
tmp = x * (y * 2.0);
} else {
tmp = (i * -2.0) * (a * c);
}
return tmp;
}
def code(x, y, z, t, a, b, c, i): t_1 = (c * (a + (b * c))) * i tmp = 0 if t_1 <= -2e+187: tmp = a * (c * (i * -2.0)) elif t_1 <= 5e-81: tmp = t * (z * 2.0) elif t_1 <= 5e+94: tmp = x * (y * 2.0) else: tmp = (i * -2.0) * (a * c) return tmp
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -2e+187) tmp = Float64(a * Float64(c * Float64(i * -2.0))); elseif (t_1 <= 5e-81) tmp = Float64(t * Float64(z * 2.0)); elseif (t_1 <= 5e+94) tmp = Float64(x * Float64(y * 2.0)); else tmp = Float64(Float64(i * -2.0) * Float64(a * c)); end return tmp end
function tmp_2 = code(x, y, z, t, a, b, c, i) t_1 = (c * (a + (b * c))) * i; tmp = 0.0; if (t_1 <= -2e+187) tmp = a * (c * (i * -2.0)); elseif (t_1 <= 5e-81) tmp = t * (z * 2.0); elseif (t_1 <= 5e+94) tmp = x * (y * 2.0); else tmp = (i * -2.0) * (a * c); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+187], N[(a * N[(c * N[(i * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 5e-81], N[(t * N[(z * 2.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 5e+94], N[(x * N[(y * 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(i * -2.0), $MachinePrecision] * N[(a * c), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;a \cdot \left(c \cdot \left(i \cdot -2\right)\right)\\
\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{-81}:\\
\;\;\;\;t \cdot \left(z \cdot 2\right)\\
\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;x \cdot \left(y \cdot 2\right)\\
\mathbf{else}:\\
\;\;\;\;\left(i \cdot -2\right) \cdot \left(a \cdot c\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.3
Applied egg-rr91.3%
Taylor expanded in a around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*l*N/A
*-lowering-*.f64N/A
*-lowering-*.f6440.8
Simplified40.8%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 4.99999999999999981e-81Initial program 99.5%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6456.7
Simplified56.7%
if 4.99999999999999981e-81 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 100.0%
Taylor expanded in x around inf
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f6454.9
Simplified54.9%
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6454.9
Applied egg-rr54.9%
if 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
Taylor expanded in a around inf
*-commutativeN/A
associate-*r*N/A
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*l*N/A
*-lowering-*.f64N/A
*-lowering-*.f6437.2
Simplified37.2%
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f6442.2
Applied egg-rr42.2%
Final simplification48.6%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* a (* c (* i -2.0)))) (t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -2e+187)
t_1
(if (<= t_2 5e-81)
(* t (* z 2.0))
(if (<= t_2 5e+94) (* x (* y 2.0)) t_1)))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = a * (c * (i * -2.0));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -2e+187) {
tmp = t_1;
} else if (t_2 <= 5e-81) {
tmp = t * (z * 2.0);
} else if (t_2 <= 5e+94) {
tmp = x * (y * 2.0);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
real(8) :: t_1
real(8) :: t_2
real(8) :: tmp
t_1 = a * (c * (i * (-2.0d0)))
t_2 = (c * (a + (b * c))) * i
if (t_2 <= (-2d+187)) then
tmp = t_1
else if (t_2 <= 5d-81) then
tmp = t * (z * 2.0d0)
else if (t_2 <= 5d+94) then
tmp = x * (y * 2.0d0)
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = a * (c * (i * -2.0));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -2e+187) {
tmp = t_1;
} else if (t_2 <= 5e-81) {
tmp = t * (z * 2.0);
} else if (t_2 <= 5e+94) {
tmp = x * (y * 2.0);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b, c, i): t_1 = a * (c * (i * -2.0)) t_2 = (c * (a + (b * c))) * i tmp = 0 if t_2 <= -2e+187: tmp = t_1 elif t_2 <= 5e-81: tmp = t * (z * 2.0) elif t_2 <= 5e+94: tmp = x * (y * 2.0) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b, c, i) t_1 = Float64(a * Float64(c * Float64(i * -2.0))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -2e+187) tmp = t_1; elseif (t_2 <= 5e-81) tmp = Float64(t * Float64(z * 2.0)); elseif (t_2 <= 5e+94) tmp = Float64(x * Float64(y * 2.0)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b, c, i) t_1 = a * (c * (i * -2.0)); t_2 = (c * (a + (b * c))) * i; tmp = 0.0; if (t_2 <= -2e+187) tmp = t_1; elseif (t_2 <= 5e-81) tmp = t * (z * 2.0); elseif (t_2 <= 5e+94) tmp = x * (y * 2.0); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(a * N[(c * N[(i * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -2e+187], t$95$1, If[LessEqual[t$95$2, 5e-81], N[(t * N[(z * 2.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$2, 5e+94], N[(x * N[(y * 2.0), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := a \cdot \left(c \cdot \left(i \cdot -2\right)\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 5 \cdot 10^{-81}:\\
\;\;\;\;t \cdot \left(z \cdot 2\right)\\
\mathbf{elif}\;t\_2 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;x \cdot \left(y \cdot 2\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187 or 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6490.9
Applied egg-rr90.9%
Taylor expanded in a around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*l*N/A
*-lowering-*.f64N/A
*-lowering-*.f6440.8
Simplified40.8%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 4.99999999999999981e-81Initial program 99.5%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6456.7
Simplified56.7%
if 4.99999999999999981e-81 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 100.0%
Taylor expanded in x around inf
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f6454.9
Simplified54.9%
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6454.9
Applied egg-rr54.9%
Final simplification48.3%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* 2.0 (fma (- i) (* c (fma b c a)) (* z t))))
(t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -4e+21)
t_1
(if (<= t_2 1e+86)
(* 2.0 (fma x y (fma t z (* i (* b (* c (- c)))))))
t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = 2.0 * fma(-i, (c * fma(b, c, a)), (z * t));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -4e+21) {
tmp = t_1;
} else if (t_2 <= 1e+86) {
tmp = 2.0 * fma(x, y, fma(t, z, (i * (b * (c * -c)))));
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(2.0 * fma(Float64(-i), Float64(c * fma(b, c, a)), Float64(z * t))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -4e+21) tmp = t_1; elseif (t_2 <= 1e+86) tmp = Float64(2.0 * fma(x, y, fma(t, z, Float64(i * Float64(b * Float64(c * Float64(-c))))))); else tmp = t_1; end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(2.0 * N[((-i) * N[(c * N[(b * c + a), $MachinePrecision]), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -4e+21], t$95$1, If[LessEqual[t$95$2, 1e+86], N[(2.0 * N[(x * y + N[(t * z + N[(i * N[(b * N[(c * (-c)), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := 2 \cdot \mathsf{fma}\left(-i, c \cdot \mathsf{fma}\left(b, c, a\right), z \cdot t\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -4 \cdot 10^{+21}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 10^{+86}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(x, y, \mathsf{fma}\left(t, z, i \cdot \left(b \cdot \left(c \cdot \left(-c\right)\right)\right)\right)\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -4e21 or 1e86 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 83.1%
Taylor expanded in x around 0
*-lowering-*.f64N/A
--lowering--.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6483.1
Simplified83.1%
*-commutativeN/A
*-lowering-*.f64N/A
cancel-sign-sub-invN/A
*-commutativeN/A
associate-*r*N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-outN/A
*-commutativeN/A
+-commutativeN/A
associate-*r*N/A
*-commutativeN/A
accelerator-lowering-fma.f64N/A
neg-lowering-neg.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
*-lowering-*.f6487.2
Applied egg-rr87.2%
if -4e21 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1e86Initial program 99.6%
Taylor expanded in a around 0
*-lowering-*.f64N/A
sub-negN/A
+-commutativeN/A
associate-+r+N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
*-commutativeN/A
associate-*l*N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
distribute-rgt-neg-outN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
unpow2N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
Simplified94.5%
Final simplification90.3%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* 2.0 (fma (- i) (* c (fma b c a)) (* z t))))
(t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -4e+21) t_1 (if (<= t_2 1e+86) (* 2.0 (fma t z (* x y))) t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = 2.0 * fma(-i, (c * fma(b, c, a)), (z * t));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -4e+21) {
tmp = t_1;
} else if (t_2 <= 1e+86) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(2.0 * fma(Float64(-i), Float64(c * fma(b, c, a)), Float64(z * t))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -4e+21) tmp = t_1; elseif (t_2 <= 1e+86) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = t_1; end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(2.0 * N[((-i) * N[(c * N[(b * c + a), $MachinePrecision]), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -4e+21], t$95$1, If[LessEqual[t$95$2, 1e+86], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := 2 \cdot \mathsf{fma}\left(-i, c \cdot \mathsf{fma}\left(b, c, a\right), z \cdot t\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -4 \cdot 10^{+21}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 10^{+86}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -4e21 or 1e86 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 83.1%
Taylor expanded in x around 0
*-lowering-*.f64N/A
--lowering--.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6483.1
Simplified83.1%
*-commutativeN/A
*-lowering-*.f64N/A
cancel-sign-sub-invN/A
*-commutativeN/A
associate-*r*N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-outN/A
*-commutativeN/A
+-commutativeN/A
associate-*r*N/A
*-commutativeN/A
accelerator-lowering-fma.f64N/A
neg-lowering-neg.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
*-lowering-*.f6487.2
Applied egg-rr87.2%
if -4e21 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1e86Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.9
Simplified91.9%
Final simplification89.3%
(FPCore (x y z t a b c i) :precision binary64 (if (<= (- (+ (* x y) (* z t)) (* (* c (+ a (* b c))) i)) INFINITY) (* 2.0 (fma z t (fma c (- (* i (fma b c a))) (* x y)))) (* (* -2.0 (* c c)) (* i (+ b (/ a c))))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double tmp;
if ((((x * y) + (z * t)) - ((c * (a + (b * c))) * i)) <= ((double) INFINITY)) {
tmp = 2.0 * fma(z, t, fma(c, -(i * fma(b, c, a)), (x * y)));
} else {
tmp = (-2.0 * (c * c)) * (i * (b + (a / c)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) tmp = 0.0 if (Float64(Float64(Float64(x * y) + Float64(z * t)) - Float64(Float64(c * Float64(a + Float64(b * c))) * i)) <= Inf) tmp = Float64(2.0 * fma(z, t, fma(c, Float64(-Float64(i * fma(b, c, a))), Float64(x * y)))); else tmp = Float64(Float64(-2.0 * Float64(c * c)) * Float64(i * Float64(b + Float64(a / c)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(x * y), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision] - N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]), $MachinePrecision], Infinity], N[(2.0 * N[(z * t + N[(c * (-N[(i * N[(b * c + a), $MachinePrecision]), $MachinePrecision]) + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision] * N[(i * N[(b + N[(a / c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot y + z \cdot t\right) - \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i \leq \infty:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(z, t, \mathsf{fma}\left(c, -i \cdot \mathsf{fma}\left(b, c, a\right), x \cdot y\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\left(-2 \cdot \left(c \cdot c\right)\right) \cdot \left(i \cdot \left(b + \frac{a}{c}\right)\right)\\
\end{array}
\end{array}
if (-.f64 (+.f64 (*.f64 x y) (*.f64 z t)) (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i)) < +inf.0Initial program 96.6%
associate--l+N/A
+-commutativeN/A
sub-negN/A
associate-+l+N/A
accelerator-lowering-fma.f64N/A
*-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
neg-lowering-neg.f64N/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6496.0
Applied egg-rr96.0%
if +inf.0 < (-.f64 (+.f64 (*.f64 x y) (*.f64 z t)) (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i)) Initial program 0.0%
Taylor expanded in c around inf
distribute-lft-outN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-commutativeN/A
associate-/l*N/A
distribute-lft-outN/A
*-lowering-*.f64N/A
+-lowering-+.f64N/A
/-lowering-/.f6470.6
Simplified70.6%
Final simplification94.3%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -1e+115)
(* 2.0 (fma (fma b c a) (- (* c i)) (* x y)))
(if (<= t_1 5e+94)
(* 2.0 (fma t z (* x y)))
(* (* (fma b c a) (* c i)) (- 2.0))))))
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 tmp;
if (t_1 <= -1e+115) {
tmp = 2.0 * fma(fma(b, c, a), -(c * i), (x * y));
} else if (t_1 <= 5e+94) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = (fma(b, c, a) * (c * i)) * -2.0;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -1e+115) tmp = Float64(2.0 * fma(fma(b, c, a), Float64(-Float64(c * i)), Float64(x * y))); elseif (t_1 <= 5e+94) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = Float64(Float64(fma(b, c, a) * Float64(c * i)) * Float64(-2.0)); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -1e+115], N[(2.0 * N[(N[(b * c + a), $MachinePrecision] * (-N[(c * i), $MachinePrecision]) + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 5e+94], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(b * c + a), $MachinePrecision] * N[(c * i), $MachinePrecision]), $MachinePrecision] * (-2.0)), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -1 \cdot 10^{+115}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(\mathsf{fma}\left(b, c, a\right), -c \cdot i, x \cdot y\right)\\
\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\mathsf{fma}\left(b, c, a\right) \cdot \left(c \cdot i\right)\right) \cdot \left(-2\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1e115Initial program 83.0%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.9
Applied egg-rr91.9%
Taylor expanded in x around inf
*-lowering-*.f6487.3
Simplified87.3%
if -1e115 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6490.7
Simplified90.7%
if 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6490.6
Applied egg-rr90.6%
Taylor expanded in x around inf
*-lowering-*.f6485.5
Simplified85.5%
Taylor expanded in i around inf
associate-*r*N/A
associate-*r*N/A
*-lowering-*.f64N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
neg-lowering-neg.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6487.4
Simplified87.4%
Final simplification88.9%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* (fma b c a) (* c i)) (- 2.0)))
(t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -5e+127)
t_1
(if (<= t_2 5e+94) (* 2.0 (fma t z (* x y))) t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = (fma(b, c, a) * (c * i)) * -2.0;
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -5e+127) {
tmp = t_1;
} else if (t_2 <= 5e+94) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(fma(b, c, a) * Float64(c * i)) * Float64(-2.0)) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -5e+127) tmp = t_1; elseif (t_2 <= 5e+94) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = t_1; end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(N[(b * c + a), $MachinePrecision] * N[(c * i), $MachinePrecision]), $MachinePrecision] * (-2.0)), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -5e+127], t$95$1, If[LessEqual[t$95$2, 5e+94], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(\mathsf{fma}\left(b, c, a\right) \cdot \left(c \cdot i\right)\right) \cdot \left(-2\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -5 \cdot 10^{+127}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -5.0000000000000004e127 or 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.9%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.1
Applied egg-rr91.1%
Taylor expanded in x around inf
*-lowering-*.f6486.2
Simplified86.2%
Taylor expanded in i around inf
associate-*r*N/A
associate-*r*N/A
*-lowering-*.f64N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
mul-1-negN/A
neg-lowering-neg.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6487.1
Simplified87.1%
if -5.0000000000000004e127 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6490.2
Simplified90.2%
Final simplification88.5%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -2e+187)
(* c (* i (* (fma b c a) -2.0)))
(if (<= t_1 5e+94)
(* 2.0 (fma t z (* x y)))
(* i (* -2.0 (* c (fma b c a))))))))
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 tmp;
if (t_1 <= -2e+187) {
tmp = c * (i * (fma(b, c, a) * -2.0));
} else if (t_1 <= 5e+94) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = i * (-2.0 * (c * fma(b, c, a)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -2e+187) tmp = Float64(c * Float64(i * Float64(fma(b, c, a) * -2.0))); elseif (t_1 <= 5e+94) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = Float64(i * Float64(-2.0 * Float64(c * fma(b, c, a)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+187], N[(c * N[(i * N[(N[(b * c + a), $MachinePrecision] * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 5e+94], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(i * N[(-2.0 * N[(c * N[(b * c + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;c \cdot \left(i \cdot \left(\mathsf{fma}\left(b, c, a\right) \cdot -2\right)\right)\\
\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;i \cdot \left(-2 \cdot \left(c \cdot \mathsf{fma}\left(b, c, a\right)\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187Initial program 81.5%
Taylor expanded in i around inf
*-commutativeN/A
associate-*r*N/A
distribute-rgt-inN/A
associate-*r*N/A
distribute-lft-outN/A
*-commutativeN/A
*-lowering-*.f64N/A
distribute-lft-outN/A
associate-*r*N/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6486.4
Simplified86.4%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6488.8
Simplified88.8%
if 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6490.6
Applied egg-rr90.6%
Taylor expanded in x around inf
*-lowering-*.f6485.5
Simplified85.5%
Taylor expanded in i around inf
*-commutativeN/A
associate-*r*N/A
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6484.5
Simplified84.5%
Final simplification87.1%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* c (* i (* (fma b c a) -2.0)))) (t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -2e+187)
t_1
(if (<= t_2 5e+94) (* 2.0 (fma t z (* x y))) t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = c * (i * (fma(b, c, a) * -2.0));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -2e+187) {
tmp = t_1;
} else if (t_2 <= 5e+94) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(c * Float64(i * Float64(fma(b, c, a) * -2.0))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -2e+187) tmp = t_1; elseif (t_2 <= 5e+94) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = t_1; end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(c * N[(i * N[(N[(b * c + a), $MachinePrecision] * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -2e+187], t$95$1, If[LessEqual[t$95$2, 5e+94], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := c \cdot \left(i \cdot \left(\mathsf{fma}\left(b, c, a\right) \cdot -2\right)\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187 or 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
Taylor expanded in i around inf
*-commutativeN/A
associate-*r*N/A
distribute-rgt-inN/A
associate-*r*N/A
distribute-lft-outN/A
*-commutativeN/A
*-lowering-*.f64N/A
distribute-lft-outN/A
associate-*r*N/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f6484.4
Simplified84.4%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6488.8
Simplified88.8%
Final simplification86.5%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -2e+187)
(* c (* (* b i) (* c -2.0)))
(if (<= t_1 2e+296)
(* 2.0 (fma t z (* x y)))
(* b (* i (* -2.0 (* c c))))))))
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 tmp;
if (t_1 <= -2e+187) {
tmp = c * ((b * i) * (c * -2.0));
} else if (t_1 <= 2e+296) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = b * (i * (-2.0 * (c * c)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -2e+187) tmp = Float64(c * Float64(Float64(b * i) * Float64(c * -2.0))); elseif (t_1 <= 2e+296) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = Float64(b * Float64(i * Float64(-2.0 * Float64(c * c)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+187], N[(c * N[(N[(b * i), $MachinePrecision] * N[(c * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2e+296], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(b * N[(i * N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;c \cdot \left(\left(b \cdot i\right) \cdot \left(c \cdot -2\right)\right)\\
\mathbf{elif}\;t\_1 \leq 2 \cdot 10^{+296}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;b \cdot \left(i \cdot \left(-2 \cdot \left(c \cdot c\right)\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187Initial program 81.5%
Taylor expanded in b around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6468.5
Simplified68.5%
associate-*r*N/A
associate-*r*N/A
associate-*r*N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6471.2
Applied egg-rr71.2%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1.99999999999999996e296Initial program 98.9%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6481.8
Simplified81.8%
if 1.99999999999999996e296 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 78.0%
Taylor expanded in b around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6481.8
Simplified81.8%
Final simplification78.9%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -2e+187)
(* c (* -2.0 (* b (* c i))))
(if (<= t_1 2e+296)
(* 2.0 (fma t z (* x y)))
(* b (* i (* -2.0 (* c c))))))))
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 tmp;
if (t_1 <= -2e+187) {
tmp = c * (-2.0 * (b * (c * i)));
} else if (t_1 <= 2e+296) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = b * (i * (-2.0 * (c * c)));
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -2e+187) tmp = Float64(c * Float64(-2.0 * Float64(b * Float64(c * i)))); elseif (t_1 <= 2e+296) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = Float64(b * Float64(i * Float64(-2.0 * Float64(c * c)))); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+187], N[(c * N[(-2.0 * N[(b * N[(c * i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2e+296], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(b * N[(i * N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;c \cdot \left(-2 \cdot \left(b \cdot \left(c \cdot i\right)\right)\right)\\
\mathbf{elif}\;t\_1 \leq 2 \cdot 10^{+296}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;b \cdot \left(i \cdot \left(-2 \cdot \left(c \cdot c\right)\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.3
Applied egg-rr91.3%
Taylor expanded in b around inf
*-commutativeN/A
*-commutativeN/A
unpow2N/A
associate-*l*N/A
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f6471.1
Simplified71.1%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1.99999999999999996e296Initial program 98.9%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6481.8
Simplified81.8%
if 1.99999999999999996e296 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 78.0%
Taylor expanded in b around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6481.8
Simplified81.8%
Final simplification78.9%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* b (* i (* -2.0 (* c c))))) (t_2 (* (* c (+ a (* b c))) i)))
(if (<= t_2 -2e+187)
t_1
(if (<= t_2 2e+296) (* 2.0 (fma t z (* x y))) t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = b * (i * (-2.0 * (c * c)));
double t_2 = (c * (a + (b * c))) * i;
double tmp;
if (t_2 <= -2e+187) {
tmp = t_1;
} else if (t_2 <= 2e+296) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(b * Float64(i * Float64(-2.0 * Float64(c * c)))) t_2 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_2 <= -2e+187) tmp = t_1; elseif (t_2 <= 2e+296) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = t_1; end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(b * N[(i * N[(-2.0 * N[(c * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$2, -2e+187], t$95$1, If[LessEqual[t$95$2, 2e+296], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := b \cdot \left(i \cdot \left(-2 \cdot \left(c \cdot c\right)\right)\right)\\
t_2 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_2 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_2 \leq 2 \cdot 10^{+296}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187 or 1.99999999999999996e296 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 80.0%
Taylor expanded in b around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6474.0
Simplified74.0%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 1.99999999999999996e296Initial program 98.9%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6481.8
Simplified81.8%
Final simplification78.2%
(FPCore (x y z t a b c i)
:precision binary64
(let* ((t_1 (* (* c (+ a (* b c))) i)))
(if (<= t_1 -2e+187)
(* a (* c (* i -2.0)))
(if (<= t_1 5e+94) (* 2.0 (fma t z (* x y))) (* (* i -2.0) (* a c))))))
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 tmp;
if (t_1 <= -2e+187) {
tmp = a * (c * (i * -2.0));
} else if (t_1 <= 5e+94) {
tmp = 2.0 * fma(t, z, (x * y));
} else {
tmp = (i * -2.0) * (a * c);
}
return tmp;
}
function code(x, y, z, t, a, b, c, i) t_1 = Float64(Float64(c * Float64(a + Float64(b * c))) * i) tmp = 0.0 if (t_1 <= -2e+187) tmp = Float64(a * Float64(c * Float64(i * -2.0))); elseif (t_1 <= 5e+94) tmp = Float64(2.0 * fma(t, z, Float64(x * y))); else tmp = Float64(Float64(i * -2.0) * Float64(a * c)); end return tmp end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(c * N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * i), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+187], N[(a * N[(c * N[(i * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 5e+94], N[(2.0 * N[(t * z + N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(i * -2.0), $MachinePrecision] * N[(a * c), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(c \cdot \left(a + b \cdot c\right)\right) \cdot i\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+187}:\\
\;\;\;\;a \cdot \left(c \cdot \left(i \cdot -2\right)\right)\\
\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+94}:\\
\;\;\;\;2 \cdot \mathsf{fma}\left(t, z, x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;\left(i \cdot -2\right) \cdot \left(a \cdot c\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < -1.99999999999999981e187Initial program 81.5%
sub-negN/A
+-commutativeN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
distribute-rgt-neg-inN/A
*-lowering-*.f64N/A
neg-lowering-neg.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6491.3
Applied egg-rr91.3%
Taylor expanded in a around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*l*N/A
*-lowering-*.f64N/A
*-lowering-*.f6440.8
Simplified40.8%
if -1.99999999999999981e187 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) < 5.0000000000000001e94Initial program 99.6%
Taylor expanded in c around 0
*-commutativeN/A
*-lowering-*.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f6488.8
Simplified88.8%
if 5.0000000000000001e94 < (*.f64 (*.f64 (+.f64 a (*.f64 b c)) c) i) Initial program 81.5%
Taylor expanded in a around inf
*-commutativeN/A
associate-*r*N/A
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*l*N/A
*-lowering-*.f64N/A
*-lowering-*.f6437.2
Simplified37.2%
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
*-lowering-*.f6442.2
Applied egg-rr42.2%
Final simplification64.2%
(FPCore (x y z t a b c i) :precision binary64 (let* ((t_1 (* x (* y 2.0)))) (if (<= (* x y) -5e+185) t_1 (if (<= (* x y) 4e-39) (* t (* z 2.0)) t_1))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = x * (y * 2.0);
double tmp;
if ((x * y) <= -5e+185) {
tmp = t_1;
} else if ((x * y) <= 4e-39) {
tmp = t * (z * 2.0);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
real(8) :: t_1
real(8) :: tmp
t_1 = x * (y * 2.0d0)
if ((x * y) <= (-5d+185)) then
tmp = t_1
else if ((x * y) <= 4d-39) then
tmp = t * (z * 2.0d0)
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
double t_1 = x * (y * 2.0);
double tmp;
if ((x * y) <= -5e+185) {
tmp = t_1;
} else if ((x * y) <= 4e-39) {
tmp = t * (z * 2.0);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b, c, i): t_1 = x * (y * 2.0) tmp = 0 if (x * y) <= -5e+185: tmp = t_1 elif (x * y) <= 4e-39: tmp = t * (z * 2.0) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b, c, i) t_1 = Float64(x * Float64(y * 2.0)) tmp = 0.0 if (Float64(x * y) <= -5e+185) tmp = t_1; elseif (Float64(x * y) <= 4e-39) tmp = Float64(t * Float64(z * 2.0)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b, c, i) t_1 = x * (y * 2.0); tmp = 0.0; if ((x * y) <= -5e+185) tmp = t_1; elseif ((x * y) <= 4e-39) tmp = t * (z * 2.0); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(x * N[(y * 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(x * y), $MachinePrecision], -5e+185], t$95$1, If[LessEqual[N[(x * y), $MachinePrecision], 4e-39], N[(t * N[(z * 2.0), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x \cdot \left(y \cdot 2\right)\\
\mathbf{if}\;x \cdot y \leq -5 \cdot 10^{+185}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;x \cdot y \leq 4 \cdot 10^{-39}:\\
\;\;\;\;t \cdot \left(z \cdot 2\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (*.f64 x y) < -4.9999999999999999e185 or 3.99999999999999972e-39 < (*.f64 x y) Initial program 88.0%
Taylor expanded in x around inf
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f6459.1
Simplified59.1%
associate-*l*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6459.1
Applied egg-rr59.1%
if -4.9999999999999999e185 < (*.f64 x y) < 3.99999999999999972e-39Initial program 91.4%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6439.1
Simplified39.1%
Final simplification46.2%
(FPCore (x y z t a b c i) :precision binary64 (* t (* z 2.0)))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
return t * (z * 2.0);
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
code = t * (z * 2.0d0)
end function
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
return t * (z * 2.0);
}
def code(x, y, z, t, a, b, c, i): return t * (z * 2.0)
function code(x, y, z, t, a, b, c, i) return Float64(t * Float64(z * 2.0)) end
function tmp = code(x, y, z, t, a, b, c, i) tmp = t * (z * 2.0); end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(t * N[(z * 2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
t \cdot \left(z \cdot 2\right)
\end{array}
Initial program 90.2%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f6432.2
Simplified32.2%
(FPCore (x y z t a b c i) :precision binary64 (* 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) {
return 2.0 * (((x * y) + (z * t)) - ((a + (b * c)) * (c * i)));
}
real(8) function code(x, y, z, t, a, b, c, i)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
real(8), intent (in) :: i
code = 2.0d0 * (((x * y) + (z * t)) - ((a + (b * c)) * (c * i)))
end function
public static 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)));
}
def code(x, y, z, t, a, b, c, i): return 2.0 * (((x * y) + (z * t)) - ((a + (b * c)) * (c * i)))
function code(x, y, z, t, a, b, c, i) return Float64(2.0 * Float64(Float64(Float64(x * y) + Float64(z * t)) - Float64(Float64(a + Float64(b * c)) * Float64(c * i)))) end
function tmp = code(x, y, z, t, a, b, c, i) tmp = 2.0 * (((x * y) + (z * t)) - ((a + (b * c)) * (c * i))); end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(2.0 * N[(N[(N[(x * y), $MachinePrecision] + N[(z * t), $MachinePrecision]), $MachinePrecision] - N[(N[(a + N[(b * c), $MachinePrecision]), $MachinePrecision] * N[(c * i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \left(\left(x \cdot y + z \cdot t\right) - \left(a + b \cdot c\right) \cdot \left(c \cdot i\right)\right)
\end{array}
herbie shell --seed 2024198
(FPCore (x y z t a b c i)
:name "Diagrams.ThreeD.Shapes:frustum from diagrams-lib-1.3.0.3, A"
:precision binary64
:alt
(! :herbie-platform default (* 2 (- (+ (* x y) (* z t)) (* (+ a (* b c)) (* c i)))))
(* 2.0 (- (+ (* x y) (* z t)) (* (* (+ a (* b c)) c) i))))