- Split input into 3 regimes
if (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1))) < -3.9228475094830475e-25
Initial program 0.7
\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
- Using strategy
rm Applied frac-sub0.7
\[\leadsto \color{blue}{\frac{1 \cdot x - \left(x + 1\right) \cdot 2}{\left(x + 1\right) \cdot x}} + \frac{1}{x - 1}\]
Applied frac-add0.1
\[\leadsto \color{blue}{\frac{\left(1 \cdot x - \left(x + 1\right) \cdot 2\right) \cdot \left(x - 1\right) + \left(\left(x + 1\right) \cdot x\right) \cdot 1}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)}}\]
if -3.9228475094830475e-25 < (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1))) < 2.0215192664326125e-08
Initial program 19.5
\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
Taylor expanded around inf 0.5
\[\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.1
\[\leadsto \left(\frac{2}{{x}^{7}} + \frac{2}{{x}^{5}}\right) + \color{blue}{\frac{\frac{\frac{2}{x}}{x}}{x}}\]
if 2.0215192664326125e-08 < (+ (- (/ 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}\]
- 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 -3.9228475094830475 \cdot 10^{-25}:\\
\;\;\;\;\frac{\left(x - 1\right) \cdot \left(x - \left(x + 1\right) \cdot 2\right) + \left(x + 1\right) \cdot x}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)}\\
\mathbf{elif}\;\frac{1}{x - 1} + \left(\frac{1}{x + 1} - \frac{2}{x}\right) \le 2.0215192664326125 \cdot 10^{-08}:\\
\;\;\;\;\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{1}{x + 1}\right) - \frac{2}{x}\\
\end{array}\]