
(FPCore (x y z) :precision binary64 (exp (- (+ x (* y (log y))) z)))
double code(double x, double y, double z) {
return exp(((x + (y * log(y))) - z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = exp(((x + (y * log(y))) - z))
end function
public static double code(double x, double y, double z) {
return Math.exp(((x + (y * Math.log(y))) - z));
}
def code(x, y, z): return math.exp(((x + (y * math.log(y))) - z))
function code(x, y, z) return exp(Float64(Float64(x + Float64(y * log(y))) - z)) end
function tmp = code(x, y, z) tmp = exp(((x + (y * log(y))) - z)); end
code[x_, y_, z_] := N[Exp[N[(N[(x + N[(y * N[Log[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - z), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(x + y \cdot \log y\right) - z}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 11 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (exp (- (+ x (* y (log y))) z)))
double code(double x, double y, double z) {
return exp(((x + (y * log(y))) - z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = exp(((x + (y * log(y))) - z))
end function
public static double code(double x, double y, double z) {
return Math.exp(((x + (y * Math.log(y))) - z));
}
def code(x, y, z): return math.exp(((x + (y * math.log(y))) - z))
function code(x, y, z) return exp(Float64(Float64(x + Float64(y * log(y))) - z)) end
function tmp = code(x, y, z) tmp = exp(((x + (y * log(y))) - z)); end
code[x_, y_, z_] := N[Exp[N[(N[(x + N[(y * N[Log[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - z), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(x + y \cdot \log y\right) - z}
\end{array}
(FPCore (x y z) :precision binary64 (exp (- (+ (* (log y) y) x) z)))
double code(double x, double y, double z) {
return exp((((log(y) * y) + x) - z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = exp((((log(y) * y) + x) - z))
end function
public static double code(double x, double y, double z) {
return Math.exp((((Math.log(y) * y) + x) - z));
}
def code(x, y, z): return math.exp((((math.log(y) * y) + x) - z))
function code(x, y, z) return exp(Float64(Float64(Float64(log(y) * y) + x) - z)) end
function tmp = code(x, y, z) tmp = exp((((log(y) * y) + x) - z)); end
code[x_, y_, z_] := N[Exp[N[(N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision] - z), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(\log y \cdot y + x\right) - z}
\end{array}
Initial program 100.0%
Final simplification100.0%
(FPCore (x y z) :precision binary64 (let* ((t_0 (+ (* (log y) y) x))) (if (<= t_0 -5e+46) (exp x) (if (<= t_0 5e+29) (exp (- z)) (pow y y)))))
double code(double x, double y, double z) {
double t_0 = (log(y) * y) + x;
double tmp;
if (t_0 <= -5e+46) {
tmp = exp(x);
} else if (t_0 <= 5e+29) {
tmp = exp(-z);
} else {
tmp = pow(y, y);
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: tmp
t_0 = (log(y) * y) + x
if (t_0 <= (-5d+46)) then
tmp = exp(x)
else if (t_0 <= 5d+29) then
tmp = exp(-z)
else
tmp = y ** y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = (Math.log(y) * y) + x;
double tmp;
if (t_0 <= -5e+46) {
tmp = Math.exp(x);
} else if (t_0 <= 5e+29) {
tmp = Math.exp(-z);
} else {
tmp = Math.pow(y, y);
}
return tmp;
}
def code(x, y, z): t_0 = (math.log(y) * y) + x tmp = 0 if t_0 <= -5e+46: tmp = math.exp(x) elif t_0 <= 5e+29: tmp = math.exp(-z) else: tmp = math.pow(y, y) return tmp
function code(x, y, z) t_0 = Float64(Float64(log(y) * y) + x) tmp = 0.0 if (t_0 <= -5e+46) tmp = exp(x); elseif (t_0 <= 5e+29) tmp = exp(Float64(-z)); else tmp = y ^ y; end return tmp end
function tmp_2 = code(x, y, z) t_0 = (log(y) * y) + x; tmp = 0.0; if (t_0 <= -5e+46) tmp = exp(x); elseif (t_0 <= 5e+29) tmp = exp(-z); else tmp = y ^ y; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision]}, If[LessEqual[t$95$0, -5e+46], N[Exp[x], $MachinePrecision], If[LessEqual[t$95$0, 5e+29], N[Exp[(-z)], $MachinePrecision], N[Power[y, y], $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \log y \cdot y + x\\
\mathbf{if}\;t\_0 \leq -5 \cdot 10^{+46}:\\
\;\;\;\;e^{x}\\
\mathbf{elif}\;t\_0 \leq 5 \cdot 10^{+29}:\\
\;\;\;\;e^{-z}\\
\mathbf{else}:\\
\;\;\;\;{y}^{y}\\
\end{array}
\end{array}
if (+.f64 x (*.f64 y (log.f64 y))) < -5.0000000000000002e46Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6459.7
Applied rewrites59.7%
Taylor expanded in y around 0
Applied rewrites90.5%
if -5.0000000000000002e46 < (+.f64 x (*.f64 y (log.f64 y))) < 5.0000000000000001e29Initial program 99.9%
Taylor expanded in z around inf
mul-1-negN/A
lower-neg.f6492.6
Applied rewrites92.6%
if 5.0000000000000001e29 < (+.f64 x (*.f64 y (log.f64 y))) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6479.5
Applied rewrites79.5%
Taylor expanded in x around 0
Applied rewrites73.0%
Final simplification82.5%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (+ (* (log y) y) x) z)))
(if (<= t_0 -4e+20)
(* (* x x) 0.5)
(if (<= t_0 1e+149)
(fma (fma (fma 0.16666666666666666 x 0.5) x 1.0) x 1.0)
(fma (fma 0.5 x 1.0) x 1.0)))))
double code(double x, double y, double z) {
double t_0 = ((log(y) * y) + x) - z;
double tmp;
if (t_0 <= -4e+20) {
tmp = (x * x) * 0.5;
} else if (t_0 <= 1e+149) {
tmp = fma(fma(fma(0.16666666666666666, x, 0.5), x, 1.0), x, 1.0);
} else {
tmp = fma(fma(0.5, x, 1.0), x, 1.0);
}
return tmp;
}
function code(x, y, z) t_0 = Float64(Float64(Float64(log(y) * y) + x) - z) tmp = 0.0 if (t_0 <= -4e+20) tmp = Float64(Float64(x * x) * 0.5); elseif (t_0 <= 1e+149) tmp = fma(fma(fma(0.16666666666666666, x, 0.5), x, 1.0), x, 1.0); else tmp = fma(fma(0.5, x, 1.0), x, 1.0); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision] - z), $MachinePrecision]}, If[LessEqual[t$95$0, -4e+20], N[(N[(x * x), $MachinePrecision] * 0.5), $MachinePrecision], If[LessEqual[t$95$0, 1e+149], N[(N[(N[(0.16666666666666666 * x + 0.5), $MachinePrecision] * x + 1.0), $MachinePrecision] * x + 1.0), $MachinePrecision], N[(N[(0.5 * x + 1.0), $MachinePrecision] * x + 1.0), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\log y \cdot y + x\right) - z\\
\mathbf{if}\;t\_0 \leq -4 \cdot 10^{+20}:\\
\;\;\;\;\left(x \cdot x\right) \cdot 0.5\\
\mathbf{elif}\;t\_0 \leq 10^{+149}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(0.16666666666666666, x, 0.5\right), x, 1\right), x, 1\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(0.5, x, 1\right), x, 1\right)\\
\end{array}
\end{array}
if (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) < -4e20Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6445.0
Applied rewrites45.0%
Taylor expanded in y around 0
Applied rewrites65.9%
Taylor expanded in x around 0
Applied rewrites2.2%
Taylor expanded in x around inf
Applied rewrites12.6%
if -4e20 < (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) < 1.00000000000000005e149Initial program 99.9%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6491.2
Applied rewrites91.2%
Taylor expanded in y around 0
Applied rewrites67.2%
Taylor expanded in x around 0
Applied rewrites50.6%
if 1.00000000000000005e149 < (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6471.1
Applied rewrites71.1%
Taylor expanded in y around 0
Applied rewrites37.1%
Taylor expanded in x around 0
Applied rewrites40.5%
Final simplification35.3%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (+ (* (log y) y) x) z)) (t_1 (* (* x x) 0.5))) (if (<= t_0 -1e+28) t_1 (if (<= t_0 5e+61) (+ 1.0 x) t_1))))
double code(double x, double y, double z) {
double t_0 = ((log(y) * y) + x) - z;
double t_1 = (x * x) * 0.5;
double tmp;
if (t_0 <= -1e+28) {
tmp = t_1;
} else if (t_0 <= 5e+61) {
tmp = 1.0 + x;
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = ((log(y) * y) + x) - z
t_1 = (x * x) * 0.5d0
if (t_0 <= (-1d+28)) then
tmp = t_1
else if (t_0 <= 5d+61) then
tmp = 1.0d0 + x
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = ((Math.log(y) * y) + x) - z;
double t_1 = (x * x) * 0.5;
double tmp;
if (t_0 <= -1e+28) {
tmp = t_1;
} else if (t_0 <= 5e+61) {
tmp = 1.0 + x;
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z): t_0 = ((math.log(y) * y) + x) - z t_1 = (x * x) * 0.5 tmp = 0 if t_0 <= -1e+28: tmp = t_1 elif t_0 <= 5e+61: tmp = 1.0 + x else: tmp = t_1 return tmp
function code(x, y, z) t_0 = Float64(Float64(Float64(log(y) * y) + x) - z) t_1 = Float64(Float64(x * x) * 0.5) tmp = 0.0 if (t_0 <= -1e+28) tmp = t_1; elseif (t_0 <= 5e+61) tmp = Float64(1.0 + x); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z) t_0 = ((log(y) * y) + x) - z; t_1 = (x * x) * 0.5; tmp = 0.0; if (t_0 <= -1e+28) tmp = t_1; elseif (t_0 <= 5e+61) tmp = 1.0 + x; else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$1 = N[(N[(x * x), $MachinePrecision] * 0.5), $MachinePrecision]}, If[LessEqual[t$95$0, -1e+28], t$95$1, If[LessEqual[t$95$0, 5e+61], N[(1.0 + x), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\log y \cdot y + x\right) - z\\
t_1 := \left(x \cdot x\right) \cdot 0.5\\
\mathbf{if}\;t\_0 \leq -1 \cdot 10^{+28}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 5 \cdot 10^{+61}:\\
\;\;\;\;1 + x\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) < -9.99999999999999958e27 or 5.00000000000000018e61 < (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6462.2
Applied rewrites62.2%
Taylor expanded in y around 0
Applied rewrites49.7%
Taylor expanded in x around 0
Applied rewrites21.4%
Taylor expanded in x around inf
Applied rewrites25.0%
if -9.99999999999999958e27 < (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) < 5.00000000000000018e61Initial program 99.8%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6496.2
Applied rewrites96.2%
Taylor expanded in y around 0
Applied rewrites75.3%
Taylor expanded in x around 0
Applied rewrites61.2%
Final simplification32.8%
(FPCore (x y z) :precision binary64 (if (<= (exp (- (+ (* (log y) y) x) z)) 0.0) (* (* x x) 0.5) (fma (* 0.5 x) x 1.0)))
double code(double x, double y, double z) {
double tmp;
if (exp((((log(y) * y) + x) - z)) <= 0.0) {
tmp = (x * x) * 0.5;
} else {
tmp = fma((0.5 * x), x, 1.0);
}
return tmp;
}
function code(x, y, z) tmp = 0.0 if (exp(Float64(Float64(Float64(log(y) * y) + x) - z)) <= 0.0) tmp = Float64(Float64(x * x) * 0.5); else tmp = fma(Float64(0.5 * x), x, 1.0); end return tmp end
code[x_, y_, z_] := If[LessEqual[N[Exp[N[(N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision] - z), $MachinePrecision]], $MachinePrecision], 0.0], N[(N[(x * x), $MachinePrecision] * 0.5), $MachinePrecision], N[(N[(0.5 * x), $MachinePrecision] * x + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{\left(\log y \cdot y + x\right) - z} \leq 0:\\
\;\;\;\;\left(x \cdot x\right) \cdot 0.5\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(0.5 \cdot x, x, 1\right)\\
\end{array}
\end{array}
if (exp.f64 (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z)) < 0.0Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6445.0
Applied rewrites45.0%
Taylor expanded in y around 0
Applied rewrites65.9%
Taylor expanded in x around 0
Applied rewrites2.2%
Taylor expanded in x around inf
Applied rewrites12.6%
if 0.0 < (exp.f64 (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z)) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6480.1
Applied rewrites80.1%
Taylor expanded in y around 0
Applied rewrites50.5%
Taylor expanded in x around 0
Applied rewrites41.9%
Taylor expanded in x around inf
Applied rewrites41.9%
Final simplification33.1%
(FPCore (x y z) :precision binary64 (if (<= (* (log y) y) 50.0) (exp (- x z)) (pow y y)))
double code(double x, double y, double z) {
double tmp;
if ((log(y) * y) <= 50.0) {
tmp = exp((x - z));
} else {
tmp = pow(y, y);
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((log(y) * y) <= 50.0d0) then
tmp = exp((x - z))
else
tmp = y ** y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((Math.log(y) * y) <= 50.0) {
tmp = Math.exp((x - z));
} else {
tmp = Math.pow(y, y);
}
return tmp;
}
def code(x, y, z): tmp = 0 if (math.log(y) * y) <= 50.0: tmp = math.exp((x - z)) else: tmp = math.pow(y, y) return tmp
function code(x, y, z) tmp = 0.0 if (Float64(log(y) * y) <= 50.0) tmp = exp(Float64(x - z)); else tmp = y ^ y; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((log(y) * y) <= 50.0) tmp = exp((x - z)); else tmp = y ^ y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision], 50.0], N[Exp[N[(x - z), $MachinePrecision]], $MachinePrecision], N[Power[y, y], $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\log y \cdot y \leq 50:\\
\;\;\;\;e^{x - z}\\
\mathbf{else}:\\
\;\;\;\;{y}^{y}\\
\end{array}
\end{array}
if (*.f64 y (log.f64 y)) < 50Initial program 100.0%
Taylor expanded in y around 0
lower--.f64100.0
Applied rewrites100.0%
if 50 < (*.f64 y (log.f64 y)) Initial program 99.9%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6464.6
Applied rewrites64.6%
Taylor expanded in x around 0
Applied rewrites78.8%
Final simplification90.0%
(FPCore (x y z) :precision binary64 (if (<= (+ (* (log y) y) x) 5e+209) (exp x) (fma (* 0.5 x) x 1.0)))
double code(double x, double y, double z) {
double tmp;
if (((log(y) * y) + x) <= 5e+209) {
tmp = exp(x);
} else {
tmp = fma((0.5 * x), x, 1.0);
}
return tmp;
}
function code(x, y, z) tmp = 0.0 if (Float64(Float64(log(y) * y) + x) <= 5e+209) tmp = exp(x); else tmp = fma(Float64(0.5 * x), x, 1.0); end return tmp end
code[x_, y_, z_] := If[LessEqual[N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision], 5e+209], N[Exp[x], $MachinePrecision], N[(N[(0.5 * x), $MachinePrecision] * x + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\log y \cdot y + x \leq 5 \cdot 10^{+209}:\\
\;\;\;\;e^{x}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(0.5 \cdot x, x, 1\right)\\
\end{array}
\end{array}
if (+.f64 x (*.f64 y (log.f64 y))) < 4.99999999999999964e209Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6467.5
Applied rewrites67.5%
Taylor expanded in y around 0
Applied rewrites61.3%
if 4.99999999999999964e209 < (+.f64 x (*.f64 y (log.f64 y))) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6475.5
Applied rewrites75.5%
Taylor expanded in y around 0
Applied rewrites37.0%
Taylor expanded in x around 0
Applied rewrites46.4%
Taylor expanded in x around inf
Applied rewrites46.4%
Final simplification57.5%
(FPCore (x y z) :precision binary64 (if (<= (- (+ (* (log y) y) x) z) -1e+28) (* (* x x) 0.5) (fma (fma 0.5 x 1.0) x 1.0)))
double code(double x, double y, double z) {
double tmp;
if ((((log(y) * y) + x) - z) <= -1e+28) {
tmp = (x * x) * 0.5;
} else {
tmp = fma(fma(0.5, x, 1.0), x, 1.0);
}
return tmp;
}
function code(x, y, z) tmp = 0.0 if (Float64(Float64(Float64(log(y) * y) + x) - z) <= -1e+28) tmp = Float64(Float64(x * x) * 0.5); else tmp = fma(fma(0.5, x, 1.0), x, 1.0); end return tmp end
code[x_, y_, z_] := If[LessEqual[N[(N[(N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision] + x), $MachinePrecision] - z), $MachinePrecision], -1e+28], N[(N[(x * x), $MachinePrecision] * 0.5), $MachinePrecision], N[(N[(0.5 * x + 1.0), $MachinePrecision] * x + 1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\left(\log y \cdot y + x\right) - z \leq -1 \cdot 10^{+28}:\\
\;\;\;\;\left(x \cdot x\right) \cdot 0.5\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(0.5, x, 1\right), x, 1\right)\\
\end{array}
\end{array}
if (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) < -9.99999999999999958e27Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6444.3
Applied rewrites44.3%
Taylor expanded in y around 0
Applied rewrites65.5%
Taylor expanded in x around 0
Applied rewrites2.2%
Taylor expanded in x around inf
Applied rewrites12.8%
if -9.99999999999999958e27 < (-.f64 (+.f64 x (*.f64 y (log.f64 y))) z) Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6480.2
Applied rewrites80.2%
Taylor expanded in y around 0
Applied rewrites50.8%
Taylor expanded in x around 0
Applied rewrites41.7%
Final simplification33.1%
(FPCore (x y z) :precision binary64 (if (<= y 1.35) (exp x) (pow y y)))
double code(double x, double y, double z) {
double tmp;
if (y <= 1.35) {
tmp = exp(x);
} else {
tmp = pow(y, y);
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 1.35d0) then
tmp = exp(x)
else
tmp = y ** y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 1.35) {
tmp = Math.exp(x);
} else {
tmp = Math.pow(y, y);
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 1.35: tmp = math.exp(x) else: tmp = math.pow(y, y) return tmp
function code(x, y, z) tmp = 0.0 if (y <= 1.35) tmp = exp(x); else tmp = y ^ y; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 1.35) tmp = exp(x); else tmp = y ^ y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 1.35], N[Exp[x], $MachinePrecision], N[Power[y, y], $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 1.35:\\
\;\;\;\;e^{x}\\
\mathbf{else}:\\
\;\;\;\;{y}^{y}\\
\end{array}
\end{array}
if y < 1.3500000000000001Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6474.5
Applied rewrites74.5%
Taylor expanded in y around 0
Applied rewrites74.5%
if 1.3500000000000001 < y Initial program 99.9%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6464.1
Applied rewrites64.1%
Taylor expanded in x around 0
Applied rewrites78.2%
(FPCore (x y z) :precision binary64 (+ 1.0 x))
double code(double x, double y, double z) {
return 1.0 + x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = 1.0d0 + x
end function
public static double code(double x, double y, double z) {
return 1.0 + x;
}
def code(x, y, z): return 1.0 + x
function code(x, y, z) return Float64(1.0 + x) end
function tmp = code(x, y, z) tmp = 1.0 + x; end
code[x_, y_, z_] := N[(1.0 + x), $MachinePrecision]
\begin{array}{l}
\\
1 + x
\end{array}
Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6469.5
Applied rewrites69.5%
Taylor expanded in y around 0
Applied rewrites55.2%
Taylor expanded in x around 0
Applied rewrites15.6%
(FPCore (x y z) :precision binary64 1.0)
double code(double x, double y, double z) {
return 1.0;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = 1.0d0
end function
public static double code(double x, double y, double z) {
return 1.0;
}
def code(x, y, z): return 1.0
function code(x, y, z) return 1.0 end
function tmp = code(x, y, z) tmp = 1.0; end
code[x_, y_, z_] := 1.0
\begin{array}{l}
\\
1
\end{array}
Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
exp-sumN/A
lower-*.f64N/A
*-commutativeN/A
exp-to-powN/A
lower-pow.f64N/A
lower-exp.f6469.5
Applied rewrites69.5%
Taylor expanded in x around 0
Applied rewrites51.3%
Taylor expanded in y around 0
Applied rewrites15.6%
(FPCore (x y z) :precision binary64 (exp (+ (- x z) (* (log y) y))))
double code(double x, double y, double z) {
return exp(((x - z) + (log(y) * y)));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = exp(((x - z) + (log(y) * y)))
end function
public static double code(double x, double y, double z) {
return Math.exp(((x - z) + (Math.log(y) * y)));
}
def code(x, y, z): return math.exp(((x - z) + (math.log(y) * y)))
function code(x, y, z) return exp(Float64(Float64(x - z) + Float64(log(y) * y))) end
function tmp = code(x, y, z) tmp = exp(((x - z) + (log(y) * y))); end
code[x_, y_, z_] := N[Exp[N[(N[(x - z), $MachinePrecision] + N[(N[Log[y], $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
e^{\left(x - z\right) + \log y \cdot y}
\end{array}
herbie shell --seed 2024277
(FPCore (x y z)
:name "Statistics.Distribution.Poisson.Internal:probability from math-functions-0.1.5.2"
:precision binary64
:alt
(! :herbie-platform default (exp (+ (- x z) (* (log y) y))))
(exp (- (+ x (* y (log y))) z)))