
(FPCore (x y z) :precision binary64 (+ (+ x (sin y)) (* z (cos y))))
double code(double x, double y, double z) {
return (x + sin(y)) + (z * cos(y));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (x + sin(y)) + (z * cos(y))
end function
public static double code(double x, double y, double z) {
return (x + Math.sin(y)) + (z * Math.cos(y));
}
def code(x, y, z): return (x + math.sin(y)) + (z * math.cos(y))
function code(x, y, z) return Float64(Float64(x + sin(y)) + Float64(z * cos(y))) end
function tmp = code(x, y, z) tmp = (x + sin(y)) + (z * cos(y)); end
code[x_, y_, z_] := N[(N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision] + N[(z * N[Cos[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(x + \sin y\right) + z \cdot \cos y
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 8 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (+ (+ x (sin y)) (* z (cos y))))
double code(double x, double y, double z) {
return (x + sin(y)) + (z * cos(y));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (x + sin(y)) + (z * cos(y))
end function
public static double code(double x, double y, double z) {
return (x + Math.sin(y)) + (z * Math.cos(y));
}
def code(x, y, z): return (x + math.sin(y)) + (z * math.cos(y))
function code(x, y, z) return Float64(Float64(x + sin(y)) + Float64(z * cos(y))) end
function tmp = code(x, y, z) tmp = (x + sin(y)) + (z * cos(y)); end
code[x_, y_, z_] := N[(N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision] + N[(z * N[Cos[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(x + \sin y\right) + z \cdot \cos y
\end{array}
(FPCore (x y z) :precision binary64 (fma (cos y) z (+ x (sin y))))
double code(double x, double y, double z) {
return fma(cos(y), z, (x + sin(y)));
}
function code(x, y, z) return fma(cos(y), z, Float64(x + sin(y))) end
code[x_, y_, z_] := N[(N[Cos[y], $MachinePrecision] * z + N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(\cos y, z, x + \sin y\right)
\end{array}
Initial program 99.9%
lift-+.f64N/A
+-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6499.9
Applied rewrites99.9%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (+ (+ x (sin y)) (* (cos y) z))))
(if (<= t_0 -20.0)
(+ z x)
(if (<= t_0 -0.05)
(sin y)
(if (<= t_0 1e-18) (+ y (+ z x)) (if (<= t_0 1.0) (sin y) (+ z x)))))))
double code(double x, double y, double z) {
double t_0 = (x + sin(y)) + (cos(y) * z);
double tmp;
if (t_0 <= -20.0) {
tmp = z + x;
} else if (t_0 <= -0.05) {
tmp = sin(y);
} else if (t_0 <= 1e-18) {
tmp = y + (z + x);
} else if (t_0 <= 1.0) {
tmp = sin(y);
} else {
tmp = z + x;
}
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 = (x + sin(y)) + (cos(y) * z)
if (t_0 <= (-20.0d0)) then
tmp = z + x
else if (t_0 <= (-0.05d0)) then
tmp = sin(y)
else if (t_0 <= 1d-18) then
tmp = y + (z + x)
else if (t_0 <= 1.0d0) then
tmp = sin(y)
else
tmp = z + x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = (x + Math.sin(y)) + (Math.cos(y) * z);
double tmp;
if (t_0 <= -20.0) {
tmp = z + x;
} else if (t_0 <= -0.05) {
tmp = Math.sin(y);
} else if (t_0 <= 1e-18) {
tmp = y + (z + x);
} else if (t_0 <= 1.0) {
tmp = Math.sin(y);
} else {
tmp = z + x;
}
return tmp;
}
def code(x, y, z): t_0 = (x + math.sin(y)) + (math.cos(y) * z) tmp = 0 if t_0 <= -20.0: tmp = z + x elif t_0 <= -0.05: tmp = math.sin(y) elif t_0 <= 1e-18: tmp = y + (z + x) elif t_0 <= 1.0: tmp = math.sin(y) else: tmp = z + x return tmp
function code(x, y, z) t_0 = Float64(Float64(x + sin(y)) + Float64(cos(y) * z)) tmp = 0.0 if (t_0 <= -20.0) tmp = Float64(z + x); elseif (t_0 <= -0.05) tmp = sin(y); elseif (t_0 <= 1e-18) tmp = Float64(y + Float64(z + x)); elseif (t_0 <= 1.0) tmp = sin(y); else tmp = Float64(z + x); end return tmp end
function tmp_2 = code(x, y, z) t_0 = (x + sin(y)) + (cos(y) * z); tmp = 0.0; if (t_0 <= -20.0) tmp = z + x; elseif (t_0 <= -0.05) tmp = sin(y); elseif (t_0 <= 1e-18) tmp = y + (z + x); elseif (t_0 <= 1.0) tmp = sin(y); else tmp = z + x; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision] + N[(N[Cos[y], $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -20.0], N[(z + x), $MachinePrecision], If[LessEqual[t$95$0, -0.05], N[Sin[y], $MachinePrecision], If[LessEqual[t$95$0, 1e-18], N[(y + N[(z + x), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[Sin[y], $MachinePrecision], N[(z + x), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(x + \sin y\right) + \cos y \cdot z\\
\mathbf{if}\;t\_0 \leq -20:\\
\;\;\;\;z + x\\
\mathbf{elif}\;t\_0 \leq -0.05:\\
\;\;\;\;\sin y\\
\mathbf{elif}\;t\_0 \leq 10^{-18}:\\
\;\;\;\;y + \left(z + x\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\sin y\\
\mathbf{else}:\\
\;\;\;\;z + x\\
\end{array}
\end{array}
if (+.f64 (+.f64 x (sin.f64 y)) (*.f64 z (cos.f64 y))) < -20 or 1 < (+.f64 (+.f64 x (sin.f64 y)) (*.f64 z (cos.f64 y))) Initial program 99.9%
Taylor expanded in y around 0
+-commutativeN/A
lower-+.f6477.8
Applied rewrites77.8%
if -20 < (+.f64 (+.f64 x (sin.f64 y)) (*.f64 z (cos.f64 y))) < -0.050000000000000003 or 1.0000000000000001e-18 < (+.f64 (+.f64 x (sin.f64 y)) (*.f64 z (cos.f64 y))) < 1Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
lower-fma.f64N/A
lower-cos.f64N/A
lower-sin.f6498.5
Applied rewrites98.5%
Taylor expanded in z around 0
Applied rewrites95.5%
if -0.050000000000000003 < (+.f64 (+.f64 x (sin.f64 y)) (*.f64 z (cos.f64 y))) < 1.0000000000000001e-18Initial program 100.0%
Taylor expanded in y around 0
+-commutativeN/A
associate-+l+N/A
+-commutativeN/A
lower-+.f64N/A
+-commutativeN/A
lower-+.f64100.0
Applied rewrites100.0%
Final simplification82.0%
(FPCore (x y z) :precision binary64 (let* ((t_0 (fma x (/ (* (cos y) z) x) x))) (if (<= x -6.5e-46) t_0 (if (<= x 1.25e-22) (fma z (cos y) (sin y)) t_0))))
double code(double x, double y, double z) {
double t_0 = fma(x, ((cos(y) * z) / x), x);
double tmp;
if (x <= -6.5e-46) {
tmp = t_0;
} else if (x <= 1.25e-22) {
tmp = fma(z, cos(y), sin(y));
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = fma(x, Float64(Float64(cos(y) * z) / x), x) tmp = 0.0 if (x <= -6.5e-46) tmp = t_0; elseif (x <= 1.25e-22) tmp = fma(z, cos(y), sin(y)); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(N[(N[Cos[y], $MachinePrecision] * z), $MachinePrecision] / x), $MachinePrecision] + x), $MachinePrecision]}, If[LessEqual[x, -6.5e-46], t$95$0, If[LessEqual[x, 1.25e-22], N[(z * N[Cos[y], $MachinePrecision] + N[Sin[y], $MachinePrecision]), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(x, \frac{\cos y \cdot z}{x}, x\right)\\
\mathbf{if}\;x \leq -6.5 \cdot 10^{-46}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;x \leq 1.25 \cdot 10^{-22}:\\
\;\;\;\;\mathsf{fma}\left(z, \cos y, \sin y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if x < -6.49999999999999966e-46 or 1.24999999999999988e-22 < x Initial program 99.9%
lift-+.f64N/A
flip3-+N/A
clear-numN/A
lower-/.f64N/A
clear-numN/A
flip3-+N/A
lift-+.f64N/A
lower-/.f6499.7
Applied rewrites99.7%
Taylor expanded in x around inf
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f64N/A
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f64N/A
lower-cos.f64N/A
lower-/.f64N/A
lower-sin.f6499.9
Applied rewrites99.9%
Taylor expanded in z around inf
Applied rewrites97.0%
if -6.49999999999999966e-46 < x < 1.24999999999999988e-22Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
lower-fma.f64N/A
lower-cos.f64N/A
lower-sin.f6491.3
Applied rewrites91.3%
Final simplification94.6%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* (cos y) z)) (t_1 (fma x (/ t_0 x) x)))
(if (<= z -1.65e+118)
t_0
(if (<= z -8.2e-82)
t_1
(if (<= z 8.4e-47) (+ x (sin y)) (if (<= z 1.32e+97) t_1 t_0))))))
double code(double x, double y, double z) {
double t_0 = cos(y) * z;
double t_1 = fma(x, (t_0 / x), x);
double tmp;
if (z <= -1.65e+118) {
tmp = t_0;
} else if (z <= -8.2e-82) {
tmp = t_1;
} else if (z <= 8.4e-47) {
tmp = x + sin(y);
} else if (z <= 1.32e+97) {
tmp = t_1;
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(cos(y) * z) t_1 = fma(x, Float64(t_0 / x), x) tmp = 0.0 if (z <= -1.65e+118) tmp = t_0; elseif (z <= -8.2e-82) tmp = t_1; elseif (z <= 8.4e-47) tmp = Float64(x + sin(y)); elseif (z <= 1.32e+97) tmp = t_1; else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[Cos[y], $MachinePrecision] * z), $MachinePrecision]}, Block[{t$95$1 = N[(x * N[(t$95$0 / x), $MachinePrecision] + x), $MachinePrecision]}, If[LessEqual[z, -1.65e+118], t$95$0, If[LessEqual[z, -8.2e-82], t$95$1, If[LessEqual[z, 8.4e-47], N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.32e+97], t$95$1, t$95$0]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \cos y \cdot z\\
t_1 := \mathsf{fma}\left(x, \frac{t\_0}{x}, x\right)\\
\mathbf{if}\;z \leq -1.65 \cdot 10^{+118}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq -8.2 \cdot 10^{-82}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;z \leq 8.4 \cdot 10^{-47}:\\
\;\;\;\;x + \sin y\\
\mathbf{elif}\;z \leq 1.32 \cdot 10^{+97}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -1.65e118 or 1.31999999999999994e97 < z Initial program 99.8%
Taylor expanded in z around inf
lower-*.f64N/A
lower-cos.f6488.3
Applied rewrites88.3%
if -1.65e118 < z < -8.19999999999999992e-82 or 8.4000000000000003e-47 < z < 1.31999999999999994e97Initial program 99.9%
lift-+.f64N/A
flip3-+N/A
clear-numN/A
lower-/.f64N/A
clear-numN/A
flip3-+N/A
lift-+.f64N/A
lower-/.f6499.7
Applied rewrites99.7%
Taylor expanded in x around inf
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f64N/A
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f64N/A
lower-cos.f64N/A
lower-/.f64N/A
lower-sin.f6496.0
Applied rewrites96.0%
Taylor expanded in z around inf
Applied rewrites91.2%
if -8.19999999999999992e-82 < z < 8.4000000000000003e-47Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
lower-+.f64N/A
lower-sin.f6496.7
Applied rewrites96.7%
Final simplification92.4%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* (cos y) z)))
(if (<= z -3.3e+118)
t_0
(if (<= z -8.2e-82)
(+ z x)
(if (<= z 8.4e-47) (+ x (sin y)) (if (<= z 2.95e+121) (+ z x) t_0))))))
double code(double x, double y, double z) {
double t_0 = cos(y) * z;
double tmp;
if (z <= -3.3e+118) {
tmp = t_0;
} else if (z <= -8.2e-82) {
tmp = z + x;
} else if (z <= 8.4e-47) {
tmp = x + sin(y);
} else if (z <= 2.95e+121) {
tmp = z + 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 = cos(y) * z
if (z <= (-3.3d+118)) then
tmp = t_0
else if (z <= (-8.2d-82)) then
tmp = z + x
else if (z <= 8.4d-47) then
tmp = x + sin(y)
else if (z <= 2.95d+121) then
tmp = z + x
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = Math.cos(y) * z;
double tmp;
if (z <= -3.3e+118) {
tmp = t_0;
} else if (z <= -8.2e-82) {
tmp = z + x;
} else if (z <= 8.4e-47) {
tmp = x + Math.sin(y);
} else if (z <= 2.95e+121) {
tmp = z + x;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = math.cos(y) * z tmp = 0 if z <= -3.3e+118: tmp = t_0 elif z <= -8.2e-82: tmp = z + x elif z <= 8.4e-47: tmp = x + math.sin(y) elif z <= 2.95e+121: tmp = z + x else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(cos(y) * z) tmp = 0.0 if (z <= -3.3e+118) tmp = t_0; elseif (z <= -8.2e-82) tmp = Float64(z + x); elseif (z <= 8.4e-47) tmp = Float64(x + sin(y)); elseif (z <= 2.95e+121) tmp = Float64(z + x); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = cos(y) * z; tmp = 0.0; if (z <= -3.3e+118) tmp = t_0; elseif (z <= -8.2e-82) tmp = z + x; elseif (z <= 8.4e-47) tmp = x + sin(y); elseif (z <= 2.95e+121) tmp = z + x; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[Cos[y], $MachinePrecision] * z), $MachinePrecision]}, If[LessEqual[z, -3.3e+118], t$95$0, If[LessEqual[z, -8.2e-82], N[(z + x), $MachinePrecision], If[LessEqual[z, 8.4e-47], N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.95e+121], N[(z + x), $MachinePrecision], t$95$0]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \cos y \cdot z\\
\mathbf{if}\;z \leq -3.3 \cdot 10^{+118}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq -8.2 \cdot 10^{-82}:\\
\;\;\;\;z + x\\
\mathbf{elif}\;z \leq 8.4 \cdot 10^{-47}:\\
\;\;\;\;x + \sin y\\
\mathbf{elif}\;z \leq 2.95 \cdot 10^{+121}:\\
\;\;\;\;z + x\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -3.3e118 or 2.95000000000000007e121 < z Initial program 99.9%
Taylor expanded in z around inf
lower-*.f64N/A
lower-cos.f6489.5
Applied rewrites89.5%
if -3.3e118 < z < -8.19999999999999992e-82 or 8.4000000000000003e-47 < z < 2.95000000000000007e121Initial program 99.9%
Taylor expanded in y around 0
+-commutativeN/A
lower-+.f6482.6
Applied rewrites82.6%
if -8.19999999999999992e-82 < z < 8.4000000000000003e-47Initial program 100.0%
Taylor expanded in z around 0
+-commutativeN/A
lower-+.f64N/A
lower-sin.f6496.7
Applied rewrites96.7%
Final simplification90.1%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (+ x (sin y))))
(if (<= y -23000.0)
t_0
(if (<= y 3.9e-15) (+ z (fma y (fma y (* z -0.5) 1.0) x)) t_0))))
double code(double x, double y, double z) {
double t_0 = x + sin(y);
double tmp;
if (y <= -23000.0) {
tmp = t_0;
} else if (y <= 3.9e-15) {
tmp = z + fma(y, fma(y, (z * -0.5), 1.0), x);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(x + sin(y)) tmp = 0.0 if (y <= -23000.0) tmp = t_0; elseif (y <= 3.9e-15) tmp = Float64(z + fma(y, fma(y, Float64(z * -0.5), 1.0), x)); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(x + N[Sin[y], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[y, -23000.0], t$95$0, If[LessEqual[y, 3.9e-15], N[(z + N[(y * N[(y * N[(z * -0.5), $MachinePrecision] + 1.0), $MachinePrecision] + x), $MachinePrecision]), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x + \sin y\\
\mathbf{if}\;y \leq -23000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;y \leq 3.9 \cdot 10^{-15}:\\
\;\;\;\;z + \mathsf{fma}\left(y, \mathsf{fma}\left(y, z \cdot -0.5, 1\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if y < -23000 or 3.90000000000000026e-15 < y Initial program 99.8%
Taylor expanded in z around 0
+-commutativeN/A
lower-+.f64N/A
lower-sin.f6461.1
Applied rewrites61.1%
if -23000 < y < 3.90000000000000026e-15Initial program 100.0%
Taylor expanded in y around 0
associate-+r+N/A
+-commutativeN/A
associate-+l+N/A
lower-+.f64N/A
+-commutativeN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-fma.f64N/A
+-commutativeN/A
lower-fma.f64N/A
*-commutativeN/A
lower-*.f64100.0
Applied rewrites100.0%
Final simplification81.2%
(FPCore (x y z) :precision binary64 (+ z x))
double code(double x, double y, double z) {
return z + x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = z + x
end function
public static double code(double x, double y, double z) {
return z + x;
}
def code(x, y, z): return z + x
function code(x, y, z) return Float64(z + x) end
function tmp = code(x, y, z) tmp = z + x; end
code[x_, y_, z_] := N[(z + x), $MachinePrecision]
\begin{array}{l}
\\
z + x
\end{array}
Initial program 99.9%
Taylor expanded in y around 0
+-commutativeN/A
lower-+.f6469.4
Applied rewrites69.4%
(FPCore (x y z) :precision binary64 (+ y z))
double code(double x, double y, double z) {
return 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 = y + z
end function
public static double code(double x, double y, double z) {
return y + z;
}
def code(x, y, z): return y + z
function code(x, y, z) return Float64(y + z) end
function tmp = code(x, y, z) tmp = y + z; end
code[x_, y_, z_] := N[(y + z), $MachinePrecision]
\begin{array}{l}
\\
y + z
\end{array}
Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
lower-fma.f64N/A
lower-cos.f64N/A
lower-sin.f6455.8
Applied rewrites55.8%
Taylor expanded in y around 0
Applied rewrites28.0%
Final simplification28.0%
herbie shell --seed 2024222
(FPCore (x y z)
:name "Graphics.Rasterific.Svg.PathConverter:segmentToBezier from rasterific-svg-0.2.3.1, C"
:precision binary64
(+ (+ x (sin y)) (* z (cos y))))