- Split input into 3 regimes
if eps < -2.3620489864739888e-40
Initial program 30.8
\[\tan \left(x + \varepsilon\right) - \tan x\]
- Using strategy
rm Applied tan-sum3.6
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}} - \tan x\]
- Using strategy
rm Applied clear-num3.7
\[\leadsto \color{blue}{\frac{1}{\frac{1 - \tan x \cdot \tan \varepsilon}{\tan x + \tan \varepsilon}}} - \tan x\]
- Using strategy
rm Applied tan-quot3.7
\[\leadsto \frac{1}{\frac{1 - \tan x \cdot \tan \varepsilon}{\tan x + \tan \varepsilon}} - \color{blue}{\frac{\sin x}{\cos x}}\]
Applied frac-sub3.7
\[\leadsto \color{blue}{\frac{1 \cdot \cos x - \frac{1 - \tan x \cdot \tan \varepsilon}{\tan x + \tan \varepsilon} \cdot \sin x}{\frac{1 - \tan x \cdot \tan \varepsilon}{\tan x + \tan \varepsilon} \cdot \cos x}}\]
Applied simplify3.7
\[\leadsto \frac{\color{blue}{\cos x - \left(1 - \tan \varepsilon \cdot \tan x\right) \cdot \frac{\sin x}{\tan x + \tan \varepsilon}}}{\frac{1 - \tan x \cdot \tan \varepsilon}{\tan x + \tan \varepsilon} \cdot \cos x}\]
if -2.3620489864739888e-40 < eps < 1.5059506191485345e-46
Initial program 46.2
\[\tan \left(x + \varepsilon\right) - \tan x\]
Taylor expanded around 0 29.5
\[\leadsto \color{blue}{{\varepsilon}^{3} \cdot {x}^{2} + \left(\varepsilon + {\varepsilon}^{2} \cdot x\right)}\]
if 1.5059506191485345e-46 < eps
Initial program 30.0
\[\tan \left(x + \varepsilon\right) - \tan x\]
- Using strategy
rm Applied tan-quot29.8
\[\leadsto \tan \left(x + \varepsilon\right) - \color{blue}{\frac{\sin x}{\cos x}}\]
Applied tan-sum3.7
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}} - \frac{\sin x}{\cos x}\]
Applied frac-sub3.7
\[\leadsto \color{blue}{\frac{\left(\tan x + \tan \varepsilon\right) \cdot \cos x - \left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \sin x}{\left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \cos x}}\]
- Recombined 3 regimes into one program.
- Removed slow
pow expressions. Applied simplify14.7
\[\leadsto \color{blue}{\begin{array}{l}
\mathbf{if}\;\varepsilon \le -2.3620489864739888 \cdot 10^{-40}:\\
\;\;\;\;\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon} - \frac{\frac{\sin x}{\cos x}}{\tan x + \tan \varepsilon} \cdot \left(\tan x + \tan \varepsilon\right)\\
\mathbf{if}\;\varepsilon \le 1.5059506191485345 \cdot 10^{-46}:\\
\;\;\;\;\varepsilon \cdot \left(\left(x \cdot x\right) \cdot \left(\varepsilon \cdot \varepsilon\right) + \left(x \cdot \varepsilon + 1\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon} - \frac{\sin x}{\cos x}\\
\end{array}}\]