
(FPCore (w l) :precision binary64 (* (exp (- w)) (pow l (exp w))))
double code(double w, double l) {
return exp(-w) * pow(l, exp(w));
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = exp(-w) * (l ** exp(w))
end function
public static double code(double w, double l) {
return Math.exp(-w) * Math.pow(l, Math.exp(w));
}
def code(w, l): return math.exp(-w) * math.pow(l, math.exp(w))
function code(w, l) return Float64(exp(Float64(-w)) * (l ^ exp(w))) end
function tmp = code(w, l) tmp = exp(-w) * (l ^ exp(w)); end
code[w_, l_] := N[(N[Exp[(-w)], $MachinePrecision] * N[Power[l, N[Exp[w], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
e^{-w} \cdot {\ell}^{\left(e^{w}\right)}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 8 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (w l) :precision binary64 (* (exp (- w)) (pow l (exp w))))
double code(double w, double l) {
return exp(-w) * pow(l, exp(w));
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = exp(-w) * (l ** exp(w))
end function
public static double code(double w, double l) {
return Math.exp(-w) * Math.pow(l, Math.exp(w));
}
def code(w, l): return math.exp(-w) * math.pow(l, math.exp(w))
function code(w, l) return Float64(exp(Float64(-w)) * (l ^ exp(w))) end
function tmp = code(w, l) tmp = exp(-w) * (l ^ exp(w)); end
code[w_, l_] := N[(N[Exp[(-w)], $MachinePrecision] * N[Power[l, N[Exp[w], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
e^{-w} \cdot {\ell}^{\left(e^{w}\right)}
\end{array}
(FPCore (w l) :precision binary64 (* (exp (- w)) (pow l (exp w))))
double code(double w, double l) {
return exp(-w) * pow(l, exp(w));
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = exp(-w) * (l ** exp(w))
end function
public static double code(double w, double l) {
return Math.exp(-w) * Math.pow(l, Math.exp(w));
}
def code(w, l): return math.exp(-w) * math.pow(l, math.exp(w))
function code(w, l) return Float64(exp(Float64(-w)) * (l ^ exp(w))) end
function tmp = code(w, l) tmp = exp(-w) * (l ^ exp(w)); end
code[w_, l_] := N[(N[Exp[(-w)], $MachinePrecision] * N[Power[l, N[Exp[w], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
e^{-w} \cdot {\ell}^{\left(e^{w}\right)}
\end{array}
Initial program 99.8%
(FPCore (w l) :precision binary64 (/ (pow l (exp w)) (exp w)))
double code(double w, double l) {
return pow(l, exp(w)) / exp(w);
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = (l ** exp(w)) / exp(w)
end function
public static double code(double w, double l) {
return Math.pow(l, Math.exp(w)) / Math.exp(w);
}
def code(w, l): return math.pow(l, math.exp(w)) / math.exp(w)
function code(w, l) return Float64((l ^ exp(w)) / exp(w)) end
function tmp = code(w, l) tmp = (l ^ exp(w)) / exp(w); end
code[w_, l_] := N[(N[Power[l, N[Exp[w], $MachinePrecision]], $MachinePrecision] / N[Exp[w], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{{\ell}^{\left(e^{w}\right)}}{e^{w}}
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
(FPCore (w l) :precision binary64 (/ l (exp w)))
double code(double w, double l) {
return l / exp(w);
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = l / exp(w)
end function
public static double code(double w, double l) {
return l / Math.exp(w);
}
def code(w, l): return l / math.exp(w)
function code(w, l) return Float64(l / exp(w)) end
function tmp = code(w, l) tmp = l / exp(w); end
code[w_, l_] := N[(l / N[Exp[w], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\ell}{e^{w}}
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
Taylor expanded in w around 0 97.8%
(FPCore (w l) :precision binary64 (+ l (* l (* w (+ (* w (+ 0.5 (* w -1.1666666666666667))) -1.0)))))
double code(double w, double l) {
return l + (l * (w * ((w * (0.5 + (w * -1.1666666666666667))) + -1.0)));
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = l + (l * (w * ((w * (0.5d0 + (w * (-1.1666666666666667d0)))) + (-1.0d0))))
end function
public static double code(double w, double l) {
return l + (l * (w * ((w * (0.5 + (w * -1.1666666666666667))) + -1.0)));
}
def code(w, l): return l + (l * (w * ((w * (0.5 + (w * -1.1666666666666667))) + -1.0)))
function code(w, l) return Float64(l + Float64(l * Float64(w * Float64(Float64(w * Float64(0.5 + Float64(w * -1.1666666666666667))) + -1.0)))) end
function tmp = code(w, l) tmp = l + (l * (w * ((w * (0.5 + (w * -1.1666666666666667))) + -1.0))); end
code[w_, l_] := N[(l + N[(l * N[(w * N[(N[(w * N[(0.5 + N[(w * -1.1666666666666667), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\ell + \ell \cdot \left(w \cdot \left(w \cdot \left(0.5 + w \cdot -1.1666666666666667\right) + -1\right)\right)
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
Taylor expanded in w around 0 97.8%
Taylor expanded in w around 0 76.7%
associate-+r+76.7%
mul-1-neg76.7%
distribute-rgt-out76.7%
metadata-eval76.7%
distribute-rgt-neg-in76.7%
metadata-eval76.7%
add-sqr-sqrt76.7%
sqrt-unprod56.8%
sqr-neg56.8%
mul-1-neg56.8%
mul-1-neg56.8%
sqrt-unprod0.0%
add-sqr-sqrt76.7%
mul-1-neg76.7%
distribute-rgt-neg-in76.7%
*-commutative76.7%
distribute-rgt-neg-in76.7%
metadata-eval76.7%
*-commutative76.7%
Applied egg-rr76.7%
distribute-lft-out76.7%
metadata-eval76.7%
*-rgt-identity76.7%
Simplified76.7%
Taylor expanded in l around 0 78.8%
Final simplification78.8%
(FPCore (w l) :precision binary64 (+ l (* w (- (* w (* l 0.5)) l))))
double code(double w, double l) {
return l + (w * ((w * (l * 0.5)) - l));
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = l + (w * ((w * (l * 0.5d0)) - l))
end function
public static double code(double w, double l) {
return l + (w * ((w * (l * 0.5)) - l));
}
def code(w, l): return l + (w * ((w * (l * 0.5)) - l))
function code(w, l) return Float64(l + Float64(w * Float64(Float64(w * Float64(l * 0.5)) - l))) end
function tmp = code(w, l) tmp = l + (w * ((w * (l * 0.5)) - l)); end
code[w_, l_] := N[(l + N[(w * N[(N[(w * N[(l * 0.5), $MachinePrecision]), $MachinePrecision] - l), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\ell + w \cdot \left(w \cdot \left(\ell \cdot 0.5\right) - \ell\right)
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
Taylor expanded in w around 0 97.8%
Taylor expanded in w around 0 76.7%
associate-+r+76.7%
mul-1-neg76.7%
distribute-rgt-out76.7%
metadata-eval76.7%
distribute-rgt-neg-in76.7%
metadata-eval76.7%
add-sqr-sqrt76.7%
sqrt-unprod56.8%
sqr-neg56.8%
mul-1-neg56.8%
mul-1-neg56.8%
sqrt-unprod0.0%
add-sqr-sqrt76.7%
mul-1-neg76.7%
distribute-rgt-neg-in76.7%
*-commutative76.7%
distribute-rgt-neg-in76.7%
metadata-eval76.7%
*-commutative76.7%
Applied egg-rr76.7%
distribute-lft-out76.7%
metadata-eval76.7%
*-rgt-identity76.7%
Simplified76.7%
Taylor expanded in w around 0 72.6%
mul-1-neg72.6%
distribute-rgt-neg-in72.6%
distribute-rgt-out72.6%
metadata-eval72.6%
metadata-eval72.6%
distribute-rgt-neg-in72.6%
metadata-eval72.6%
metadata-eval72.6%
Simplified72.6%
(FPCore (w l) :precision binary64 (if (<= w -3.9) (* w (- l)) l))
double code(double w, double l) {
double tmp;
if (w <= -3.9) {
tmp = w * -l;
} else {
tmp = l;
}
return tmp;
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
real(8) :: tmp
if (w <= (-3.9d0)) then
tmp = w * -l
else
tmp = l
end if
code = tmp
end function
public static double code(double w, double l) {
double tmp;
if (w <= -3.9) {
tmp = w * -l;
} else {
tmp = l;
}
return tmp;
}
def code(w, l): tmp = 0 if w <= -3.9: tmp = w * -l else: tmp = l return tmp
function code(w, l) tmp = 0.0 if (w <= -3.9) tmp = Float64(w * Float64(-l)); else tmp = l; end return tmp end
function tmp_2 = code(w, l) tmp = 0.0; if (w <= -3.9) tmp = w * -l; else tmp = l; end tmp_2 = tmp; end
code[w_, l_] := If[LessEqual[w, -3.9], N[(w * (-l)), $MachinePrecision], l]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;w \leq -3.9:\\
\;\;\;\;w \cdot \left(-\ell\right)\\
\mathbf{else}:\\
\;\;\;\;\ell\\
\end{array}
\end{array}
if w < -3.89999999999999991Initial program 100.0%
exp-neg100.0%
remove-double-neg100.0%
associate-*l/100.0%
*-lft-identity100.0%
remove-double-neg100.0%
Simplified100.0%
Taylor expanded in w around 0 97.5%
Taylor expanded in w around 0 23.3%
mul-1-neg23.3%
unsub-neg23.3%
Simplified23.3%
Taylor expanded in w around inf 23.3%
mul-1-neg23.3%
*-commutative23.3%
distribute-rgt-neg-in23.3%
Simplified23.3%
if -3.89999999999999991 < w Initial program 99.7%
exp-neg99.7%
remove-double-neg99.7%
associate-*l/99.7%
*-lft-identity99.7%
remove-double-neg99.7%
Simplified99.7%
Taylor expanded in w around 0 97.9%
Taylor expanded in w around 0 82.2%
(FPCore (w l) :precision binary64 (- l (* w l)))
double code(double w, double l) {
return l - (w * l);
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = l - (w * l)
end function
public static double code(double w, double l) {
return l - (w * l);
}
def code(w, l): return l - (w * l)
function code(w, l) return Float64(l - Float64(w * l)) end
function tmp = code(w, l) tmp = l - (w * l); end
code[w_, l_] := N[(l - N[(w * l), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\ell - w \cdot \ell
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
Taylor expanded in w around 0 97.8%
Taylor expanded in w around 0 64.4%
mul-1-neg64.4%
unsub-neg64.4%
Simplified64.4%
Final simplification64.4%
(FPCore (w l) :precision binary64 l)
double code(double w, double l) {
return l;
}
real(8) function code(w, l)
real(8), intent (in) :: w
real(8), intent (in) :: l
code = l
end function
public static double code(double w, double l) {
return l;
}
def code(w, l): return l
function code(w, l) return l end
function tmp = code(w, l) tmp = l; end
code[w_, l_] := l
\begin{array}{l}
\\
\ell
\end{array}
Initial program 99.8%
exp-neg99.8%
remove-double-neg99.8%
associate-*l/99.8%
*-lft-identity99.8%
remove-double-neg99.8%
Simplified99.8%
Taylor expanded in w around 0 97.8%
Taylor expanded in w around 0 58.8%
herbie shell --seed 2024095
(FPCore (w l)
:name "exp-w (used to crash)"
:precision binary64
(* (exp (- w)) (pow l (exp w))))