Average Error: 39.2 → 1.4
Time: 29.8s
Precision: 64
Internal precision: 2432
\[\cos \left(x + \varepsilon\right) - \cos x\]
⬇
\[\begin{array}{l}
\mathbf{if}\;\varepsilon \le -112.33201140106196:\\
\;\;\;\;\cos x \cdot \cos \varepsilon - \left(\sin x \cdot \sin \varepsilon + \cos x\right)\\
\mathbf{if}\;\varepsilon \le 1.334180299375634 \cdot 10^{+24}:\\
\;\;\;\;-2 \cdot \left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\varepsilon + \left(x + x\right)}{2}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\
\end{array}\]
Derivation
- Split input into 3 regimes.
-
if eps < -112.33201140106196
Initial program 29.7
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm
Applied cos-sum 0.8
\[\leadsto \color{blue}{\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right)} - \cos x\]
Applied associate--l- 0.8
\[\leadsto \color{blue}{\cos x \cdot \cos \varepsilon - \left(\sin x \cdot \sin \varepsilon + \cos x\right)}\]
if -112.33201140106196 < eps < 1.334180299375634e+24
Initial program 47.9
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm
Applied diff-cos 37.4
\[\leadsto \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)}\]
Applied simplify 1.9
\[\leadsto -2 \cdot \color{blue}{\left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\varepsilon + \left(x + x\right)}{2}\right)\right)}\]
if 1.334180299375634e+24 < eps
Initial program 30.1
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm
Applied cos-sum 0.8
\[\leadsto \color{blue}{\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right)} - \cos x\]
- Recombined 3 regimes into one program.
- Removed slow pow expressions
Runtime
Please include this information when filing a bug report:
herbie shell --seed '#(1066500295 745726447 3908002351 725592315 4114972361 2368915013)'
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
(- (cos (+ x eps)) (cos x)))