- Split input into 3 regimes
if (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1))) < -1.630811661951327e-05
Initial program 0.0
\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
Initial simplification0.0
\[\leadsto \left(\frac{1}{x - 1} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
- Using strategy
rm Applied add-cube-cbrt0.0
\[\leadsto \left(\frac{1}{\color{blue}{\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}}} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
Applied associate-/r*0.0
\[\leadsto \left(\color{blue}{\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}}} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
- Using strategy
rm Applied flip-+0.0
\[\leadsto \color{blue}{\frac{\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} \cdot \frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1} \cdot \frac{1}{x + 1}}{\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1}}} - \frac{2}{x}\]
Applied frac-sub0.0
\[\leadsto \color{blue}{\frac{\left(\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} \cdot \frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1} \cdot \frac{1}{x + 1}\right) \cdot x - \left(\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1}\right) \cdot 2}{\left(\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1}\right) \cdot x}}\]
Simplified0.1
\[\leadsto \frac{\color{blue}{(x \cdot \left(\left(\frac{1}{x - 1} - \frac{1}{x + 1}\right) \cdot \left(\frac{1}{x - 1} + \frac{1}{x + 1}\right)\right) + \left(\left(-2\right) \cdot \left(\frac{1}{x - 1} - \frac{1}{x + 1}\right)\right))_*}}{\left(\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}} - \frac{1}{x + 1}\right) \cdot x}\]
Simplified0.0
\[\leadsto \frac{(x \cdot \left(\left(\frac{1}{x - 1} - \frac{1}{x + 1}\right) \cdot \left(\frac{1}{x - 1} + \frac{1}{x + 1}\right)\right) + \left(\left(-2\right) \cdot \left(\frac{1}{x - 1} - \frac{1}{x + 1}\right)\right))_*}{\color{blue}{\left(\frac{1}{x - 1} - \frac{1}{x + 1}\right) \cdot x}}\]
if -1.630811661951327e-05 < (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1))) < 4.0031040743915335e-11
Initial program 20.1
\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
Initial simplification20.1
\[\leadsto \left(\frac{1}{x - 1} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
Taylor expanded around inf 0.6
\[\leadsto \color{blue}{2 \cdot \frac{1}{{x}^{3}} + \left(2 \cdot \frac{1}{{x}^{5}} + 2 \cdot \frac{1}{{x}^{7}}\right)}\]
Simplified0.1
\[\leadsto \color{blue}{\left(\frac{2}{{x}^{7}} + \frac{2}{{x}^{5}}\right) + \frac{\frac{2}{x}}{x \cdot x}}\]
- Using strategy
rm Applied associate-/r*0.2
\[\leadsto \left(\frac{2}{{x}^{7}} + \frac{2}{{x}^{5}}\right) + \color{blue}{\frac{\frac{\frac{2}{x}}{x}}{x}}\]
if 4.0031040743915335e-11 < (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1)))
Initial program 0.1
\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
Initial simplification0.1
\[\leadsto \left(\frac{1}{x - 1} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
- Using strategy
rm Applied add-cube-cbrt0.1
\[\leadsto \left(\frac{1}{\color{blue}{\left(\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}\right) \cdot \sqrt[3]{x - 1}}} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
Applied associate-/r*0.1
\[\leadsto \left(\color{blue}{\frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}}} + \frac{1}{x + 1}\right) - \frac{2}{x}\]
- Recombined 3 regimes into one program.
Final simplification0.1
\[\leadsto \begin{array}{l}
\mathbf{if}\;\frac{1}{x - 1} + \left(\frac{1}{x + 1} - \frac{2}{x}\right) \le -1.630811661951327 \cdot 10^{-05}:\\
\;\;\;\;\frac{(x \cdot \left(\left(\frac{1}{x - 1} + \frac{1}{x + 1}\right) \cdot \left(\frac{1}{x - 1} - \frac{1}{x + 1}\right)\right) + \left(\left(-2\right) \cdot \left(\frac{1}{x - 1} - \frac{1}{x + 1}\right)\right))_*}{\left(\frac{1}{x - 1} - \frac{1}{x + 1}\right) \cdot x}\\
\mathbf{elif}\;\frac{1}{x - 1} + \left(\frac{1}{x + 1} - \frac{2}{x}\right) \le 4.0031040743915335 \cdot 10^{-11}:\\
\;\;\;\;\left(\frac{2}{{x}^{5}} + \frac{2}{{x}^{7}}\right) + \frac{\frac{\frac{2}{x}}{x}}{x}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{x + 1} + \frac{\frac{1}{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}}{\sqrt[3]{x - 1}}\right) - \frac{2}{x}\\
\end{array}\]