- Split input into 3 regimes
if (+ eps (+ (* (pow eps 3) (pow x 2)) (* (pow eps 2) x))) < -4.9186968565525686e-11
Initial program 36.9
\[\tan \left(x + \varepsilon\right) - \tan x\]
- Using strategy
rm Applied tan-sum10.6
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}} - \tan x\]
- Using strategy
rm Applied add-log-exp10.8
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \color{blue}{\log \left(e^{\tan x \cdot \tan \varepsilon}\right)}} - \tan x\]
- Using strategy
rm Applied tan-quot10.8
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \log \left(e^{\tan x \cdot \tan \varepsilon}\right)} - \color{blue}{\frac{\sin x}{\cos x}}\]
Applied frac-sub10.9
\[\leadsto \color{blue}{\frac{\left(\tan x + \tan \varepsilon\right) \cdot \cos x - \left(1 - \log \left(e^{\tan x \cdot \tan \varepsilon}\right)\right) \cdot \sin x}{\left(1 - \log \left(e^{\tan x \cdot \tan \varepsilon}\right)\right) \cdot \cos x}}\]
Applied simplify10.8
\[\leadsto \frac{\color{blue}{\tan x \cdot \left(\tan \varepsilon \cdot \sin x + \cos x\right) - \left(\sin x - \tan \varepsilon \cdot \cos x\right)}}{\left(1 - \log \left(e^{\tan x \cdot \tan \varepsilon}\right)\right) \cdot \cos x}\]
Applied simplify10.7
\[\leadsto \frac{\tan x \cdot \left(\tan \varepsilon \cdot \sin x + \cos x\right) - \left(\sin x - \tan \varepsilon \cdot \cos x\right)}{\color{blue}{\cos x - \left(\cos x \cdot \tan x\right) \cdot \tan \varepsilon}}\]
if -4.9186968565525686e-11 < (+ eps (+ (* (pow eps 3) (pow x 2)) (* (pow eps 2) x))) < 7.1739441105252405e-28
Initial program 39.8
\[\tan \left(x + \varepsilon\right) - \tan x\]
Taylor expanded around 0 16.3
\[\leadsto \color{blue}{\varepsilon + \left({\varepsilon}^{3} \cdot {x}^{2} + {\varepsilon}^{2} \cdot x\right)}\]
if 7.1739441105252405e-28 < (+ eps (+ (* (pow eps 3) (pow x 2)) (* (pow eps 2) x)))
Initial program 36.7
\[\tan \left(x + \varepsilon\right) - \tan x\]
- Using strategy
rm Applied tan-sum14.9
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}} - \tan x\]
- Using strategy
rm Applied tan-quot14.9
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \color{blue}{\frac{\sin \varepsilon}{\cos \varepsilon}}} - \tan x\]
Applied tan-quot14.9
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \color{blue}{\frac{\sin x}{\cos x}} \cdot \frac{\sin \varepsilon}{\cos \varepsilon}} - \tan x\]
Applied frac-times14.9
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \color{blue}{\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}}} - \tan x\]
- Using strategy
rm Applied flip3--14.9
\[\leadsto \frac{\tan x + \tan \varepsilon}{\color{blue}{\frac{{1}^{3} - {\left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)}^{3}}{1 \cdot 1 + \left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} + 1 \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)}}} - \tan x\]
Applied associate-/r/14.9
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{{1}^{3} - {\left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)}^{3}} \cdot \left(1 \cdot 1 + \left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} + 1 \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)\right)} - \tan x\]
Applied simplify14.9
\[\leadsto \color{blue}{\frac{\tan \varepsilon + \tan x}{1 - {\left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)}^{3}}} \cdot \left(1 \cdot 1 + \left(\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon} + 1 \cdot \frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}\right)\right) - \tan x\]
- Recombined 3 regimes into one program.
Applied simplify14.6
\[\leadsto \color{blue}{\begin{array}{l}
\mathbf{if}\;\left(x \cdot {\varepsilon}^{2} + {\varepsilon}^{3} \cdot {x}^{2}\right) + \varepsilon \le -4.9186968565525686 \cdot 10^{-11}:\\
\;\;\;\;\frac{\tan x \cdot \left(\tan \varepsilon \cdot \sin x + \cos x\right) - \left(\sin x - \tan \varepsilon \cdot \cos x\right)}{\cos x - \tan \varepsilon \cdot \left(\cos x \cdot \tan x\right)}\\
\mathbf{if}\;\left(x \cdot {\varepsilon}^{2} + {\varepsilon}^{3} \cdot {x}^{2}\right) + \varepsilon \le 7.1739441105252405 \cdot 10^{-28}:\\
\;\;\;\;\left(x \cdot {\varepsilon}^{2} + {\varepsilon}^{3} \cdot {x}^{2}\right) + \varepsilon\\
\mathbf{else}:\\
\;\;\;\;\frac{\tan \varepsilon + \tan x}{1 - {\left(\frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon}\right)}^{3}} \cdot \left(1 + \left(\frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon} \cdot \frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon} + \frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon}\right)\right) - \tan x\\
\end{array}}\]