
(FPCore (x y z t a b) :precision binary64 (* (* x (cos (/ (* (* (+ (* y 2.0) 1.0) z) t) 16.0))) (cos (/ (* (* (+ (* a 2.0) 1.0) b) t) 16.0))))
double code(double x, double y, double z, double t, double a, double b) {
return (x * cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * cos((((((a * 2.0) + 1.0) * b) * t) / 16.0));
}
real(8) function code(x, y, z, t, a, b)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (x * cos((((((y * 2.0d0) + 1.0d0) * z) * t) / 16.0d0))) * cos((((((a * 2.0d0) + 1.0d0) * b) * t) / 16.0d0))
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return (x * Math.cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * Math.cos((((((a * 2.0) + 1.0) * b) * t) / 16.0));
}
def code(x, y, z, t, a, b): return (x * math.cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * math.cos((((((a * 2.0) + 1.0) * b) * t) / 16.0))
function code(x, y, z, t, a, b) return Float64(Float64(x * cos(Float64(Float64(Float64(Float64(Float64(y * 2.0) + 1.0) * z) * t) / 16.0))) * cos(Float64(Float64(Float64(Float64(Float64(a * 2.0) + 1.0) * b) * t) / 16.0))) end
function tmp = code(x, y, z, t, a, b) tmp = (x * cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * cos((((((a * 2.0) + 1.0) * b) * t) / 16.0)); end
code[x_, y_, z_, t_, a_, b_] := N[(N[(x * N[Cos[N[(N[(N[(N[(N[(y * 2.0), $MachinePrecision] + 1.0), $MachinePrecision] * z), $MachinePrecision] * t), $MachinePrecision] / 16.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Cos[N[(N[(N[(N[(N[(a * 2.0), $MachinePrecision] + 1.0), $MachinePrecision] * b), $MachinePrecision] * t), $MachinePrecision] / 16.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\right) \cdot t}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t}{16}\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 6 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t a b) :precision binary64 (* (* x (cos (/ (* (* (+ (* y 2.0) 1.0) z) t) 16.0))) (cos (/ (* (* (+ (* a 2.0) 1.0) b) t) 16.0))))
double code(double x, double y, double z, double t, double a, double b) {
return (x * cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * cos((((((a * 2.0) + 1.0) * b) * t) / 16.0));
}
real(8) function code(x, y, z, t, a, b)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (x * cos((((((y * 2.0d0) + 1.0d0) * z) * t) / 16.0d0))) * cos((((((a * 2.0d0) + 1.0d0) * b) * t) / 16.0d0))
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return (x * Math.cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * Math.cos((((((a * 2.0) + 1.0) * b) * t) / 16.0));
}
def code(x, y, z, t, a, b): return (x * math.cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * math.cos((((((a * 2.0) + 1.0) * b) * t) / 16.0))
function code(x, y, z, t, a, b) return Float64(Float64(x * cos(Float64(Float64(Float64(Float64(Float64(y * 2.0) + 1.0) * z) * t) / 16.0))) * cos(Float64(Float64(Float64(Float64(Float64(a * 2.0) + 1.0) * b) * t) / 16.0))) end
function tmp = code(x, y, z, t, a, b) tmp = (x * cos((((((y * 2.0) + 1.0) * z) * t) / 16.0))) * cos((((((a * 2.0) + 1.0) * b) * t) / 16.0)); end
code[x_, y_, z_, t_, a_, b_] := N[(N[(x * N[Cos[N[(N[(N[(N[(N[(y * 2.0), $MachinePrecision] + 1.0), $MachinePrecision] * z), $MachinePrecision] * t), $MachinePrecision] / 16.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Cos[N[(N[(N[(N[(N[(a * 2.0), $MachinePrecision] + 1.0), $MachinePrecision] * b), $MachinePrecision] * t), $MachinePrecision] / 16.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\right) \cdot t}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t}{16}\right)
\end{array}
t_m = (fabs.f64 t)
z_m = (fabs.f64 z)
(FPCore (x y z_m t_m a b)
:precision binary64
(if (<=
(*
(* x (cos (/ (* (* (+ (* y 2.0) 1.0) z_m) t_m) 16.0)))
(cos (/ (* (* (+ (* a 2.0) 1.0) b) t_m) 16.0)))
2e+297)
(*
(*
x
(sin
(+
(- (/ (* z_m t_m) -16.0) (* (* (* (/ t_m 16.0) z_m) 2.0) y))
(/ (PI) 2.0))))
(cos (* (* b t_m) 0.0625)))
(* x (sin (* 0.5 (PI))))))\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\_m\right) \cdot t\_m}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t\_m}{16}\right) \leq 2 \cdot 10^{+297}:\\
\;\;\;\;\left(x \cdot \sin \left(\left(\frac{z\_m \cdot t\_m}{-16} - \left(\left(\frac{t\_m}{16} \cdot z\_m\right) \cdot 2\right) \cdot y\right) + \frac{\mathsf{PI}\left(\right)}{2}\right)\right) \cdot \cos \left(\left(b \cdot t\_m\right) \cdot 0.0625\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) < 2e297Initial program 48.3%
Taylor expanded in a around 0
*-commutativeN/A
lower-*.f64N/A
lower-*.f6448.7
Applied rewrites48.7%
lift-*.f64N/A
lift-*.f64N/A
associate-*l*N/A
*-commutativeN/A
lift-*.f64N/A
lower-*.f6449.0
lift-+.f64N/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6449.0
Applied rewrites49.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-*.f64N/A
associate-*r*N/A
lift-*.f64N/A
*-commutativeN/A
associate-*r/N/A
*-commutativeN/A
lift-*.f64N/A
lift-fma.f64N/A
distribute-lft-inN/A
*-rgt-identityN/A
distribute-lft-outN/A
cos-sum-revN/A
*-commutativeN/A
Applied rewrites49.2%
if 2e297 < (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) Initial program 0.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites0.0%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites0.0%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6411.7
Applied rewrites11.7%
t_m = (fabs.f64 t)
z_m = (fabs.f64 z)
(FPCore (x y z_m t_m a b)
:precision binary64
(if (<=
(*
(* x (cos (/ (* (* (+ (* y 2.0) 1.0) z_m) t_m) 16.0)))
(cos (/ (* (* (+ (* a 2.0) 1.0) b) t_m) 16.0)))
2e+297)
(*
(* x (sin (fma (/ (* z_m (fma y 2.0 1.0)) -16.0) t_m (/ (PI) 2.0))))
(cos (* (* b t_m) 0.0625)))
(* x (sin (* 0.5 (PI))))))\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\_m\right) \cdot t\_m}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t\_m}{16}\right) \leq 2 \cdot 10^{+297}:\\
\;\;\;\;\left(x \cdot \sin \left(\mathsf{fma}\left(\frac{z\_m \cdot \mathsf{fma}\left(y, 2, 1\right)}{-16}, t\_m, \frac{\mathsf{PI}\left(\right)}{2}\right)\right)\right) \cdot \cos \left(\left(b \cdot t\_m\right) \cdot 0.0625\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) < 2e297Initial program 48.3%
Taylor expanded in a around 0
*-commutativeN/A
lower-*.f64N/A
lower-*.f6448.7
Applied rewrites48.7%
lift-*.f64N/A
lift-*.f64N/A
associate-*l*N/A
*-commutativeN/A
lift-*.f64N/A
lower-*.f6449.0
lift-+.f64N/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6449.0
Applied rewrites49.0%
lift-cos.f64N/A
lift-/.f64N/A
metadata-evalN/A
distribute-neg-frac2N/A
lift-*.f64N/A
*-commutativeN/A
lift-*.f64N/A
associate-*r*N/A
lift-*.f64N/A
lift-*.f64N/A
lift-/.f64N/A
cos-neg-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lower-fma.f64N/A
Applied rewrites49.4%
if 2e297 < (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) Initial program 0.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites0.0%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites0.0%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6411.7
Applied rewrites11.7%
t_m = (fabs.f64 t)
z_m = (fabs.f64 z)
(FPCore (x y z_m t_m a b)
:precision binary64
(if (<=
(*
(* x (cos (/ (* (* (+ (* y 2.0) 1.0) z_m) t_m) 16.0)))
(cos (/ (* (* (+ (* a 2.0) 1.0) b) t_m) 16.0)))
2e+297)
(*
(*
(cos (* 0.0625 (* b t_m)))
(cos (fma -0.125 (* (* t_m z_m) y) (* (* z_m t_m) -0.0625))))
x)
(* x (sin (* 0.5 (PI))))))\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\_m\right) \cdot t\_m}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t\_m}{16}\right) \leq 2 \cdot 10^{+297}:\\
\;\;\;\;\left(\cos \left(0.0625 \cdot \left(b \cdot t\_m\right)\right) \cdot \cos \left(\mathsf{fma}\left(-0.125, \left(t\_m \cdot z\_m\right) \cdot y, \left(z\_m \cdot t\_m\right) \cdot -0.0625\right)\right)\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) < 2e297Initial program 48.3%
Taylor expanded in a around 0
*-commutativeN/A
lower-*.f64N/A
lower-*.f6448.7
Applied rewrites48.7%
lift-*.f64N/A
lift-*.f64N/A
associate-*l*N/A
*-commutativeN/A
lower-*.f64N/A
Applied rewrites48.7%
Taylor expanded in y around 0
lower-fma.f64N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6448.8
Applied rewrites48.8%
Applied rewrites49.0%
if 2e297 < (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) Initial program 0.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites0.0%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites0.0%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6411.7
Applied rewrites11.7%
t_m = (fabs.f64 t)
z_m = (fabs.f64 z)
(FPCore (x y z_m t_m a b)
:precision binary64
(if (<=
(*
(* x (cos (/ (* (* (+ (* y 2.0) 1.0) z_m) t_m) 16.0)))
(cos (/ (* (* (+ (* a 2.0) 1.0) b) t_m) 16.0)))
2e+297)
(*
(* x (cos (fma (* 0.0625 t_m) z_m (* (* (* z_m y) t_m) 0.125))))
(cos (* (* b t_m) 0.0625)))
(* x (sin (* 0.5 (PI))))))\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\_m\right) \cdot t\_m}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t\_m}{16}\right) \leq 2 \cdot 10^{+297}:\\
\;\;\;\;\left(x \cdot \cos \left(\mathsf{fma}\left(0.0625 \cdot t\_m, z\_m, \left(\left(z\_m \cdot y\right) \cdot t\_m\right) \cdot 0.125\right)\right)\right) \cdot \cos \left(\left(b \cdot t\_m\right) \cdot 0.0625\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) < 2e297Initial program 48.3%
Taylor expanded in a around 0
*-commutativeN/A
lower-*.f64N/A
lower-*.f6448.7
Applied rewrites48.7%
Taylor expanded in y around 0
associate-*r*N/A
lower-fma.f64N/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6448.8
Applied rewrites48.8%
if 2e297 < (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) Initial program 0.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites0.0%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites0.0%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6411.7
Applied rewrites11.7%
t_m = (fabs.f64 t)
z_m = (fabs.f64 z)
(FPCore (x y z_m t_m a b)
:precision binary64
(if (<=
(*
(* x (cos (/ (* (* (+ (* y 2.0) 1.0) z_m) t_m) 16.0)))
(cos (/ (* (* (+ (* a 2.0) 1.0) b) t_m) 16.0)))
2e+297)
(*
(* x (cos (* (* b t_m) -0.0625)))
(cos (* -0.0625 (* (* (fma 2.0 y 1.0) z_m) t_m))))
(* x (sin (* 0.5 (PI))))))\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
\begin{array}{l}
\mathbf{if}\;\left(x \cdot \cos \left(\frac{\left(\left(y \cdot 2 + 1\right) \cdot z\_m\right) \cdot t\_m}{16}\right)\right) \cdot \cos \left(\frac{\left(\left(a \cdot 2 + 1\right) \cdot b\right) \cdot t\_m}{16}\right) \leq 2 \cdot 10^{+297}:\\
\;\;\;\;\left(x \cdot \cos \left(\left(b \cdot t\_m\right) \cdot -0.0625\right)\right) \cdot \cos \left(-0.0625 \cdot \left(\left(\mathsf{fma}\left(2, y, 1\right) \cdot z\_m\right) \cdot t\_m\right)\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)\\
\end{array}
\end{array}
if (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) < 2e297Initial program 48.3%
Taylor expanded in a around 0
*-commutativeN/A
lower-*.f64N/A
lower-*.f6448.7
Applied rewrites48.7%
Taylor expanded in a around 0
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
cos-neg-revN/A
lower-cos.f64N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
lower-*.f64N/A
lower-*.f64N/A
cos-neg-revN/A
lower-cos.f64N/A
distribute-lft-neg-inN/A
metadata-evalN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
Applied rewrites48.7%
if 2e297 < (*.f64 (*.f64 x (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 y #s(literal 2 binary64)) #s(literal 1 binary64)) z) t) #s(literal 16 binary64)))) (cos.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a #s(literal 2 binary64)) #s(literal 1 binary64)) b) t) #s(literal 16 binary64)))) Initial program 0.0%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites0.0%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites0.0%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6411.7
Applied rewrites11.7%
Final simplification34.4%
t_m = (fabs.f64 t) z_m = (fabs.f64 z) (FPCore (x y z_m t_m a b) :precision binary64 (* x (sin (* 0.5 (PI)))))
\begin{array}{l}
t_m = \left|t\right|
\\
z_m = \left|z\right|
\\
x \cdot \sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right)
\end{array}
Initial program 29.6%
lift-cos.f64N/A
lift-/.f64N/A
lift-*.f64N/A
associate-/l*N/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lift-+.f64N/A
distribute-lft-inN/A
distribute-lft-inN/A
*-rgt-identityN/A
*-commutativeN/A
cos-sumN/A
lower--.f64N/A
Applied rewrites29.6%
lift--.f64N/A
lift-*.f64N/A
lift-cos.f64N/A
lift-cos.f64N/A
lift-*.f64N/A
lift-sin.f64N/A
lift-sin.f64N/A
cos-sum-revN/A
sin-+PI/2-revN/A
lower-sin.f64N/A
Applied rewrites29.6%
Taylor expanded in t around 0
lower-*.f64N/A
lower-sin.f64N/A
lower-*.f64N/A
lower-PI.f6432.5
Applied rewrites32.5%
(FPCore (x y z t a b) :precision binary64 (* x (cos (* (/ b 16.0) (/ t (+ (- 1.0 (* a 2.0)) (pow (* a 2.0) 2.0)))))))
double code(double x, double y, double z, double t, double a, double b) {
return x * cos(((b / 16.0) * (t / ((1.0 - (a * 2.0)) + pow((a * 2.0), 2.0)))));
}
real(8) function code(x, y, z, t, a, b)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8), intent (in) :: b
code = x * cos(((b / 16.0d0) * (t / ((1.0d0 - (a * 2.0d0)) + ((a * 2.0d0) ** 2.0d0)))))
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return x * Math.cos(((b / 16.0) * (t / ((1.0 - (a * 2.0)) + Math.pow((a * 2.0), 2.0)))));
}
def code(x, y, z, t, a, b): return x * math.cos(((b / 16.0) * (t / ((1.0 - (a * 2.0)) + math.pow((a * 2.0), 2.0)))))
function code(x, y, z, t, a, b) return Float64(x * cos(Float64(Float64(b / 16.0) * Float64(t / Float64(Float64(1.0 - Float64(a * 2.0)) + (Float64(a * 2.0) ^ 2.0)))))) end
function tmp = code(x, y, z, t, a, b) tmp = x * cos(((b / 16.0) * (t / ((1.0 - (a * 2.0)) + ((a * 2.0) ^ 2.0))))); end
code[x_, y_, z_, t_, a_, b_] := N[(x * N[Cos[N[(N[(b / 16.0), $MachinePrecision] * N[(t / N[(N[(1.0 - N[(a * 2.0), $MachinePrecision]), $MachinePrecision] + N[Power[N[(a * 2.0), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x \cdot \cos \left(\frac{b}{16} \cdot \frac{t}{\left(1 - a \cdot 2\right) + {\left(a \cdot 2\right)}^{2}}\right)
\end{array}
herbie shell --seed 2024326
(FPCore (x y z t a b)
:name "Codec.Picture.Jpg.FastDct:referenceDct from JuicyPixels-3.2.6.1"
:precision binary64
:alt
(! :herbie-platform default (* x (cos (* (/ b 16) (/ t (+ (- 1 (* a 2)) (pow (* a 2) 2)))))))
(* (* x (cos (/ (* (* (+ (* y 2.0) 1.0) z) t) 16.0))) (cos (/ (* (* (+ (* a 2.0) 1.0) b) t) 16.0))))