
(FPCore (x eps) :precision binary64 (- (tan (+ x eps)) (tan x)))
double code(double x, double eps) {
return tan((x + eps)) - tan(x);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = tan((x + eps)) - tan(x)
end function
public static double code(double x, double eps) {
return Math.tan((x + eps)) - Math.tan(x);
}
def code(x, eps): return math.tan((x + eps)) - math.tan(x)
function code(x, eps) return Float64(tan(Float64(x + eps)) - tan(x)) end
function tmp = code(x, eps) tmp = tan((x + eps)) - tan(x); end
code[x_, eps_] := N[(N[Tan[N[(x + eps), $MachinePrecision]], $MachinePrecision] - N[Tan[x], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\tan \left(x + \varepsilon\right) - \tan x
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 11 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x eps) :precision binary64 (- (tan (+ x eps)) (tan x)))
double code(double x, double eps) {
return tan((x + eps)) - tan(x);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = tan((x + eps)) - tan(x)
end function
public static double code(double x, double eps) {
return Math.tan((x + eps)) - Math.tan(x);
}
def code(x, eps): return math.tan((x + eps)) - math.tan(x)
function code(x, eps) return Float64(tan(Float64(x + eps)) - tan(x)) end
function tmp = code(x, eps) tmp = tan((x + eps)) - tan(x); end
code[x_, eps_] := N[(N[Tan[N[(x + eps), $MachinePrecision]], $MachinePrecision] - N[Tan[x], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\tan \left(x + \varepsilon\right) - \tan x
\end{array}
(FPCore (x eps)
:precision binary64
(let* ((t_0 (pow (sin x) 2.0)) (t_1 (* t_0 (pow (cos x) -2.0))))
(*
eps
(+
(+
(*
eps
(+
(*
eps
(+
0.3333333333333333
(-
t_1
(-
(* -0.3333333333333333 t_1)
(* (pow (sin x) 4.0) (pow (cos x) -4.0))))))
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0)))))
1.0)
(/ t_0 (/ (+ (cos (* x 2.0)) 1.0) 2.0))))))
double code(double x, double eps) {
double t_0 = pow(sin(x), 2.0);
double t_1 = t_0 * pow(cos(x), -2.0);
return eps * (((eps * ((eps * (0.3333333333333333 + (t_1 - ((-0.3333333333333333 * t_1) - (pow(sin(x), 4.0) * pow(cos(x), -4.0)))))) + ((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0))))) + 1.0) + (t_0 / ((cos((x * 2.0)) + 1.0) / 2.0)));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
real(8) :: t_0
real(8) :: t_1
t_0 = sin(x) ** 2.0d0
t_1 = t_0 * (cos(x) ** (-2.0d0))
code = eps * (((eps * ((eps * (0.3333333333333333d0 + (t_1 - (((-0.3333333333333333d0) * t_1) - ((sin(x) ** 4.0d0) * (cos(x) ** (-4.0d0))))))) + ((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0))))) + 1.0d0) + (t_0 / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)))
end function
public static double code(double x, double eps) {
double t_0 = Math.pow(Math.sin(x), 2.0);
double t_1 = t_0 * Math.pow(Math.cos(x), -2.0);
return eps * (((eps * ((eps * (0.3333333333333333 + (t_1 - ((-0.3333333333333333 * t_1) - (Math.pow(Math.sin(x), 4.0) * Math.pow(Math.cos(x), -4.0)))))) + ((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0))))) + 1.0) + (t_0 / ((Math.cos((x * 2.0)) + 1.0) / 2.0)));
}
def code(x, eps): t_0 = math.pow(math.sin(x), 2.0) t_1 = t_0 * math.pow(math.cos(x), -2.0) return eps * (((eps * ((eps * (0.3333333333333333 + (t_1 - ((-0.3333333333333333 * t_1) - (math.pow(math.sin(x), 4.0) * math.pow(math.cos(x), -4.0)))))) + ((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0))))) + 1.0) + (t_0 / ((math.cos((x * 2.0)) + 1.0) / 2.0)))
function code(x, eps) t_0 = sin(x) ^ 2.0 t_1 = Float64(t_0 * (cos(x) ^ -2.0)) return Float64(eps * Float64(Float64(Float64(eps * Float64(Float64(eps * Float64(0.3333333333333333 + Float64(t_1 - Float64(Float64(-0.3333333333333333 * t_1) - Float64((sin(x) ^ 4.0) * (cos(x) ^ -4.0)))))) + Float64(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0))))) + 1.0) + Float64(t_0 / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)))) end
function tmp = code(x, eps) t_0 = sin(x) ^ 2.0; t_1 = t_0 * (cos(x) ^ -2.0); tmp = eps * (((eps * ((eps * (0.3333333333333333 + (t_1 - ((-0.3333333333333333 * t_1) - ((sin(x) ^ 4.0) * (cos(x) ^ -4.0)))))) + ((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0))))) + 1.0) + (t_0 / ((cos((x * 2.0)) + 1.0) / 2.0))); end
code[x_, eps_] := Block[{t$95$0 = N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 * N[Power[N[Cos[x], $MachinePrecision], -2.0], $MachinePrecision]), $MachinePrecision]}, N[(eps * N[(N[(N[(eps * N[(N[(eps * N[(0.3333333333333333 + N[(t$95$1 - N[(N[(-0.3333333333333333 * t$95$1), $MachinePrecision] - N[(N[Power[N[Sin[x], $MachinePrecision], 4.0], $MachinePrecision] * N[Power[N[Cos[x], $MachinePrecision], -4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[Sin[x], $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision] + N[(N[Power[N[Sin[x], $MachinePrecision], 3.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] + N[(t$95$0 / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\sin x}^{2}\\
t_1 := t\_0 \cdot {\cos x}^{-2}\\
\varepsilon \cdot \left(\left(\varepsilon \cdot \left(\varepsilon \cdot \left(0.3333333333333333 + \left(t\_1 - \left(-0.3333333333333333 \cdot t\_1 - {\sin x}^{4} \cdot {\cos x}^{-4}\right)\right)\right) + \left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right)\right) + 1\right) + \frac{t\_0}{\frac{\cos \left(x \cdot 2\right) + 1}{2}}\right)
\end{array}
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 99.6%
unpow299.6%
cos-mult99.6%
Applied egg-rr99.6%
+-commutative99.6%
+-inverses99.6%
cos-099.6%
count-299.6%
*-commutative99.6%
Simplified99.6%
+-commutative99.6%
*-un-lft-identity99.6%
fma-define99.6%
Applied egg-rr99.6%
fma-undefine99.6%
unsub-neg99.6%
*-lft-identity99.6%
fma-undefine99.6%
unsub-neg99.6%
*-commutative99.6%
Simplified99.6%
Final simplification99.6%
(FPCore (x eps)
:precision binary64
(let* ((t_0 (pow (sin x) 2.0)) (t_1 (/ t_0 (pow (cos x) 2.0))))
(*
eps
(+
t_1
(+
(*
eps
(+
(*
eps
(+
0.3333333333333333
(+
t_1
(-
(/ (pow (sin x) 4.0) (pow (cos x) 4.0))
(* -0.3333333333333333 t_0)))))
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0)))))
1.0)))))
double code(double x, double eps) {
double t_0 = pow(sin(x), 2.0);
double t_1 = t_0 / pow(cos(x), 2.0);
return eps * (t_1 + ((eps * ((eps * (0.3333333333333333 + (t_1 + ((pow(sin(x), 4.0) / pow(cos(x), 4.0)) - (-0.3333333333333333 * t_0))))) + ((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0))))) + 1.0));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
real(8) :: t_0
real(8) :: t_1
t_0 = sin(x) ** 2.0d0
t_1 = t_0 / (cos(x) ** 2.0d0)
code = eps * (t_1 + ((eps * ((eps * (0.3333333333333333d0 + (t_1 + (((sin(x) ** 4.0d0) / (cos(x) ** 4.0d0)) - ((-0.3333333333333333d0) * t_0))))) + ((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0))))) + 1.0d0))
end function
public static double code(double x, double eps) {
double t_0 = Math.pow(Math.sin(x), 2.0);
double t_1 = t_0 / Math.pow(Math.cos(x), 2.0);
return eps * (t_1 + ((eps * ((eps * (0.3333333333333333 + (t_1 + ((Math.pow(Math.sin(x), 4.0) / Math.pow(Math.cos(x), 4.0)) - (-0.3333333333333333 * t_0))))) + ((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0))))) + 1.0));
}
def code(x, eps): t_0 = math.pow(math.sin(x), 2.0) t_1 = t_0 / math.pow(math.cos(x), 2.0) return eps * (t_1 + ((eps * ((eps * (0.3333333333333333 + (t_1 + ((math.pow(math.sin(x), 4.0) / math.pow(math.cos(x), 4.0)) - (-0.3333333333333333 * t_0))))) + ((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0))))) + 1.0))
function code(x, eps) t_0 = sin(x) ^ 2.0 t_1 = Float64(t_0 / (cos(x) ^ 2.0)) return Float64(eps * Float64(t_1 + Float64(Float64(eps * Float64(Float64(eps * Float64(0.3333333333333333 + Float64(t_1 + Float64(Float64((sin(x) ^ 4.0) / (cos(x) ^ 4.0)) - Float64(-0.3333333333333333 * t_0))))) + Float64(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0))))) + 1.0))) end
function tmp = code(x, eps) t_0 = sin(x) ^ 2.0; t_1 = t_0 / (cos(x) ^ 2.0); tmp = eps * (t_1 + ((eps * ((eps * (0.3333333333333333 + (t_1 + (((sin(x) ^ 4.0) / (cos(x) ^ 4.0)) - (-0.3333333333333333 * t_0))))) + ((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0))))) + 1.0)); end
code[x_, eps_] := Block[{t$95$0 = N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 / N[Power[N[Cos[x], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]}, N[(eps * N[(t$95$1 + N[(N[(eps * N[(N[(eps * N[(0.3333333333333333 + N[(t$95$1 + N[(N[(N[Power[N[Sin[x], $MachinePrecision], 4.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 4.0], $MachinePrecision]), $MachinePrecision] - N[(-0.3333333333333333 * t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[Sin[x], $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision] + N[(N[Power[N[Sin[x], $MachinePrecision], 3.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\sin x}^{2}\\
t_1 := \frac{t\_0}{{\cos x}^{2}}\\
\varepsilon \cdot \left(t\_1 + \left(\varepsilon \cdot \left(\varepsilon \cdot \left(0.3333333333333333 + \left(t\_1 + \left(\frac{{\sin x}^{4}}{{\cos x}^{4}} - -0.3333333333333333 \cdot t\_0\right)\right)\right) + \left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right)\right) + 1\right)\right)
\end{array}
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 99.6%
Taylor expanded in x around 0 99.6%
Final simplification99.6%
(FPCore (x eps)
:precision binary64
(let* ((t_0 (/ (pow (sin x) 2.0) (pow (cos x) 2.0))))
(*
eps
(+
(+
t_0
(*
eps
(+
(*
eps
(+
0.3333333333333333
(+ t_0 (/ (pow (sin x) 4.0) (pow (cos x) 4.0)))))
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0))))))
1.0))))
double code(double x, double eps) {
double t_0 = pow(sin(x), 2.0) / pow(cos(x), 2.0);
return eps * ((t_0 + (eps * ((eps * (0.3333333333333333 + (t_0 + (pow(sin(x), 4.0) / pow(cos(x), 4.0))))) + ((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0)))))) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
real(8) :: t_0
t_0 = (sin(x) ** 2.0d0) / (cos(x) ** 2.0d0)
code = eps * ((t_0 + (eps * ((eps * (0.3333333333333333d0 + (t_0 + ((sin(x) ** 4.0d0) / (cos(x) ** 4.0d0))))) + ((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0)))))) + 1.0d0)
end function
public static double code(double x, double eps) {
double t_0 = Math.pow(Math.sin(x), 2.0) / Math.pow(Math.cos(x), 2.0);
return eps * ((t_0 + (eps * ((eps * (0.3333333333333333 + (t_0 + (Math.pow(Math.sin(x), 4.0) / Math.pow(Math.cos(x), 4.0))))) + ((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0)))))) + 1.0);
}
def code(x, eps): t_0 = math.pow(math.sin(x), 2.0) / math.pow(math.cos(x), 2.0) return eps * ((t_0 + (eps * ((eps * (0.3333333333333333 + (t_0 + (math.pow(math.sin(x), 4.0) / math.pow(math.cos(x), 4.0))))) + ((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0)))))) + 1.0)
function code(x, eps) t_0 = Float64((sin(x) ^ 2.0) / (cos(x) ^ 2.0)) return Float64(eps * Float64(Float64(t_0 + Float64(eps * Float64(Float64(eps * Float64(0.3333333333333333 + Float64(t_0 + Float64((sin(x) ^ 4.0) / (cos(x) ^ 4.0))))) + Float64(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0)))))) + 1.0)) end
function tmp = code(x, eps) t_0 = (sin(x) ^ 2.0) / (cos(x) ^ 2.0); tmp = eps * ((t_0 + (eps * ((eps * (0.3333333333333333 + (t_0 + ((sin(x) ^ 4.0) / (cos(x) ^ 4.0))))) + ((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0)))))) + 1.0); end
code[x_, eps_] := Block[{t$95$0 = N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]}, N[(eps * N[(N[(t$95$0 + N[(eps * N[(N[(eps * N[(0.3333333333333333 + N[(t$95$0 + N[(N[Power[N[Sin[x], $MachinePrecision], 4.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[Sin[x], $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision] + N[(N[Power[N[Sin[x], $MachinePrecision], 3.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{{\sin x}^{2}}{{\cos x}^{2}}\\
\varepsilon \cdot \left(\left(t\_0 + \varepsilon \cdot \left(\varepsilon \cdot \left(0.3333333333333333 + \left(t\_0 + \frac{{\sin x}^{4}}{{\cos x}^{4}}\right)\right) + \left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right)\right)\right) + 1\right)
\end{array}
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 61.3%
Taylor expanded in eps around 0 99.6%
associate--l+99.6%
Simplified99.6%
Final simplification99.6%
(FPCore (x eps)
:precision binary64
(*
eps
(+
(/ (pow (sin x) 2.0) (/ (+ (cos (* x 2.0)) 1.0) 2.0))
(+
(*
eps
(+
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0)))
(* eps 0.3333333333333333)))
1.0))))
double code(double x, double eps) {
return eps * ((pow(sin(x), 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0))) + (eps * 0.3333333333333333))) + 1.0));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * (((sin(x) ** 2.0d0) / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + ((eps * (((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0))) + (eps * 0.3333333333333333d0))) + 1.0d0))
end function
public static double code(double x, double eps) {
return eps * ((Math.pow(Math.sin(x), 2.0) / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0))) + (eps * 0.3333333333333333))) + 1.0));
}
def code(x, eps): return eps * ((math.pow(math.sin(x), 2.0) / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0))) + (eps * 0.3333333333333333))) + 1.0))
function code(x, eps) return Float64(eps * Float64(Float64((sin(x) ^ 2.0) / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + Float64(Float64(eps * Float64(Float64(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + Float64(eps * 0.3333333333333333))) + 1.0))) end
function tmp = code(x, eps) tmp = eps * (((sin(x) ^ 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + (eps * 0.3333333333333333))) + 1.0)); end
code[x_, eps_] := N[(eps * N[(N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + N[(N[(eps * N[(N[(N[(N[Sin[x], $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision] + N[(N[Power[N[Sin[x], $MachinePrecision], 3.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(eps * 0.3333333333333333), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\frac{{\sin x}^{2}}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + \left(\varepsilon \cdot \left(\left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right) + \varepsilon \cdot 0.3333333333333333\right) + 1\right)\right)
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 99.6%
unpow299.6%
cos-mult99.6%
Applied egg-rr99.6%
+-commutative99.6%
+-inverses99.6%
cos-099.6%
count-299.6%
*-commutative99.6%
Simplified99.6%
Taylor expanded in x around 0 99.5%
Final simplification99.5%
(FPCore (x eps)
:precision binary64
(*
eps
(+
(/ (pow (sin x) 2.0) (/ (+ (cos (* x 2.0)) 1.0) 2.0))
(+
(* eps (+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0))))
1.0))))
double code(double x, double eps) {
return eps * ((pow(sin(x), 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * ((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0)))) + 1.0));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * (((sin(x) ** 2.0d0) / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + ((eps * ((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0)))) + 1.0d0))
end function
public static double code(double x, double eps) {
return eps * ((Math.pow(Math.sin(x), 2.0) / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * ((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0)))) + 1.0));
}
def code(x, eps): return eps * ((math.pow(math.sin(x), 2.0) / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * ((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0)))) + 1.0))
function code(x, eps) return Float64(eps * Float64(Float64((sin(x) ^ 2.0) / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + Float64(Float64(eps * Float64(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0)))) + 1.0))) end
function tmp = code(x, eps) tmp = eps * (((sin(x) ^ 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * ((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0)))) + 1.0)); end
code[x_, eps_] := N[(eps * N[(N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + N[(N[(eps * N[(N[(N[Sin[x], $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision] + N[(N[Power[N[Sin[x], $MachinePrecision], 3.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\frac{{\sin x}^{2}}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + \left(\varepsilon \cdot \left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right) + 1\right)\right)
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 99.6%
unpow299.6%
cos-mult99.6%
Applied egg-rr99.6%
+-commutative99.6%
+-inverses99.6%
cos-099.6%
count-299.6%
*-commutative99.6%
Simplified99.6%
Taylor expanded in eps around 0 99.5%
mul-1-neg99.5%
distribute-rgt-neg-in99.5%
distribute-lft-out99.5%
distribute-lft-neg-in99.5%
metadata-eval99.5%
Simplified99.5%
Final simplification99.5%
(FPCore (x eps) :precision binary64 (* eps (+ (/ (pow (sin x) 2.0) (/ (+ (cos (* x 2.0)) 1.0) 2.0)) (+ (* eps (+ x (* eps 0.3333333333333333))) 1.0))))
double code(double x, double eps) {
return eps * ((pow(sin(x), 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * (((sin(x) ** 2.0d0) / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + ((eps * (x + (eps * 0.3333333333333333d0))) + 1.0d0))
end function
public static double code(double x, double eps) {
return eps * ((Math.pow(Math.sin(x), 2.0) / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0));
}
def code(x, eps): return eps * ((math.pow(math.sin(x), 2.0) / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0))
function code(x, eps) return Float64(eps * Float64(Float64((sin(x) ^ 2.0) / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + Float64(Float64(eps * Float64(x + Float64(eps * 0.3333333333333333))) + 1.0))) end
function tmp = code(x, eps) tmp = eps * (((sin(x) ^ 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0)); end
code[x_, eps_] := N[(eps * N[(N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + N[(N[(eps * N[(x + N[(eps * 0.3333333333333333), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\frac{{\sin x}^{2}}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + \left(\varepsilon \cdot \left(x + \varepsilon \cdot 0.3333333333333333\right) + 1\right)\right)
\end{array}
Initial program 61.4%
tan-sum61.6%
div-inv61.6%
fma-neg61.5%
Applied egg-rr61.5%
Taylor expanded in eps around 0 99.6%
unpow299.6%
cos-mult99.6%
Applied egg-rr99.6%
+-commutative99.6%
+-inverses99.6%
cos-099.6%
count-299.6%
*-commutative99.6%
Simplified99.6%
Taylor expanded in x around 0 99.3%
+-commutative99.3%
Simplified99.3%
Final simplification99.3%
(FPCore (x eps) :precision binary64 (* eps (+ (/ (pow (sin x) 2.0) (/ (+ (cos (* x 2.0)) 1.0) 2.0)) 1.0)))
double code(double x, double eps) {
return eps * ((pow(sin(x), 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * (((sin(x) ** 2.0d0) / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + 1.0d0)
end function
public static double code(double x, double eps) {
return eps * ((Math.pow(Math.sin(x), 2.0) / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0);
}
def code(x, eps): return eps * ((math.pow(math.sin(x), 2.0) / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64((sin(x) ^ 2.0) / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + 1.0)) end
function tmp = code(x, eps) tmp = eps * (((sin(x) ^ 2.0) / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\frac{{\sin x}^{2}}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + 1\right)
\end{array}
Initial program 61.4%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
unpow299.6%
cos-mult99.6%
Applied egg-rr99.1%
+-commutative99.6%
+-inverses99.6%
cos-099.6%
count-299.6%
*-commutative99.6%
Simplified99.1%
Final simplification99.1%
(FPCore (x eps) :precision binary64 (* eps (+ (+ (* 0.3333333333333333 (pow eps 2.0)) (* x (+ eps x))) 1.0)))
double code(double x, double eps) {
return eps * (((0.3333333333333333 * pow(eps, 2.0)) + (x * (eps + x))) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * (((0.3333333333333333d0 * (eps ** 2.0d0)) + (x * (eps + x))) + 1.0d0)
end function
public static double code(double x, double eps) {
return eps * (((0.3333333333333333 * Math.pow(eps, 2.0)) + (x * (eps + x))) + 1.0);
}
def code(x, eps): return eps * (((0.3333333333333333 * math.pow(eps, 2.0)) + (x * (eps + x))) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64(Float64(0.3333333333333333 * (eps ^ 2.0)) + Float64(x * Float64(eps + x))) + 1.0)) end
function tmp = code(x, eps) tmp = eps * (((0.3333333333333333 * (eps ^ 2.0)) + (x * (eps + x))) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(N[(0.3333333333333333 * N[Power[eps, 2.0], $MachinePrecision]), $MachinePrecision] + N[(x * N[(eps + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\left(0.3333333333333333 \cdot {\varepsilon}^{2} + x \cdot \left(\varepsilon + x\right)\right) + 1\right)
\end{array}
Initial program 61.4%
Taylor expanded in eps around 0 99.6%
Taylor expanded in x around 0 98.8%
Taylor expanded in eps around 0 98.8%
unpow298.8%
distribute-rgt-out98.8%
Simplified98.8%
Final simplification98.8%
(FPCore (x eps) :precision binary64 (+ eps (* eps (pow x 2.0))))
double code(double x, double eps) {
return eps + (eps * pow(x, 2.0));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps + (eps * (x ** 2.0d0))
end function
public static double code(double x, double eps) {
return eps + (eps * Math.pow(x, 2.0));
}
def code(x, eps): return eps + (eps * math.pow(x, 2.0))
function code(x, eps) return Float64(eps + Float64(eps * (x ^ 2.0))) end
function tmp = code(x, eps) tmp = eps + (eps * (x ^ 2.0)); end
code[x_, eps_] := N[(eps + N[(eps * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon + \varepsilon \cdot {x}^{2}
\end{array}
Initial program 61.4%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
Taylor expanded in x around 0 98.6%
(FPCore (x eps) :precision binary64 (* eps (fma x x 1.0)))
double code(double x, double eps) {
return eps * fma(x, x, 1.0);
}
function code(x, eps) return Float64(eps * fma(x, x, 1.0)) end
code[x_, eps_] := N[(eps * N[(x * x + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \mathsf{fma}\left(x, x, 1\right)
\end{array}
Initial program 61.4%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
Taylor expanded in x around 0 98.6%
*-rgt-identity98.6%
distribute-lft-out98.6%
+-commutative98.6%
unpow298.6%
fma-define98.6%
Simplified98.6%
(FPCore (x eps) :precision binary64 eps)
double code(double x, double eps) {
return eps;
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps
end function
public static double code(double x, double eps) {
return eps;
}
def code(x, eps): return eps
function code(x, eps) return eps end
function tmp = code(x, eps) tmp = eps; end
code[x_, eps_] := eps
\begin{array}{l}
\\
\varepsilon
\end{array}
Initial program 61.4%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
Taylor expanded in x around 0 98.2%
(FPCore (x eps) :precision binary64 (/ (sin eps) (* (cos x) (cos (+ x eps)))))
double code(double x, double eps) {
return sin(eps) / (cos(x) * cos((x + eps)));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = sin(eps) / (cos(x) * cos((x + eps)))
end function
public static double code(double x, double eps) {
return Math.sin(eps) / (Math.cos(x) * Math.cos((x + eps)));
}
def code(x, eps): return math.sin(eps) / (math.cos(x) * math.cos((x + eps)))
function code(x, eps) return Float64(sin(eps) / Float64(cos(x) * cos(Float64(x + eps)))) end
function tmp = code(x, eps) tmp = sin(eps) / (cos(x) * cos((x + eps))); end
code[x_, eps_] := N[(N[Sin[eps], $MachinePrecision] / N[(N[Cos[x], $MachinePrecision] * N[Cos[N[(x + eps), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\sin \varepsilon}{\cos x \cdot \cos \left(x + \varepsilon\right)}
\end{array}
herbie shell --seed 2024117
(FPCore (x eps)
:name "2tan (problem 3.3.2)"
:precision binary64
:pre (and (and (and (<= -10000.0 x) (<= x 10000.0)) (< (* 1e-16 (fabs x)) eps)) (< eps (fabs x)))
:alt
(! :herbie-platform default (/ (sin eps) (* (cos x) (cos (+ x eps)))))
(- (tan (+ x eps)) (tan x)))