
(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 15 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
(+
t_1
(+
(*
eps
(+
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0)))
(*
eps
(-
0.3333333333333333
(-
(-
(* -0.3333333333333333 (/ t_0 (/ (+ (cos (* x 2.0)) 1.0) 2.0)))
(/ (pow (sin x) 4.0) (pow (cos x) 4.0)))
t_1)))))
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 * (((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / ((cos((x * 2.0)) + 1.0) / 2.0))) - (pow(sin(x), 4.0) / pow(cos(x), 4.0))) - t_1))))) + 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 * (((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0))) + (eps * (0.3333333333333333d0 - ((((-0.3333333333333333d0) * (t_0 / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0))) - ((sin(x) ** 4.0d0) / (cos(x) ** 4.0d0))) - t_1))))) + 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 * (((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / ((Math.cos((x * 2.0)) + 1.0) / 2.0))) - (Math.pow(Math.sin(x), 4.0) / Math.pow(Math.cos(x), 4.0))) - t_1))))) + 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 * (((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / ((math.cos((x * 2.0)) + 1.0) / 2.0))) - (math.pow(math.sin(x), 4.0) / math.pow(math.cos(x), 4.0))) - t_1))))) + 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(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + Float64(eps * Float64(0.3333333333333333 - Float64(Float64(Float64(-0.3333333333333333 * Float64(t_0 / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0))) - Float64((sin(x) ^ 4.0) / (cos(x) ^ 4.0))) - t_1))))) + 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 * (((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / ((cos((x * 2.0)) + 1.0) / 2.0))) - ((sin(x) ^ 4.0) / (cos(x) ^ 4.0))) - t_1))))) + 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[(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 * N[(0.3333333333333333 - N[(N[(N[(-0.3333333333333333 * N[(t$95$0 / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Power[N[Sin[x], $MachinePrecision], 4.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - t$95$1), $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(\left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right) + \varepsilon \cdot \left(0.3333333333333333 - \left(\left(-0.3333333333333333 \cdot \frac{t\_0}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} - \frac{{\sin x}^{4}}{{\cos x}^{4}}\right) - t\_1\right)\right)\right) + 1\right)\right)
\end{array}
\end{array}
Initial program 61.0%
add-cbrt-cube25.0%
pow1/324.8%
pow324.8%
Applied egg-rr24.8%
tan-sum25.1%
div-inv25.0%
fmm-def25.0%
Applied egg-rr25.0%
Taylor expanded in eps around 0 99.9%
unpow299.9%
cos-mult99.9%
Applied egg-rr99.9%
+-commutative99.9%
+-inverses99.9%
cos-099.9%
count-299.9%
*-commutative99.9%
Simplified99.9%
Final simplification99.9%
(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
(+
(+ (/ (sin x) (cos x)) (/ (pow (sin x) 3.0) (pow (cos x) 3.0)))
(*
eps
(-
0.3333333333333333
(-
(-
(* -0.3333333333333333 (/ t_0 (- 1.0 (pow x 2.0))))
(/ (pow (sin x) 4.0) (pow (cos x) 4.0)))
t_1)))))
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 * (((sin(x) / cos(x)) + (pow(sin(x), 3.0) / pow(cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / (1.0 - pow(x, 2.0)))) - (pow(sin(x), 4.0) / pow(cos(x), 4.0))) - t_1))))) + 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 * (((sin(x) / cos(x)) + ((sin(x) ** 3.0d0) / (cos(x) ** 3.0d0))) + (eps * (0.3333333333333333d0 - ((((-0.3333333333333333d0) * (t_0 / (1.0d0 - (x ** 2.0d0)))) - ((sin(x) ** 4.0d0) / (cos(x) ** 4.0d0))) - t_1))))) + 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 * (((Math.sin(x) / Math.cos(x)) + (Math.pow(Math.sin(x), 3.0) / Math.pow(Math.cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / (1.0 - Math.pow(x, 2.0)))) - (Math.pow(Math.sin(x), 4.0) / Math.pow(Math.cos(x), 4.0))) - t_1))))) + 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 * (((math.sin(x) / math.cos(x)) + (math.pow(math.sin(x), 3.0) / math.pow(math.cos(x), 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / (1.0 - math.pow(x, 2.0)))) - (math.pow(math.sin(x), 4.0) / math.pow(math.cos(x), 4.0))) - t_1))))) + 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(Float64(sin(x) / cos(x)) + Float64((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + Float64(eps * Float64(0.3333333333333333 - Float64(Float64(Float64(-0.3333333333333333 * Float64(t_0 / Float64(1.0 - (x ^ 2.0)))) - Float64((sin(x) ^ 4.0) / (cos(x) ^ 4.0))) - t_1))))) + 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 * (((sin(x) / cos(x)) + ((sin(x) ^ 3.0) / (cos(x) ^ 3.0))) + (eps * (0.3333333333333333 - (((-0.3333333333333333 * (t_0 / (1.0 - (x ^ 2.0)))) - ((sin(x) ^ 4.0) / (cos(x) ^ 4.0))) - t_1))))) + 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[(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 * N[(0.3333333333333333 - N[(N[(N[(-0.3333333333333333 * N[(t$95$0 / N[(1.0 - N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Power[N[Sin[x], $MachinePrecision], 4.0], $MachinePrecision] / N[Power[N[Cos[x], $MachinePrecision], 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - t$95$1), $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(\left(\frac{\sin x}{\cos x} + \frac{{\sin x}^{3}}{{\cos x}^{3}}\right) + \varepsilon \cdot \left(0.3333333333333333 - \left(\left(-0.3333333333333333 \cdot \frac{t\_0}{1 - {x}^{2}} - \frac{{\sin x}^{4}}{{\cos x}^{4}}\right) - t\_1\right)\right)\right) + 1\right)\right)
\end{array}
\end{array}
Initial program 61.0%
add-cbrt-cube25.0%
pow1/324.8%
pow324.8%
Applied egg-rr24.8%
tan-sum25.1%
div-inv25.0%
fmm-def25.0%
Applied egg-rr25.0%
Taylor expanded in eps around 0 99.9%
Taylor expanded in x around 0 99.9%
mul-1-neg99.9%
unsub-neg99.9%
Simplified99.9%
Final simplification99.9%
(FPCore (x eps)
:precision binary64
(let* ((t_0 (pow (sin x) 2.0)))
(*
eps
(+
(/ t_0 (pow (cos x) 2.0))
(+
(*
eps
(+
(* eps 0.3333333333333333)
(/
(* (sin x) (+ (/ t_0 (/ (+ (cos (* x 2.0)) 1.0) 2.0)) 1.0))
(cos x))))
1.0)))))
double code(double x, double eps) {
double t_0 = pow(sin(x), 2.0);
return eps * ((t_0 / pow(cos(x), 2.0)) + ((eps * ((eps * 0.3333333333333333) + ((sin(x) * ((t_0 / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 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
code = eps * ((t_0 / (cos(x) ** 2.0d0)) + ((eps * ((eps * 0.3333333333333333d0) + ((sin(x) * ((t_0 / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + 1.0d0)) / cos(x)))) + 1.0d0))
end function
public static double code(double x, double eps) {
double t_0 = Math.pow(Math.sin(x), 2.0);
return eps * ((t_0 / Math.pow(Math.cos(x), 2.0)) + ((eps * ((eps * 0.3333333333333333) + ((Math.sin(x) * ((t_0 / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / Math.cos(x)))) + 1.0));
}
def code(x, eps): t_0 = math.pow(math.sin(x), 2.0) return eps * ((t_0 / math.pow(math.cos(x), 2.0)) + ((eps * ((eps * 0.3333333333333333) + ((math.sin(x) * ((t_0 / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / math.cos(x)))) + 1.0))
function code(x, eps) t_0 = sin(x) ^ 2.0 return Float64(eps * Float64(Float64(t_0 / (cos(x) ^ 2.0)) + Float64(Float64(eps * Float64(Float64(eps * 0.3333333333333333) + Float64(Float64(sin(x) * Float64(Float64(t_0 / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 1.0))) end
function tmp = code(x, eps) t_0 = sin(x) ^ 2.0; tmp = eps * ((t_0 / (cos(x) ^ 2.0)) + ((eps * ((eps * 0.3333333333333333) + ((sin(x) * ((t_0 / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 1.0)); end
code[x_, eps_] := Block[{t$95$0 = N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision]}, N[(eps * N[(N[(t$95$0 / N[Power[N[Cos[x], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision] + N[(N[(eps * N[(N[(eps * 0.3333333333333333), $MachinePrecision] + N[(N[(N[Sin[x], $MachinePrecision] * N[(N[(t$95$0 / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\sin x}^{2}\\
\varepsilon \cdot \left(\frac{t\_0}{{\cos x}^{2}} + \left(\varepsilon \cdot \left(\varepsilon \cdot 0.3333333333333333 + \frac{\sin x \cdot \left(\frac{t\_0}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + 1\right)}{\cos x}\right) + 1\right)\right)
\end{array}
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.9%
unpow299.9%
cos-mult99.9%
Applied egg-rr99.9%
+-commutative99.9%
+-inverses99.9%
cos-099.9%
count-299.9%
*-commutative99.9%
Simplified99.9%
Taylor expanded in x around 0 99.8%
*-commutative99.8%
Simplified99.8%
Final simplification99.8%
(FPCore (x eps)
:precision binary64
(let* ((t_0 (pow (sin x) 2.0)))
(*
eps
(+
(+
(/ t_0 (pow (cos x) 2.0))
(*
eps
(/
(* (sin x) (+ (/ t_0 (/ (+ (cos (* x 2.0)) 1.0) 2.0)) 1.0))
(cos x))))
1.0))))
double code(double x, double eps) {
double t_0 = pow(sin(x), 2.0);
return eps * (((t_0 / pow(cos(x), 2.0)) + (eps * ((sin(x) * ((t_0 / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 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
code = eps * (((t_0 / (cos(x) ** 2.0d0)) + (eps * ((sin(x) * ((t_0 / ((cos((x * 2.0d0)) + 1.0d0) / 2.0d0)) + 1.0d0)) / cos(x)))) + 1.0d0)
end function
public static double code(double x, double eps) {
double t_0 = Math.pow(Math.sin(x), 2.0);
return eps * (((t_0 / Math.pow(Math.cos(x), 2.0)) + (eps * ((Math.sin(x) * ((t_0 / ((Math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / Math.cos(x)))) + 1.0);
}
def code(x, eps): t_0 = math.pow(math.sin(x), 2.0) return eps * (((t_0 / math.pow(math.cos(x), 2.0)) + (eps * ((math.sin(x) * ((t_0 / ((math.cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / math.cos(x)))) + 1.0)
function code(x, eps) t_0 = sin(x) ^ 2.0 return Float64(eps * Float64(Float64(Float64(t_0 / (cos(x) ^ 2.0)) + Float64(eps * Float64(Float64(sin(x) * Float64(Float64(t_0 / Float64(Float64(cos(Float64(x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 1.0)) end
function tmp = code(x, eps) t_0 = sin(x) ^ 2.0; tmp = eps * (((t_0 / (cos(x) ^ 2.0)) + (eps * ((sin(x) * ((t_0 / ((cos((x * 2.0)) + 1.0) / 2.0)) + 1.0)) / cos(x)))) + 1.0); end
code[x_, eps_] := Block[{t$95$0 = N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision]}, N[(eps * N[(N[(N[(t$95$0 / N[Power[N[Cos[x], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision] + N[(eps * N[(N[(N[Sin[x], $MachinePrecision] * N[(N[(t$95$0 / N[(N[(N[Cos[N[(x * 2.0), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision] / N[Cos[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\sin x}^{2}\\
\varepsilon \cdot \left(\left(\frac{t\_0}{{\cos x}^{2}} + \varepsilon \cdot \frac{\sin x \cdot \left(\frac{t\_0}{\frac{\cos \left(x \cdot 2\right) + 1}{2}} + 1\right)}{\cos x}\right) + 1\right)
\end{array}
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
unpow299.9%
cos-mult99.9%
Applied egg-rr99.6%
+-commutative99.9%
+-inverses99.9%
cos-099.9%
count-299.9%
*-commutative99.9%
Simplified99.6%
Final simplification99.6%
(FPCore (x eps) :precision binary64 (* eps (+ (/ (pow (sin x) 2.0) (pow (cos x) 2.0)) (+ (* eps (+ x (* eps 0.3333333333333333))) 1.0))))
double code(double x, double eps) {
return eps * ((pow(sin(x), 2.0) / pow(cos(x), 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)) + ((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.pow(Math.cos(x), 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0));
}
def code(x, eps): return eps * ((math.pow(math.sin(x), 2.0) / math.pow(math.cos(x), 2.0)) + ((eps * (x + (eps * 0.3333333333333333))) + 1.0))
function code(x, eps) return Float64(eps * Float64(Float64((sin(x) ^ 2.0) / (cos(x) ^ 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)) + ((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[Power[N[Cos[x], $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}}{{\cos x}^{2}} + \left(\varepsilon \cdot \left(x + \varepsilon \cdot 0.3333333333333333\right) + 1\right)\right)
\end{array}
Initial program 61.0%
add-cbrt-cube25.0%
pow1/324.8%
pow324.8%
Applied egg-rr24.8%
tan-sum25.1%
div-inv25.0%
fmm-def25.0%
Applied egg-rr25.0%
Taylor expanded in eps around 0 99.9%
Taylor expanded in x around 0 99.3%
*-commutative99.3%
Simplified99.3%
Final simplification99.3%
(FPCore (x eps) :precision binary64 (+ eps (* eps (* (pow (sin x) 2.0) (pow (cos x) -2.0)))))
double code(double x, double eps) {
return eps + (eps * (pow(sin(x), 2.0) * pow(cos(x), -2.0)));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps + (eps * ((sin(x) ** 2.0d0) * (cos(x) ** (-2.0d0))))
end function
public static double code(double x, double eps) {
return eps + (eps * (Math.pow(Math.sin(x), 2.0) * Math.pow(Math.cos(x), -2.0)));
}
def code(x, eps): return eps + (eps * (math.pow(math.sin(x), 2.0) * math.pow(math.cos(x), -2.0)))
function code(x, eps) return Float64(eps + Float64(eps * Float64((sin(x) ^ 2.0) * (cos(x) ^ -2.0)))) end
function tmp = code(x, eps) tmp = eps + (eps * ((sin(x) ^ 2.0) * (cos(x) ^ -2.0))); end
code[x_, eps_] := N[(eps + N[(eps * N[(N[Power[N[Sin[x], $MachinePrecision], 2.0], $MachinePrecision] * N[Power[N[Cos[x], $MachinePrecision], -2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon + \varepsilon \cdot \left({\sin x}^{2} \cdot {\cos x}^{-2}\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
distribute-rgt-in99.1%
*-un-lft-identity99.1%
div-inv99.1%
pow-flip99.1%
metadata-eval99.1%
Applied egg-rr99.1%
Final simplification99.1%
(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.0%
Taylor expanded in eps around 0 99.1%
sub-neg99.1%
mul-1-neg99.1%
remove-double-neg99.1%
Simplified99.1%
unpow299.9%
cos-mult99.9%
Applied egg-rr99.1%
+-commutative99.9%
+-inverses99.9%
cos-099.9%
count-299.9%
*-commutative99.9%
Simplified99.1%
Final simplification99.1%
(FPCore (x eps)
:precision binary64
(*
eps
(+
(+
(* 0.3333333333333333 (pow eps 2.0))
(* x (+ eps (* x (+ (* 1.3333333333333333 (* eps eps)) 1.0)))))
1.0)))
double code(double x, double eps) {
return eps * (((0.3333333333333333 * pow(eps, 2.0)) + (x * (eps + (x * ((1.3333333333333333 * (eps * eps)) + 1.0))))) + 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.3333333333333333d0 * (eps * eps)) + 1.0d0))))) + 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.3333333333333333 * (eps * eps)) + 1.0))))) + 1.0);
}
def code(x, eps): return eps * (((0.3333333333333333 * math.pow(eps, 2.0)) + (x * (eps + (x * ((1.3333333333333333 * (eps * eps)) + 1.0))))) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64(Float64(0.3333333333333333 * (eps ^ 2.0)) + Float64(x * Float64(eps + Float64(x * Float64(Float64(1.3333333333333333 * Float64(eps * eps)) + 1.0))))) + 1.0)) end
function tmp = code(x, eps) tmp = eps * (((0.3333333333333333 * (eps ^ 2.0)) + (x * (eps + (x * ((1.3333333333333333 * (eps * eps)) + 1.0))))) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(N[(0.3333333333333333 * N[Power[eps, 2.0], $MachinePrecision]), $MachinePrecision] + N[(x * N[(eps + N[(x * N[(N[(1.3333333333333333 * N[(eps * eps), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\left(0.3333333333333333 \cdot {\varepsilon}^{2} + x \cdot \left(\varepsilon + x \cdot \left(1.3333333333333333 \cdot \left(\varepsilon \cdot \varepsilon\right) + 1\right)\right)\right) + 1\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.9%
Taylor expanded in x around 0 98.4%
unpow298.4%
Applied egg-rr98.4%
Final simplification98.4%
(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.0%
Taylor expanded in eps around 0 99.9%
Taylor expanded in x around 0 98.4%
Taylor expanded in eps around 0 98.4%
Final simplification98.4%
(FPCore (x eps)
:precision binary64
(*
eps
(+
(*
x
(+
eps
(*
x
(+ (* x (+ (* x 0.6666666666666666) (* eps 1.3333333333333333))) 1.0))))
1.0)))
double code(double x, double eps) {
return eps * ((x * (eps + (x * ((x * ((x * 0.6666666666666666) + (eps * 1.3333333333333333))) + 1.0)))) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * ((x * (eps + (x * ((x * ((x * 0.6666666666666666d0) + (eps * 1.3333333333333333d0))) + 1.0d0)))) + 1.0d0)
end function
public static double code(double x, double eps) {
return eps * ((x * (eps + (x * ((x * ((x * 0.6666666666666666) + (eps * 1.3333333333333333))) + 1.0)))) + 1.0);
}
def code(x, eps): return eps * ((x * (eps + (x * ((x * ((x * 0.6666666666666666) + (eps * 1.3333333333333333))) + 1.0)))) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64(x * Float64(eps + Float64(x * Float64(Float64(x * Float64(Float64(x * 0.6666666666666666) + Float64(eps * 1.3333333333333333))) + 1.0)))) + 1.0)) end
function tmp = code(x, eps) tmp = eps * ((x * (eps + (x * ((x * ((x * 0.6666666666666666) + (eps * 1.3333333333333333))) + 1.0)))) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(x * N[(eps + N[(x * N[(N[(x * N[(N[(x * 0.6666666666666666), $MachinePrecision] + N[(eps * 1.3333333333333333), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(x \cdot \left(\varepsilon + x \cdot \left(x \cdot \left(x \cdot 0.6666666666666666 + \varepsilon \cdot 1.3333333333333333\right) + 1\right)\right) + 1\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
Taylor expanded in x around 0 98.3%
associate--l+98.3%
*-commutative98.3%
distribute-rgt-out--98.3%
metadata-eval98.3%
Simplified98.3%
Final simplification98.3%
(FPCore (x eps) :precision binary64 (* eps (+ (* x (+ eps (* x (+ (* x (* eps 1.3333333333333333)) 1.0)))) 1.0)))
double code(double x, double eps) {
return eps * ((x * (eps + (x * ((x * (eps * 1.3333333333333333)) + 1.0)))) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * ((x * (eps + (x * ((x * (eps * 1.3333333333333333d0)) + 1.0d0)))) + 1.0d0)
end function
public static double code(double x, double eps) {
return eps * ((x * (eps + (x * ((x * (eps * 1.3333333333333333)) + 1.0)))) + 1.0);
}
def code(x, eps): return eps * ((x * (eps + (x * ((x * (eps * 1.3333333333333333)) + 1.0)))) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64(x * Float64(eps + Float64(x * Float64(Float64(x * Float64(eps * 1.3333333333333333)) + 1.0)))) + 1.0)) end
function tmp = code(x, eps) tmp = eps * ((x * (eps + (x * ((x * (eps * 1.3333333333333333)) + 1.0)))) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(x * N[(eps + N[(x * N[(N[(x * N[(eps * 1.3333333333333333), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(x \cdot \left(\varepsilon + x \cdot \left(x \cdot \left(\varepsilon \cdot 1.3333333333333333\right) + 1\right)\right) + 1\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
Taylor expanded in x around 0 98.2%
distribute-rgt-out--98.2%
metadata-eval98.2%
Simplified98.2%
Final simplification98.2%
(FPCore (x eps) :precision binary64 (+ eps (* x (* eps (+ eps x)))))
double code(double x, double eps) {
return eps + (x * (eps * (eps + x)));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps + (x * (eps * (eps + x)))
end function
public static double code(double x, double eps) {
return eps + (x * (eps * (eps + x)));
}
def code(x, eps): return eps + (x * (eps * (eps + x)))
function code(x, eps) return Float64(eps + Float64(x * Float64(eps * Float64(eps + x)))) end
function tmp = code(x, eps) tmp = eps + (x * (eps * (eps + x))); end
code[x_, eps_] := N[(eps + N[(x * N[(eps * N[(eps + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon + x \cdot \left(\varepsilon \cdot \left(\varepsilon + x\right)\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
Taylor expanded in x around 0 98.2%
+-commutative98.2%
unpow298.2%
distribute-lft-out98.2%
Simplified98.2%
(FPCore (x eps) :precision binary64 (+ eps (* eps (* eps x))))
double code(double x, double eps) {
return eps + (eps * (eps * x));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps + (eps * (eps * x))
end function
public static double code(double x, double eps) {
return eps + (eps * (eps * x));
}
def code(x, eps): return eps + (eps * (eps * x))
function code(x, eps) return Float64(eps + Float64(eps * Float64(eps * x))) end
function tmp = code(x, eps) tmp = eps + (eps * (eps * x)); end
code[x_, eps_] := N[(eps + N[(eps * N[(eps * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon + \varepsilon \cdot \left(\varepsilon \cdot x\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
Taylor expanded in x around 0 97.9%
distribute-rgt-in97.9%
*-un-lft-identity97.9%
Applied egg-rr97.9%
Final simplification97.9%
(FPCore (x eps) :precision binary64 (* eps (+ (* eps x) 1.0)))
double code(double x, double eps) {
return eps * ((eps * x) + 1.0);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps * ((eps * x) + 1.0d0)
end function
public static double code(double x, double eps) {
return eps * ((eps * x) + 1.0);
}
def code(x, eps): return eps * ((eps * x) + 1.0)
function code(x, eps) return Float64(eps * Float64(Float64(eps * x) + 1.0)) end
function tmp = code(x, eps) tmp = eps * ((eps * x) + 1.0); end
code[x_, eps_] := N[(eps * N[(N[(eps * x), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon \cdot \left(\varepsilon \cdot x + 1\right)
\end{array}
Initial program 61.0%
Taylor expanded in eps around 0 99.5%
associate--l+99.6%
associate-/l*99.6%
mul-1-neg99.6%
mul-1-neg99.6%
Simplified99.6%
Taylor expanded in x around 0 97.9%
Final simplification97.9%
(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.0%
Taylor expanded in x around 0 97.9%
Taylor expanded in eps around 0 97.9%
(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}
(FPCore (x eps) :precision binary64 (- (/ (+ (tan x) (tan eps)) (- 1.0 (* (tan x) (tan eps)))) (tan x)))
double code(double x, double eps) {
return ((tan(x) + tan(eps)) / (1.0 - (tan(x) * tan(eps)))) - tan(x);
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = ((tan(x) + tan(eps)) / (1.0d0 - (tan(x) * tan(eps)))) - tan(x)
end function
public static double code(double x, double eps) {
return ((Math.tan(x) + Math.tan(eps)) / (1.0 - (Math.tan(x) * Math.tan(eps)))) - Math.tan(x);
}
def code(x, eps): return ((math.tan(x) + math.tan(eps)) / (1.0 - (math.tan(x) * math.tan(eps)))) - math.tan(x)
function code(x, eps) return Float64(Float64(Float64(tan(x) + tan(eps)) / Float64(1.0 - Float64(tan(x) * tan(eps)))) - tan(x)) end
function tmp = code(x, eps) tmp = ((tan(x) + tan(eps)) / (1.0 - (tan(x) * tan(eps)))) - tan(x); end
code[x_, eps_] := N[(N[(N[(N[Tan[x], $MachinePrecision] + N[Tan[eps], $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(N[Tan[x], $MachinePrecision] * N[Tan[eps], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[Tan[x], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon} - \tan x
\end{array}
(FPCore (x eps) :precision binary64 (+ eps (* (* eps (tan x)) (tan x))))
double code(double x, double eps) {
return eps + ((eps * tan(x)) * tan(x));
}
real(8) function code(x, eps)
real(8), intent (in) :: x
real(8), intent (in) :: eps
code = eps + ((eps * tan(x)) * tan(x))
end function
public static double code(double x, double eps) {
return eps + ((eps * Math.tan(x)) * Math.tan(x));
}
def code(x, eps): return eps + ((eps * math.tan(x)) * math.tan(x))
function code(x, eps) return Float64(eps + Float64(Float64(eps * tan(x)) * tan(x))) end
function tmp = code(x, eps) tmp = eps + ((eps * tan(x)) * tan(x)); end
code[x_, eps_] := N[(eps + N[(N[(eps * N[Tan[x], $MachinePrecision]), $MachinePrecision] * N[Tan[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\varepsilon + \left(\varepsilon \cdot \tan x\right) \cdot \tan x
\end{array}
herbie shell --seed 2024185
(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)))))
:alt
(! :herbie-platform default (- (/ (+ (tan x) (tan eps)) (- 1 (* (tan x) (tan eps)))) (tan x)))
:alt
(! :herbie-platform default (+ eps (* eps (tan x) (tan x))))
(- (tan (+ x eps)) (tan x)))