- Split input into 3 regimes
if (- (- (* (cos x) (cos eps)) (* (sin x) (sin eps))) (cos x)) < -4.717645683306737e-08
Initial program 21.2
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm Applied cos-sum0.8
\[\leadsto \color{blue}{\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right)} - \cos x\]
Applied associate--l-0.9
\[\leadsto \color{blue}{\cos x \cdot \cos \varepsilon - \left(\sin x \cdot \sin \varepsilon + \cos x\right)}\]
if -4.717645683306737e-08 < (- (- (* (cos x) (cos eps)) (* (sin x) (sin eps))) (cos x)) < 1.113096032716299e-06
Initial program 49.6
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm Applied diff-cos37.9
\[\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)}\]
Simplified0.4
\[\leadsto -2 \cdot \color{blue}{\left(\sin \left(\frac{\left(x + x\right) + \varepsilon}{2}\right) \cdot \sin \left(\frac{\varepsilon}{2}\right)\right)}\]
if 1.113096032716299e-06 < (- (- (* (cos x) (cos eps)) (* (sin x) (sin eps))) (cos x))
Initial program 58.5
\[\cos \left(x + \varepsilon\right) - \cos x\]
- Using strategy
rm Applied cos-sum0.9
\[\leadsto \color{blue}{\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right)} - \cos x\]
- Recombined 3 regimes into one program.
Final simplification0.6
\[\leadsto \begin{array}{l}
\mathbf{if}\;\left(\cos \varepsilon \cdot \cos x - \sin x \cdot \sin \varepsilon\right) - \cos x \le -4.717645683306737 \cdot 10^{-08}:\\
\;\;\;\;\cos \varepsilon \cdot \cos x - \left(\sin x \cdot \sin \varepsilon + \cos x\right)\\
\mathbf{elif}\;\left(\cos \varepsilon \cdot \cos x - \sin x \cdot \sin \varepsilon\right) - \cos x \le 1.113096032716299 \cdot 10^{-06}:\\
\;\;\;\;\left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\varepsilon + \left(x + x\right)}{2}\right)\right) \cdot -2\\
\mathbf{else}:\\
\;\;\;\;\left(\cos \varepsilon \cdot \cos x - \sin x \cdot \sin \varepsilon\right) - \cos x\\
\end{array}\]