- Split input into 2 regimes
if x < -7533157453258729.0 or 116650.87853212819 < x
Initial program 59.9
\[\frac{x}{x + 1} - \frac{x + 1}{x - 1}\]
Taylor expanded around inf 0.3
\[\leadsto \color{blue}{-\left(3 \cdot \frac{1}{{x}^{3}} + \left(\frac{1}{{x}^{2}} + 3 \cdot \frac{1}{x}\right)\right)}\]
Simplified0.0
\[\leadsto \color{blue}{(\left(\frac{-1}{x \cdot x}\right) \cdot \left(\frac{3}{x}\right) + \left(\frac{-1}{x \cdot x} - \frac{3}{x}\right))_*}\]
if -7533157453258729.0 < x < 116650.87853212819
Initial program 0.6
\[\frac{x}{x + 1} - \frac{x + 1}{x - 1}\]
- Using strategy
rm Applied add-cube-cbrt0.7
\[\leadsto \frac{x}{x + 1} - \frac{x + 1}{\color{blue}{\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}}}\]
Applied *-un-lft-identity0.7
\[\leadsto \frac{x}{x + 1} - \frac{\color{blue}{1 \cdot \left(x + 1\right)}}{\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}}\]
Applied times-frac0.7
\[\leadsto \frac{x}{x + 1} - \color{blue}{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}} \cdot \frac{x + 1}{\sqrt[3]{x - 1}}}\]
- Using strategy
rm Applied frac-times0.7
\[\leadsto \frac{x}{x + 1} - \color{blue}{\frac{1 \cdot \left(x + 1\right)}{\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}}}\]
Applied frac-sub0.7
\[\leadsto \color{blue}{\frac{x \cdot \left(\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}\right) - \left(x + 1\right) \cdot \left(1 \cdot \left(x + 1\right)\right)}{\left(x + 1\right) \cdot \left(\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}\right)}}\]
Simplified0.1
\[\leadsto \frac{\color{blue}{(x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}}{\left(x + 1\right) \cdot \left(\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}\right)}\]
Simplified0.0
\[\leadsto \frac{(x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}{\color{blue}{(x \cdot \left(-1 + x\right) + \left(-1 + x\right))_*}}\]
- Using strategy
rm Applied *-un-lft-identity0.0
\[\leadsto \frac{(x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}{\color{blue}{1 \cdot (x \cdot \left(-1 + x\right) + \left(-1 + x\right))_*}}\]
Applied *-un-lft-identity0.0
\[\leadsto \frac{\color{blue}{1 \cdot (x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}}{1 \cdot (x \cdot \left(-1 + x\right) + \left(-1 + x\right))_*}\]
Applied times-frac0.0
\[\leadsto \color{blue}{\frac{1}{1} \cdot \frac{(x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}{(x \cdot \left(-1 + x\right) + \left(-1 + x\right))_*}}\]
Simplified0.0
\[\leadsto \color{blue}{1} \cdot \frac{(x \cdot \left(x - \left(x + 2\right)\right) + \left(-1 - x\right))_*}{(x \cdot \left(-1 + x\right) + \left(-1 + x\right))_*}\]
Simplified0.0
\[\leadsto 1 \cdot \color{blue}{\frac{x \cdot -3 + -1}{(x \cdot x + -1)_*}}\]
- Recombined 2 regimes into one program.
Final simplification0.0
\[\leadsto \begin{array}{l}
\mathbf{if}\;x \le -7533157453258729.0 \lor \neg \left(x \le 116650.87853212819\right):\\
\;\;\;\;(\left(\frac{-1}{x \cdot x}\right) \cdot \left(\frac{3}{x}\right) + \left(\frac{-1}{x \cdot x} - \frac{3}{x}\right))_*\\
\mathbf{else}:\\
\;\;\;\;\frac{-3 \cdot x + -1}{(x \cdot x + -1)_*}\\
\end{array}\]