
(FPCore (x y) :precision binary64 (exp (* (* x y) y)))
double code(double x, double y) {
return exp(((x * y) * y));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = exp(((x * y) * y))
end function
public static double code(double x, double y) {
return Math.exp(((x * y) * y));
}
def code(x, y): return math.exp(((x * y) * y))
function code(x, y) return exp(Float64(Float64(x * y) * y)) end
function tmp = code(x, y) tmp = exp(((x * y) * y)); end
code[x_, y_] := N[Exp[N[(N[(x * y), $MachinePrecision] * y), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(x \cdot y\right) \cdot y}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 18 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 (exp (* (* x y) y)))
double code(double x, double y) {
return exp(((x * y) * y));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = exp(((x * y) * y))
end function
public static double code(double x, double y) {
return Math.exp(((x * y) * y));
}
def code(x, y): return math.exp(((x * y) * y))
function code(x, y) return exp(Float64(Float64(x * y) * y)) end
function tmp = code(x, y) tmp = exp(((x * y) * y)); end
code[x_, y_] := N[Exp[N[(N[(x * y), $MachinePrecision] * y), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(x \cdot y\right) \cdot y}
\end{array}
(FPCore (x y) :precision binary64 (exp (* y (* x y))))
double code(double x, double y) {
return exp((y * (x * y)));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = exp((y * (x * y)))
end function
public static double code(double x, double y) {
return Math.exp((y * (x * y)));
}
def code(x, y): return math.exp((y * (x * y)))
function code(x, y) return exp(Float64(y * Float64(x * y))) end
function tmp = code(x, y) tmp = exp((y * (x * y))); end
code[x_, y_] := N[Exp[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{y \cdot \left(x \cdot y\right)}
\end{array}
Initial program 99.9%
Final simplification99.9%
(FPCore (x y) :precision binary64 (if (<= (exp (* y (* x y))) 4.0) 1.0 (* x (* y y))))
double code(double x, double y) {
double tmp;
if (exp((y * (x * y))) <= 4.0) {
tmp = 1.0;
} else {
tmp = x * (y * y);
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (exp((y * (x * y))) <= 4.0d0) then
tmp = 1.0d0
else
tmp = x * (y * y)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (Math.exp((y * (x * y))) <= 4.0) {
tmp = 1.0;
} else {
tmp = x * (y * y);
}
return tmp;
}
def code(x, y): tmp = 0 if math.exp((y * (x * y))) <= 4.0: tmp = 1.0 else: tmp = x * (y * y) return tmp
function code(x, y) tmp = 0.0 if (exp(Float64(y * Float64(x * y))) <= 4.0) tmp = 1.0; else tmp = Float64(x * Float64(y * y)); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (exp((y * (x * y))) <= 4.0) tmp = 1.0; else tmp = x * (y * y); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[Exp[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], 4.0], 1.0, N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{y \cdot \left(x \cdot y\right)} \leq 4:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(y \cdot y\right)\\
\end{array}
\end{array}
if (exp.f64 (*.f64 (*.f64 x y) y)) < 4Initial program 99.9%
Applied egg-rr60.5%
if 4 < (exp.f64 (*.f64 (*.f64 x y) y)) Initial program 99.8%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6460.2
Simplified60.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6460.2
Simplified60.2%
Final simplification60.5%
(FPCore (x y)
:precision binary64
(if (<= (* y (* x y)) -400.0)
(exp x)
(fma
(* y y)
(fma (* x (* x (* y y))) (fma x (* (* y y) 0.16666666666666666) 0.5) x)
1.0)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= -400.0) {
tmp = exp(x);
} else {
tmp = fma((y * y), fma((x * (x * (y * y))), fma(x, ((y * y) * 0.16666666666666666), 0.5), x), 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= -400.0) tmp = exp(x); else tmp = fma(Float64(y * y), fma(Float64(x * Float64(x * Float64(y * y))), fma(x, Float64(Float64(y * y) * 0.16666666666666666), 0.5), x), 1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], -400.0], N[Exp[x], $MachinePrecision], N[(N[(y * y), $MachinePrecision] * N[(N[(x * N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(x * N[(N[(y * y), $MachinePrecision] * 0.16666666666666666), $MachinePrecision] + 0.5), $MachinePrecision] + x), $MachinePrecision] + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq -400:\\
\;\;\;\;e^{x}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y \cdot y, \mathsf{fma}\left(x \cdot \left(x \cdot \left(y \cdot y\right)\right), \mathsf{fma}\left(x, \left(y \cdot y\right) \cdot 0.16666666666666666, 0.5\right), x\right), 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
if -400 < (*.f64 (*.f64 x y) y) Initial program 99.9%
Taylor expanded in x around 0
Simplified92.6%
Final simplification85.4%
(FPCore (x y)
:precision binary64
(if (<= y 5.4e-81)
(fma
(* y y)
(fma (* x (* x (* y y))) (fma x (* (* y y) 0.16666666666666666) 0.5) x)
1.0)
(exp (* x y))))
double code(double x, double y) {
double tmp;
if (y <= 5.4e-81) {
tmp = fma((y * y), fma((x * (x * (y * y))), fma(x, ((y * y) * 0.16666666666666666), 0.5), x), 1.0);
} else {
tmp = exp((x * y));
}
return tmp;
}
function code(x, y) tmp = 0.0 if (y <= 5.4e-81) tmp = fma(Float64(y * y), fma(Float64(x * Float64(x * Float64(y * y))), fma(x, Float64(Float64(y * y) * 0.16666666666666666), 0.5), x), 1.0); else tmp = exp(Float64(x * y)); end return tmp end
code[x_, y_] := If[LessEqual[y, 5.4e-81], N[(N[(y * y), $MachinePrecision] * N[(N[(x * N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(x * N[(N[(y * y), $MachinePrecision] * 0.16666666666666666), $MachinePrecision] + 0.5), $MachinePrecision] + x), $MachinePrecision] + 1.0), $MachinePrecision], N[Exp[N[(x * y), $MachinePrecision]], $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 5.4 \cdot 10^{-81}:\\
\;\;\;\;\mathsf{fma}\left(y \cdot y, \mathsf{fma}\left(x \cdot \left(x \cdot \left(y \cdot y\right)\right), \mathsf{fma}\left(x, \left(y \cdot y\right) \cdot 0.16666666666666666, 0.5\right), x\right), 1\right)\\
\mathbf{else}:\\
\;\;\;\;e^{x \cdot y}\\
\end{array}
\end{array}
if y < 5.39999999999999979e-81Initial program 99.9%
Taylor expanded in x around 0
Simplified73.1%
if 5.39999999999999979e-81 < y Initial program 99.9%
Applied egg-rr89.1%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))))
(if (<= t_0 -400.0)
(* 0.16666666666666666 (* x (* x x)))
(if (<= t_0 1.0)
(fma x (* y y) 1.0)
(if (<= t_0 2e+78)
(fma x (fma x (fma x 0.16666666666666666 0.5) 1.0) 1.0)
(fma x (fma x (* (* y y) 0.5) y) 1.0))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double tmp;
if (t_0 <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else if (t_0 <= 1.0) {
tmp = fma(x, (y * y), 1.0);
} else if (t_0 <= 2e+78) {
tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0);
} else {
tmp = fma(x, fma(x, ((y * y) * 0.5), y), 1.0);
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) tmp = 0.0 if (t_0 <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); elseif (t_0 <= 1.0) tmp = fma(x, Float64(y * y), 1.0); elseif (t_0 <= 2e+78) tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0); else tmp = fma(x, fma(x, Float64(Float64(y * y) * 0.5), y), 1.0); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$0, 2e+78], N[(x * N[(x * N[(x * 0.16666666666666666 + 0.5), $MachinePrecision] + 1.0), $MachinePrecision] + 1.0), $MachinePrecision], N[(x * N[(x * N[(N[(y * y), $MachinePrecision] * 0.5), $MachinePrecision] + y), $MachinePrecision] + 1.0), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+78}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(x, \mathsf{fma}\left(x, 0.16666666666666666, 0.5\right), 1\right), 1\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(x, \left(y \cdot y\right) \cdot 0.5, y\right), 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) < 1Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6499.1
Simplified99.1%
if 1 < (*.f64 (*.f64 x y) y) < 2.00000000000000002e78Initial program 99.2%
Applied egg-rr55.4%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6441.0
Simplified41.0%
if 2.00000000000000002e78 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Applied egg-rr47.8%
Taylor expanded in x around 0
+-commutativeN/A
+-commutativeN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
accelerator-lowering-fma.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6493.8
Simplified93.8%
Final simplification70.7%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))))
(if (<= t_0 -400.0)
(* 0.16666666666666666 (* x (* x x)))
(if (<= t_0 1.0)
(fma x (* y y) 1.0)
(if (<= t_0 2e+78)
(fma x (fma x (fma x 0.16666666666666666 0.5) 1.0) 1.0)
(* x (* x (* (* y y) 0.5))))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double tmp;
if (t_0 <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else if (t_0 <= 1.0) {
tmp = fma(x, (y * y), 1.0);
} else if (t_0 <= 2e+78) {
tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0);
} else {
tmp = x * (x * ((y * y) * 0.5));
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) tmp = 0.0 if (t_0 <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); elseif (t_0 <= 1.0) tmp = fma(x, Float64(y * y), 1.0); elseif (t_0 <= 2e+78) tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0); else tmp = Float64(x * Float64(x * Float64(Float64(y * y) * 0.5))); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$0, 2e+78], N[(x * N[(x * N[(x * 0.16666666666666666 + 0.5), $MachinePrecision] + 1.0), $MachinePrecision] + 1.0), $MachinePrecision], N[(x * N[(x * N[(N[(y * y), $MachinePrecision] * 0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+78}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(x, \mathsf{fma}\left(x, 0.16666666666666666, 0.5\right), 1\right), 1\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(x \cdot \left(\left(y \cdot y\right) \cdot 0.5\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) < 1Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6499.1
Simplified99.1%
if 1 < (*.f64 (*.f64 x y) y) < 2.00000000000000002e78Initial program 99.2%
Applied egg-rr55.4%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6441.0
Simplified41.0%
if 2.00000000000000002e78 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Applied egg-rr47.8%
Taylor expanded in x around 0
+-commutativeN/A
+-commutativeN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
accelerator-lowering-fma.f64N/A
accelerator-lowering-fma.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6493.8
Simplified93.8%
Taylor expanded in x around inf
*-commutativeN/A
unpow2N/A
associate-*l*N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6493.8
Simplified93.8%
Final simplification70.7%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))))
(if (<= t_0 -400.0)
(* 0.16666666666666666 (* x (* x x)))
(if (<= t_0 1.0)
(fma x (* y y) 1.0)
(if (<= t_0 5e+160)
(fma x (fma x (fma x 0.16666666666666666 0.5) 1.0) 1.0)
(* x (* y y)))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double tmp;
if (t_0 <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else if (t_0 <= 1.0) {
tmp = fma(x, (y * y), 1.0);
} else if (t_0 <= 5e+160) {
tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0);
} else {
tmp = x * (y * y);
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) tmp = 0.0 if (t_0 <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); elseif (t_0 <= 1.0) tmp = fma(x, Float64(y * y), 1.0); elseif (t_0 <= 5e+160) tmp = fma(x, fma(x, fma(x, 0.16666666666666666, 0.5), 1.0), 1.0); else tmp = Float64(x * Float64(y * y)); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$0, 5e+160], N[(x * N[(x * N[(x * 0.16666666666666666 + 0.5), $MachinePrecision] + 1.0), $MachinePrecision] + 1.0), $MachinePrecision], N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{elif}\;t\_0 \leq 5 \cdot 10^{+160}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(x, \mathsf{fma}\left(x, 0.16666666666666666, 0.5\right), 1\right), 1\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(y \cdot y\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) < 1Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6499.1
Simplified99.1%
if 1 < (*.f64 (*.f64 x y) y) < 5.0000000000000002e160Initial program 99.5%
Applied egg-rr61.4%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6447.2
Simplified47.2%
if 5.0000000000000002e160 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Taylor expanded in x around inf
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Final simplification68.9%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))))
(if (<= t_0 -400.0)
(* 0.16666666666666666 (* x (* x x)))
(if (<= t_0 1.0)
(fma x (* y y) 1.0)
(if (<= t_0 5e+160)
(* x (* x (fma x 0.16666666666666666 0.5)))
(* x (* y y)))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double tmp;
if (t_0 <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else if (t_0 <= 1.0) {
tmp = fma(x, (y * y), 1.0);
} else if (t_0 <= 5e+160) {
tmp = x * (x * fma(x, 0.16666666666666666, 0.5));
} else {
tmp = x * (y * y);
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) tmp = 0.0 if (t_0 <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); elseif (t_0 <= 1.0) tmp = fma(x, Float64(y * y), 1.0); elseif (t_0 <= 5e+160) tmp = Float64(x * Float64(x * fma(x, 0.16666666666666666, 0.5))); else tmp = Float64(x * Float64(y * y)); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$0, 5e+160], N[(x * N[(x * N[(x * 0.16666666666666666 + 0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{elif}\;t\_0 \leq 5 \cdot 10^{+160}:\\
\;\;\;\;x \cdot \left(x \cdot \mathsf{fma}\left(x, 0.16666666666666666, 0.5\right)\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(y \cdot y\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) < 1Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6499.1
Simplified99.1%
if 1 < (*.f64 (*.f64 x y) y) < 5.0000000000000002e160Initial program 99.5%
Applied egg-rr61.4%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6447.2
Simplified47.2%
Taylor expanded in x around inf
cube-multN/A
unpow2N/A
associate-*l*N/A
unpow2N/A
associate-*l*N/A
+-commutativeN/A
distribute-rgt-inN/A
associate-*l*N/A
lft-mult-inverseN/A
metadata-evalN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6446.7
Simplified46.7%
if 5.0000000000000002e160 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Taylor expanded in x around inf
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Final simplification68.8%
(FPCore (x y)
:precision binary64
(if (<= (* y (* x y)) -400.0)
(* 0.16666666666666666 (* x (* x x)))
(fma
(* y y)
(fma (* x (* x (* y y))) (fma x (* (* y y) 0.16666666666666666) 0.5) x)
1.0)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else {
tmp = fma((y * y), fma((x * (x * (y * y))), fma(x, ((y * y) * 0.16666666666666666), 0.5), x), 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); else tmp = fma(Float64(y * y), fma(Float64(x * Float64(x * Float64(y * y))), fma(x, Float64(Float64(y * y) * 0.16666666666666666), 0.5), x), 1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(y * y), $MachinePrecision] * N[(N[(x * N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(x * N[(N[(y * y), $MachinePrecision] * 0.16666666666666666), $MachinePrecision] + 0.5), $MachinePrecision] + x), $MachinePrecision] + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y \cdot y, \mathsf{fma}\left(x \cdot \left(x \cdot \left(y \cdot y\right)\right), \mathsf{fma}\left(x, \left(y \cdot y\right) \cdot 0.16666666666666666, 0.5\right), x\right), 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) Initial program 99.9%
Taylor expanded in x around 0
Simplified92.6%
Final simplification70.1%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))) (t_1 (* 0.16666666666666666 (* x (* x x)))))
(if (<= t_0 -400.0)
t_1
(if (<= t_0 1.0)
(fma x (* y y) 1.0)
(if (<= t_0 5e+160) t_1 (* x (* y y)))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double t_1 = 0.16666666666666666 * (x * (x * x));
double tmp;
if (t_0 <= -400.0) {
tmp = t_1;
} else if (t_0 <= 1.0) {
tmp = fma(x, (y * y), 1.0);
} else if (t_0 <= 5e+160) {
tmp = t_1;
} else {
tmp = x * (y * y);
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) t_1 = Float64(0.16666666666666666 * Float64(x * Float64(x * x))) tmp = 0.0 if (t_0 <= -400.0) tmp = t_1; elseif (t_0 <= 1.0) tmp = fma(x, Float64(y * y), 1.0); elseif (t_0 <= 5e+160) tmp = t_1; else tmp = Float64(x * Float64(y * y)); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], t$95$1, If[LessEqual[t$95$0, 1.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$0, 5e+160], t$95$1, N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
t_1 := 0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{elif}\;t\_0 \leq 5 \cdot 10^{+160}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(y \cdot y\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400 or 1 < (*.f64 (*.f64 x y) y) < 5.0000000000000002e160Initial program 99.8%
Applied egg-rr67.4%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6411.4
Simplified11.4%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6424.3
Simplified24.3%
if -400 < (*.f64 (*.f64 x y) y) < 1Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6499.1
Simplified99.1%
if 5.0000000000000002e160 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Taylor expanded in x around inf
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6488.4
Simplified88.4%
Final simplification68.8%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* y (* x y))))
(if (<= t_0 -400.0)
(* 0.16666666666666666 (* x (* x x)))
(if (<= t_0 500.0)
(fma x (* y y) 1.0)
(* x (* x (* 0.5 (* (* y y) (* y y)))))))))
double code(double x, double y) {
double t_0 = y * (x * y);
double tmp;
if (t_0 <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else if (t_0 <= 500.0) {
tmp = fma(x, (y * y), 1.0);
} else {
tmp = x * (x * (0.5 * ((y * y) * (y * y))));
}
return tmp;
}
function code(x, y) t_0 = Float64(y * Float64(x * y)) tmp = 0.0 if (t_0 <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); elseif (t_0 <= 500.0) tmp = fma(x, Float64(y * y), 1.0); else tmp = Float64(x * Float64(x * Float64(0.5 * Float64(Float64(y * y) * Float64(y * y))))); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 500.0], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], N[(x * N[(x * N[(0.5 * N[(N[(y * y), $MachinePrecision] * N[(y * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(x \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{elif}\;t\_0 \leq 500:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(x \cdot \left(0.5 \cdot \left(\left(y \cdot y\right) \cdot \left(y \cdot y\right)\right)\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) < 500Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6498.3
Simplified98.3%
if 500 < (*.f64 (*.f64 x y) y) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
Simplified75.7%
Taylor expanded in y around inf
*-commutativeN/A
associate-*r*N/A
unpow2N/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
metadata-evalN/A
pow-sqrN/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6480.7
Simplified80.7%
Final simplification70.0%
(FPCore (x y) :precision binary64 (if (<= (* y (* x y)) -400.0) (* 0.16666666666666666 (* x (* x x))) (fma (* y y) (fma x (* (* x (* y y)) 0.5) x) 1.0)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else {
tmp = fma((y * y), fma(x, ((x * (y * y)) * 0.5), x), 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); else tmp = fma(Float64(y * y), fma(x, Float64(Float64(x * Float64(y * y)) * 0.5), x), 1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(y * y), $MachinePrecision] * N[(x * N[(N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision] * 0.5), $MachinePrecision] + x), $MachinePrecision] + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y \cdot y, \mathsf{fma}\left(x, \left(x \cdot \left(y \cdot y\right)\right) \cdot 0.5, x\right), 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
Simplified91.0%
Final simplification68.9%
(FPCore (x y) :precision binary64 (if (<= (* y (* x y)) -400.0) (* 0.16666666666666666 (* x (* x x))) (fma (* y y) (* x (* (* x (* y y)) 0.5)) 1.0)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= -400.0) {
tmp = 0.16666666666666666 * (x * (x * x));
} else {
tmp = fma((y * y), (x * ((x * (y * y)) * 0.5)), 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= -400.0) tmp = Float64(0.16666666666666666 * Float64(x * Float64(x * x))); else tmp = fma(Float64(y * y), Float64(x * Float64(Float64(x * Float64(y * y)) * 0.5)), 1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], -400.0], N[(0.16666666666666666 * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(y * y), $MachinePrecision] * N[(x * N[(N[(x * N[(y * y), $MachinePrecision]), $MachinePrecision] * 0.5), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq -400:\\
\;\;\;\;0.16666666666666666 \cdot \left(x \cdot \left(x \cdot x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y \cdot y, x \cdot \left(\left(x \cdot \left(y \cdot y\right)\right) \cdot 0.5\right), 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < -400Initial program 99.8%
Applied egg-rr69.0%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f642.2
Simplified2.2%
Taylor expanded in x around inf
*-lowering-*.f64N/A
cube-multN/A
unpow2N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6418.6
Simplified18.6%
if -400 < (*.f64 (*.f64 x y) y) Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
Simplified91.0%
Taylor expanded in x around inf
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
unpow2N/A
associate-*l*N/A
*-lowering-*.f64N/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lowering-*.f64N/A
*-lowering-*.f64N/A
unpow2N/A
*-lowering-*.f6490.4
Simplified90.4%
Final simplification68.5%
(FPCore (x y) :precision binary64 (if (<= (* y (* x y)) 5e-67) 1.0 (fma x y 1.0)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= 5e-67) {
tmp = 1.0;
} else {
tmp = fma(x, y, 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= 5e-67) tmp = 1.0; else tmp = fma(x, y, 1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], 5e-67], 1.0, N[(x * y + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq 5 \cdot 10^{-67}:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(x, y, 1\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < 4.9999999999999999e-67Initial program 99.9%
Applied egg-rr60.2%
if 4.9999999999999999e-67 < (*.f64 (*.f64 x y) y) Initial program 99.8%
Applied egg-rr46.7%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f6415.1
Simplified15.1%
Final simplification48.9%
(FPCore (x y) :precision binary64 (if (<= (* y (* x y)) 1.0) 1.0 (* x y)))
double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= 1.0) {
tmp = 1.0;
} else {
tmp = x * y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((y * (x * y)) <= 1.0d0) then
tmp = 1.0d0
else
tmp = x * y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((y * (x * y)) <= 1.0) {
tmp = 1.0;
} else {
tmp = x * y;
}
return tmp;
}
def code(x, y): tmp = 0 if (y * (x * y)) <= 1.0: tmp = 1.0 else: tmp = x * y return tmp
function code(x, y) tmp = 0.0 if (Float64(y * Float64(x * y)) <= 1.0) tmp = 1.0; else tmp = Float64(x * y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((y * (x * y)) <= 1.0) tmp = 1.0; else tmp = x * y; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[(y * N[(x * y), $MachinePrecision]), $MachinePrecision], 1.0], 1.0, N[(x * y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \cdot \left(x \cdot y\right) \leq 1:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;x \cdot y\\
\end{array}
\end{array}
if (*.f64 (*.f64 x y) y) < 1Initial program 99.9%
Applied egg-rr60.5%
if 1 < (*.f64 (*.f64 x y) y) Initial program 99.8%
Applied egg-rr44.5%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f6410.8
Simplified10.8%
Taylor expanded in x around inf
*-lowering-*.f6410.6
Simplified10.6%
Final simplification48.9%
(FPCore (x y) :precision binary64 (if (<= x 9.5e+159) (fma x (* y y) 1.0) (fma x (fma x 0.5 1.0) 1.0)))
double code(double x, double y) {
double tmp;
if (x <= 9.5e+159) {
tmp = fma(x, (y * y), 1.0);
} else {
tmp = fma(x, fma(x, 0.5, 1.0), 1.0);
}
return tmp;
}
function code(x, y) tmp = 0.0 if (x <= 9.5e+159) tmp = fma(x, Float64(y * y), 1.0); else tmp = fma(x, fma(x, 0.5, 1.0), 1.0); end return tmp end
code[x_, y_] := If[LessEqual[x, 9.5e+159], N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision], N[(x * N[(x * 0.5 + 1.0), $MachinePrecision] + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 9.5 \cdot 10^{+159}:\\
\;\;\;\;\mathsf{fma}\left(x, y \cdot y, 1\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(x, \mathsf{fma}\left(x, 0.5, 1\right), 1\right)\\
\end{array}
\end{array}
if x < 9.5000000000000003e159Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6460.9
Simplified60.9%
if 9.5000000000000003e159 < x Initial program 99.6%
Applied egg-rr83.2%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
accelerator-lowering-fma.f6483.2
Simplified83.2%
(FPCore (x y) :precision binary64 (fma x (* y y) 1.0))
double code(double x, double y) {
return fma(x, (y * y), 1.0);
}
function code(x, y) return fma(x, Float64(y * y), 1.0) end
code[x_, y_] := N[(x * N[(y * y), $MachinePrecision] + 1.0), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(x, y \cdot y, 1\right)
\end{array}
Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
accelerator-lowering-fma.f64N/A
unpow2N/A
*-lowering-*.f6460.4
Simplified60.4%
(FPCore (x y) :precision binary64 1.0)
double code(double x, double y) {
return 1.0;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = 1.0d0
end function
public static double code(double x, double y) {
return 1.0;
}
def code(x, y): return 1.0
function code(x, y) return 1.0 end
function tmp = code(x, y) tmp = 1.0; end
code[x_, y_] := 1.0
\begin{array}{l}
\\
1
\end{array}
Initial program 99.9%
Applied egg-rr47.1%
herbie shell --seed 2024199
(FPCore (x y)
:name "Data.Random.Distribution.Normal:normalF from random-fu-0.2.6.2"
:precision binary64
(exp (* (* x y) y)))