| Alternative 1 | |
|---|---|
| Accuracy | 99.5% |
| Cost | 39360 |
(FPCore (x eps) :precision binary64 (- (cos (+ x eps)) (cos x)))
(FPCore (x eps) :precision binary64 (let* ((t_0 (sin (* 0.5 eps)))) (* -2.0 (fma (* (cos x) t_0) t_0 (* t_0 (* (sin x) (cos (* 0.5 eps))))))))
double code(double x, double eps) {
return cos((x + eps)) - cos(x);
}
double code(double x, double eps) {
double t_0 = sin((0.5 * eps));
return -2.0 * fma((cos(x) * t_0), t_0, (t_0 * (sin(x) * cos((0.5 * eps)))));
}
function code(x, eps) return Float64(cos(Float64(x + eps)) - cos(x)) end
function code(x, eps) t_0 = sin(Float64(0.5 * eps)) return Float64(-2.0 * fma(Float64(cos(x) * t_0), t_0, Float64(t_0 * Float64(sin(x) * cos(Float64(0.5 * eps)))))) end
code[x_, eps_] := N[(N[Cos[N[(x + eps), $MachinePrecision]], $MachinePrecision] - N[Cos[x], $MachinePrecision]), $MachinePrecision]
code[x_, eps_] := Block[{t$95$0 = N[Sin[N[(0.5 * eps), $MachinePrecision]], $MachinePrecision]}, N[(-2.0 * N[(N[(N[Cos[x], $MachinePrecision] * t$95$0), $MachinePrecision] * t$95$0 + N[(t$95$0 * N[(N[Sin[x], $MachinePrecision] * N[Cos[N[(0.5 * eps), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\cos \left(x + \varepsilon\right) - \cos x
\begin{array}{l}
t_0 := \sin \left(0.5 \cdot \varepsilon\right)\\
-2 \cdot \mathsf{fma}\left(\cos x \cdot t_0, t_0, t_0 \cdot \left(\sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right)\right)
\end{array}
Initial program 38.2%
Applied egg-rr47.1%
[Start]38.2 | \[ \cos \left(x + \varepsilon\right) - \cos x
\] |
|---|---|
diff-cos [=>]47.1 | \[ \color{blue}{-2 \cdot \left(\sin \left(\frac{\left(x + \varepsilon\right) - x}{2}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)}
\] |
div-inv [=>]47.1 | \[ -2 \cdot \left(\sin \color{blue}{\left(\left(\left(x + \varepsilon\right) - x\right) \cdot \frac{1}{2}\right)} \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)
\] |
metadata-eval [=>]47.1 | \[ -2 \cdot \left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot \color{blue}{0.5}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)
\] |
div-inv [=>]47.1 | \[ -2 \cdot \left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot \sin \color{blue}{\left(\left(\left(x + \varepsilon\right) + x\right) \cdot \frac{1}{2}\right)}\right)
\] |
+-commutative [=>]47.1 | \[ -2 \cdot \left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot \sin \left(\color{blue}{\left(x + \left(x + \varepsilon\right)\right)} \cdot \frac{1}{2}\right)\right)
\] |
metadata-eval [=>]47.1 | \[ -2 \cdot \left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot \color{blue}{0.5}\right)\right)
\] |
Simplified76.5%
[Start]47.1 | \[ -2 \cdot \left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
|---|---|
associate-*r* [=>]47.1 | \[ \color{blue}{\left(-2 \cdot \sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right)\right) \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)}
\] |
*-commutative [=>]47.1 | \[ \color{blue}{\left(\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot -2\right)} \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)
\] |
associate-*l* [=>]47.1 | \[ \color{blue}{\sin \left(\left(\left(x + \varepsilon\right) - x\right) \cdot 0.5\right) \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)}
\] |
*-commutative [=>]47.1 | \[ \sin \color{blue}{\left(0.5 \cdot \left(\left(x + \varepsilon\right) - x\right)\right)} \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
+-commutative [<=]47.1 | \[ \sin \left(0.5 \cdot \left(\color{blue}{\left(\varepsilon + x\right)} - x\right)\right) \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
associate--l+ [=>]76.5 | \[ \sin \left(0.5 \cdot \color{blue}{\left(\varepsilon + \left(x - x\right)\right)}\right) \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
+-inverses [=>]76.5 | \[ \sin \left(0.5 \cdot \left(\varepsilon + \color{blue}{0}\right)\right) \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
distribute-lft-in [=>]76.5 | \[ \sin \color{blue}{\left(0.5 \cdot \varepsilon + 0.5 \cdot 0\right)} \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
metadata-eval [=>]76.5 | \[ \sin \left(0.5 \cdot \varepsilon + \color{blue}{0}\right) \cdot \left(-2 \cdot \sin \left(\left(x + \left(x + \varepsilon\right)\right) \cdot 0.5\right)\right)
\] |
*-commutative [=>]76.5 | \[ \sin \left(0.5 \cdot \varepsilon + 0\right) \cdot \left(-2 \cdot \sin \color{blue}{\left(0.5 \cdot \left(x + \left(x + \varepsilon\right)\right)\right)}\right)
\] |
+-commutative [<=]76.5 | \[ \sin \left(0.5 \cdot \varepsilon + 0\right) \cdot \left(-2 \cdot \sin \left(0.5 \cdot \left(x + \color{blue}{\left(\varepsilon + x\right)}\right)\right)\right)
\] |
Taylor expanded in x around -inf 76.5%
Applied egg-rr99.4%
[Start]76.5 | \[ -2 \cdot \left(\sin \left(0.5 \cdot \left(\varepsilon - -2 \cdot x\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
|---|---|
sub-neg [=>]76.5 | \[ -2 \cdot \left(\sin \left(0.5 \cdot \color{blue}{\left(\varepsilon + \left(--2 \cdot x\right)\right)}\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
distribute-lft-in [=>]76.5 | \[ -2 \cdot \left(\sin \color{blue}{\left(0.5 \cdot \varepsilon + 0.5 \cdot \left(--2 \cdot x\right)\right)} \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
sin-sum [=>]99.4 | \[ -2 \cdot \left(\color{blue}{\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(--2 \cdot x\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(--2 \cdot x\right)\right)\right)} \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-commutative [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(-\color{blue}{x \cdot -2}\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(--2 \cdot x\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
distribute-rgt-neg-in [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \color{blue}{\left(x \cdot \left(--2\right)\right)}\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(--2 \cdot x\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
metadata-eval [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(x \cdot \color{blue}{2}\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(--2 \cdot x\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-commutative [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(x \cdot 2\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(-\color{blue}{x \cdot -2}\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
distribute-rgt-neg-in [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(x \cdot 2\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \color{blue}{\left(x \cdot \left(--2\right)\right)}\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
metadata-eval [=>]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(x \cdot 2\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(x \cdot \color{blue}{2}\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
Simplified99.5%
[Start]99.4 | \[ -2 \cdot \left(\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \cos \left(0.5 \cdot \left(x \cdot 2\right)\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(x \cdot 2\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
|---|---|
*-commutative [=>]99.4 | \[ -2 \cdot \left(\left(\color{blue}{\cos \left(0.5 \cdot \left(x \cdot 2\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)} + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(x \cdot 2\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-commutative [<=]99.4 | \[ -2 \cdot \left(\left(\cos \color{blue}{\left(\left(x \cdot 2\right) \cdot 0.5\right)} \cdot \sin \left(0.5 \cdot \varepsilon\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(0.5 \cdot \left(x \cdot 2\right)\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-commutative [<=]99.4 | \[ -2 \cdot \left(\left(\cos \left(\left(x \cdot 2\right) \cdot 0.5\right) \cdot \sin \left(0.5 \cdot \varepsilon\right) + \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \color{blue}{\left(\left(x \cdot 2\right) \cdot 0.5\right)}\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
fma-def [=>]99.4 | \[ -2 \cdot \left(\color{blue}{\mathsf{fma}\left(\cos \left(\left(x \cdot 2\right) \cdot 0.5\right), \sin \left(0.5 \cdot \varepsilon\right), \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(\left(x \cdot 2\right) \cdot 0.5\right)\right)} \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
associate-*l* [=>]99.4 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos \color{blue}{\left(x \cdot \left(2 \cdot 0.5\right)\right)}, \sin \left(0.5 \cdot \varepsilon\right), \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(\left(x \cdot 2\right) \cdot 0.5\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
metadata-eval [=>]99.4 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos \left(x \cdot \color{blue}{1}\right), \sin \left(0.5 \cdot \varepsilon\right), \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(\left(x \cdot 2\right) \cdot 0.5\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-rgt-identity [=>]99.4 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos \color{blue}{x}, \sin \left(0.5 \cdot \varepsilon\right), \cos \left(0.5 \cdot \varepsilon\right) \cdot \sin \left(\left(x \cdot 2\right) \cdot 0.5\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-commutative [=>]99.4 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \color{blue}{\sin \left(\left(x \cdot 2\right) \cdot 0.5\right) \cdot \cos \left(0.5 \cdot \varepsilon\right)}\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
associate-*l* [=>]99.5 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \sin \color{blue}{\left(x \cdot \left(2 \cdot 0.5\right)\right)} \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
metadata-eval [=>]99.5 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \sin \left(x \cdot \color{blue}{1}\right) \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
*-rgt-identity [=>]99.5 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \sin \color{blue}{x} \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
Applied egg-rr99.4%
[Start]99.5 | \[ -2 \cdot \left(\mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)
\] |
|---|---|
*-commutative [=>]99.5 | \[ -2 \cdot \color{blue}{\left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \mathsf{fma}\left(\cos x, \sin \left(0.5 \cdot \varepsilon\right), \sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right)\right)}
\] |
fma-udef [=>]99.4 | \[ -2 \cdot \left(\sin \left(0.5 \cdot \varepsilon\right) \cdot \color{blue}{\left(\cos x \cdot \sin \left(0.5 \cdot \varepsilon\right) + \sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right)}\right)
\] |
distribute-rgt-in [=>]99.4 | \[ -2 \cdot \color{blue}{\left(\left(\cos x \cdot \sin \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right) + \left(\sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)}
\] |
fma-def [=>]99.4 | \[ -2 \cdot \color{blue}{\mathsf{fma}\left(\cos x \cdot \sin \left(0.5 \cdot \varepsilon\right), \sin \left(0.5 \cdot \varepsilon\right), \left(\sin x \cdot \cos \left(0.5 \cdot \varepsilon\right)\right) \cdot \sin \left(0.5 \cdot \varepsilon\right)\right)}
\] |
Final simplification99.4%
| Alternative 1 | |
|---|---|
| Accuracy | 99.5% |
| Cost | 39360 |
| Alternative 2 | |
|---|---|
| Accuracy | 99.4% |
| Cost | 33088 |
| Alternative 3 | |
|---|---|
| Accuracy | 99.2% |
| Cost | 32841 |
| Alternative 4 | |
|---|---|
| Accuracy | 76.9% |
| Cost | 13769 |
| Alternative 5 | |
|---|---|
| Accuracy | 76.9% |
| Cost | 13641 |
| Alternative 6 | |
|---|---|
| Accuracy | 76.5% |
| Cost | 13632 |
| Alternative 7 | |
|---|---|
| Accuracy | 76.5% |
| Cost | 13632 |
| Alternative 8 | |
|---|---|
| Accuracy | 67.7% |
| Cost | 13380 |
| Alternative 9 | |
|---|---|
| Accuracy | 67.7% |
| Cost | 13316 |
| Alternative 10 | |
|---|---|
| Accuracy | 67.7% |
| Cost | 13257 |
| Alternative 11 | |
|---|---|
| Accuracy | 67.2% |
| Cost | 6921 |
| Alternative 12 | |
|---|---|
| Accuracy | 47.3% |
| Cost | 6857 |
| Alternative 13 | |
|---|---|
| Accuracy | 21.2% |
| Cost | 320 |
| Alternative 14 | |
|---|---|
| Accuracy | 12.9% |
| Cost | 64 |
herbie shell --seed 2023152
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
:precision binary64
(- (cos (+ x eps)) (cos x)))