- Split input into 2 regimes
if (+ (* x (pow eps 2)) (+ eps (* (pow x 2) (pow eps 3)))) < -4.980475368445208e-09 or 4.52257594695826e-27 < (+ (* x (pow eps 2)) (+ eps (* (pow x 2) (pow eps 3))))
Initial program 36.3
\[\tan \left(x + \varepsilon\right) - \tan x\]
- Using strategy
rm Applied tan-sum13.2
\[\leadsto \color{blue}{\frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}} - \tan x\]
- Using strategy
rm Applied tan-quot13.2
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \color{blue}{\frac{\sin \varepsilon}{\cos \varepsilon}}} - \tan x\]
Applied tan-quot13.2
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \color{blue}{\frac{\sin x}{\cos x}} \cdot \frac{\sin \varepsilon}{\cos \varepsilon}} - \tan x\]
Applied frac-times13.2
\[\leadsto \frac{\tan x + \tan \varepsilon}{1 - \color{blue}{\frac{\sin x \cdot \sin \varepsilon}{\cos x \cdot \cos \varepsilon}}} - \tan x\]
if -4.980475368445208e-09 < (+ (* x (pow eps 2)) (+ eps (* (pow x 2) (pow eps 3)))) < 4.52257594695826e-27
Initial program 38.3
\[\tan \left(x + \varepsilon\right) - \tan x\]
Taylor expanded around 0 15.8
\[\leadsto \color{blue}{x \cdot {\varepsilon}^{2} + \left(\varepsilon + {x}^{2} \cdot {\varepsilon}^{3}\right)}\]
- Recombined 2 regimes into one program.
Final simplification14.0
\[\leadsto \begin{array}{l}
\mathbf{if}\;{\varepsilon}^{2} \cdot x + \left(\varepsilon + {\varepsilon}^{3} \cdot {x}^{2}\right) \le -4.980475368445208 \cdot 10^{-09}:\\
\;\;\;\;\frac{\tan x + \tan \varepsilon}{1 - \frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon}} - \tan x\\
\mathbf{elif}\;{\varepsilon}^{2} \cdot x + \left(\varepsilon + {\varepsilon}^{3} \cdot {x}^{2}\right) \le 4.52257594695826 \cdot 10^{-27}:\\
\;\;\;\;{\varepsilon}^{2} \cdot x + \left(\varepsilon + {\varepsilon}^{3} \cdot {x}^{2}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\tan x + \tan \varepsilon}{1 - \frac{\sin \varepsilon \cdot \sin x}{\cos x \cdot \cos \varepsilon}} - \tan x\\
\end{array}\]