
(FPCore (x y z) :precision binary64 (+ x (* (* y z) z)))
double code(double x, double y, double z) {
return x + ((y * z) * z);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + ((y * z) * z)
end function
public static double code(double x, double y, double z) {
return x + ((y * z) * z);
}
def code(x, y, z): return x + ((y * z) * z)
function code(x, y, z) return Float64(x + Float64(Float64(y * z) * z)) end
function tmp = code(x, y, z) tmp = x + ((y * z) * z); end
code[x_, y_, z_] := N[(x + N[(N[(y * z), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(y \cdot z\right) \cdot z
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 5 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (+ x (* (* y z) z)))
double code(double x, double y, double z) {
return x + ((y * z) * z);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + ((y * z) * z)
end function
public static double code(double x, double y, double z) {
return x + ((y * z) * z);
}
def code(x, y, z): return x + ((y * z) * z)
function code(x, y, z) return Float64(x + Float64(Float64(y * z) * z)) end
function tmp = code(x, y, z) tmp = x + ((y * z) * z); end
code[x_, y_, z_] := N[(x + N[(N[(y * z), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(y \cdot z\right) \cdot z
\end{array}
(FPCore (x y z) :precision binary64 (+ x (* z (* y z))))
double code(double x, double y, double z) {
return x + (z * (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 = x + (z * (y * z))
end function
public static double code(double x, double y, double z) {
return x + (z * (y * z));
}
def code(x, y, z): return x + (z * (y * z))
function code(x, y, z) return Float64(x + Float64(z * Float64(y * z))) end
function tmp = code(x, y, z) tmp = x + (z * (y * z)); end
code[x_, y_, z_] := N[(x + N[(z * N[(y * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + z \cdot \left(y \cdot z\right)
\end{array}
Initial program 99.9%
Final simplification99.9%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* z (* y z))))
(if (<= t_0 -5e-35)
t_0
(if (<= t_0 2e-5)
x
(if (<= t_0 2000000000.0) (* y (* z z)) (if (<= t_0 2e+98) x t_0))))))
double code(double x, double y, double z) {
double t_0 = z * (y * z);
double tmp;
if (t_0 <= -5e-35) {
tmp = t_0;
} else if (t_0 <= 2e-5) {
tmp = x;
} else if (t_0 <= 2000000000.0) {
tmp = y * (z * z);
} else if (t_0 <= 2e+98) {
tmp = x;
} else {
tmp = t_0;
}
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 = z * (y * z)
if (t_0 <= (-5d-35)) then
tmp = t_0
else if (t_0 <= 2d-5) then
tmp = x
else if (t_0 <= 2000000000.0d0) then
tmp = y * (z * z)
else if (t_0 <= 2d+98) then
tmp = x
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = z * (y * z);
double tmp;
if (t_0 <= -5e-35) {
tmp = t_0;
} else if (t_0 <= 2e-5) {
tmp = x;
} else if (t_0 <= 2000000000.0) {
tmp = y * (z * z);
} else if (t_0 <= 2e+98) {
tmp = x;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = z * (y * z) tmp = 0 if t_0 <= -5e-35: tmp = t_0 elif t_0 <= 2e-5: tmp = x elif t_0 <= 2000000000.0: tmp = y * (z * z) elif t_0 <= 2e+98: tmp = x else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(z * Float64(y * z)) tmp = 0.0 if (t_0 <= -5e-35) tmp = t_0; elseif (t_0 <= 2e-5) tmp = x; elseif (t_0 <= 2000000000.0) tmp = Float64(y * Float64(z * z)); elseif (t_0 <= 2e+98) tmp = x; else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = z * (y * z); tmp = 0.0; if (t_0 <= -5e-35) tmp = t_0; elseif (t_0 <= 2e-5) tmp = x; elseif (t_0 <= 2000000000.0) tmp = y * (z * z); elseif (t_0 <= 2e+98) tmp = x; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(z * N[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -5e-35], t$95$0, If[LessEqual[t$95$0, 2e-5], x, If[LessEqual[t$95$0, 2000000000.0], N[(y * N[(z * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 2e+98], x, t$95$0]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := z \cdot \left(y \cdot z\right)\\
\mathbf{if}\;t_0 \leq -5 \cdot 10^{-35}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;t_0 \leq 2 \cdot 10^{-5}:\\
\;\;\;\;x\\
\mathbf{elif}\;t_0 \leq 2000000000:\\
\;\;\;\;y \cdot \left(z \cdot z\right)\\
\mathbf{elif}\;t_0 \leq 2 \cdot 10^{+98}:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
if (*.f64 (*.f64 y z) z) < -4.99999999999999964e-35 or 2e98 < (*.f64 (*.f64 y z) z) Initial program 99.9%
associate-*l*83.3%
Simplified83.3%
+-commutative83.3%
associate-*r*99.9%
add-sqr-sqrt48.1%
associate-*r*48.1%
fma-def48.1%
Applied egg-rr48.1%
Taylor expanded in y around inf 76.5%
unpow276.5%
Simplified76.5%
*-commutative76.5%
add-sqr-sqrt41.0%
pow241.0%
pow241.0%
pow-prod-down51.7%
Applied egg-rr51.7%
unpow251.7%
*-commutative51.7%
associate-*r*51.6%
associate-*r*51.7%
add-sqr-sqrt92.2%
*-commutative92.2%
Applied egg-rr92.2%
if -4.99999999999999964e-35 < (*.f64 (*.f64 y z) z) < 2.00000000000000016e-5 or 2e9 < (*.f64 (*.f64 y z) z) < 2e98Initial program 100.0%
associate-*l*95.8%
Simplified95.8%
Taylor expanded in x around inf 88.5%
if 2.00000000000000016e-5 < (*.f64 (*.f64 y z) z) < 2e9Initial program 99.7%
associate-*l*100.0%
Simplified100.0%
+-commutative100.0%
associate-*r*99.7%
add-sqr-sqrt19.7%
associate-*r*19.7%
fma-def19.7%
Applied egg-rr19.7%
Taylor expanded in y around inf 100.0%
unpow2100.0%
Simplified100.0%
Final simplification90.3%
(FPCore (x y z) :precision binary64 (if (<= z 6e+153) (+ x (* y (* z z))) (* z (* y z))))
double code(double x, double y, double z) {
double tmp;
if (z <= 6e+153) {
tmp = x + (y * (z * z));
} else {
tmp = z * (y * z);
}
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 (z <= 6d+153) then
tmp = x + (y * (z * z))
else
tmp = z * (y * z)
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (z <= 6e+153) {
tmp = x + (y * (z * z));
} else {
tmp = z * (y * z);
}
return tmp;
}
def code(x, y, z): tmp = 0 if z <= 6e+153: tmp = x + (y * (z * z)) else: tmp = z * (y * z) return tmp
function code(x, y, z) tmp = 0.0 if (z <= 6e+153) tmp = Float64(x + Float64(y * Float64(z * z))); else tmp = Float64(z * Float64(y * z)); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (z <= 6e+153) tmp = x + (y * (z * z)); else tmp = z * (y * z); end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[z, 6e+153], N[(x + N[(y * N[(z * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(z * N[(y * z), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq 6 \cdot 10^{+153}:\\
\;\;\;\;x + y \cdot \left(z \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;z \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < 6.00000000000000037e153Initial program 99.9%
associate-*l*94.0%
Simplified94.0%
if 6.00000000000000037e153 < z Initial program 100.0%
associate-*l*67.0%
Simplified67.0%
+-commutative67.0%
associate-*r*100.0%
add-sqr-sqrt99.8%
associate-*r*99.6%
fma-def99.6%
Applied egg-rr99.6%
Taylor expanded in y around inf 67.0%
unpow267.0%
Simplified67.0%
*-commutative67.0%
add-sqr-sqrt39.4%
pow239.4%
pow239.4%
pow-prod-down55.9%
Applied egg-rr55.9%
unpow255.9%
*-commutative55.9%
associate-*r*55.9%
associate-*r*56.0%
add-sqr-sqrt97.2%
*-commutative97.2%
Applied egg-rr97.2%
Final simplification94.4%
(FPCore (x y z) :precision binary64 (if (<= z 3.15e+25) x (* y (* z z))))
double code(double x, double y, double z) {
double tmp;
if (z <= 3.15e+25) {
tmp = x;
} else {
tmp = y * (z * z);
}
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 (z <= 3.15d+25) then
tmp = x
else
tmp = y * (z * z)
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (z <= 3.15e+25) {
tmp = x;
} else {
tmp = y * (z * z);
}
return tmp;
}
def code(x, y, z): tmp = 0 if z <= 3.15e+25: tmp = x else: tmp = y * (z * z) return tmp
function code(x, y, z) tmp = 0.0 if (z <= 3.15e+25) tmp = x; else tmp = Float64(y * Float64(z * z)); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (z <= 3.15e+25) tmp = x; else tmp = y * (z * z); end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[z, 3.15e+25], x, N[(y * N[(z * z), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq 3.15 \cdot 10^{+25}:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;y \cdot \left(z \cdot z\right)\\
\end{array}
\end{array}
if z < 3.14999999999999987e25Initial program 99.9%
associate-*l*93.2%
Simplified93.2%
Taylor expanded in x around inf 62.5%
if 3.14999999999999987e25 < z Initial program 99.9%
associate-*l*81.3%
Simplified81.3%
+-commutative81.3%
associate-*r*99.9%
add-sqr-sqrt99.8%
associate-*r*99.6%
fma-def99.6%
Applied egg-rr99.6%
Taylor expanded in y around inf 68.4%
unpow268.4%
Simplified68.4%
Final simplification63.9%
(FPCore (x y z) :precision binary64 x)
double code(double x, double y, double z) {
return x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x
end function
public static double code(double x, double y, double z) {
return x;
}
def code(x, y, z): return x
function code(x, y, z) return x end
function tmp = code(x, y, z) tmp = x; end
code[x_, y_, z_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 99.9%
associate-*l*90.4%
Simplified90.4%
Taylor expanded in x around inf 51.8%
Final simplification51.8%
herbie shell --seed 2023230
(FPCore (x y z)
:name "Statistics.Sample:robustSumVarWeighted from math-functions-0.1.5.2"
:precision binary64
(+ x (* (* y z) z)))