- Split input into 3 regimes
if (fma (+ 1 (/ 3 x)) (/ (- 1) (* x x)) (/ (- 3) x)) < -2.7541621944514563e-13
Initial program 0.7
\[\frac{x}{x + 1} - \frac{x + 1}{x - 1}\]
- Using strategy
rm Applied flip3--0.8
\[\leadsto \frac{x}{x + 1} - \frac{x + 1}{\color{blue}{\frac{{x}^{3} - {1}^{3}}{x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)}}}\]
Applied associate-/r/0.8
\[\leadsto \frac{x}{x + 1} - \color{blue}{\frac{x + 1}{{x}^{3} - {1}^{3}} \cdot \left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right)}\]
Applied add-cube-cbrt0.8
\[\leadsto \color{blue}{\left(\sqrt[3]{\frac{x}{x + 1}} \cdot \sqrt[3]{\frac{x}{x + 1}}\right) \cdot \sqrt[3]{\frac{x}{x + 1}}} - \frac{x + 1}{{x}^{3} - {1}^{3}} \cdot \left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right)\]
Applied prod-diff0.8
\[\leadsto \color{blue}{(\left(\sqrt[3]{\frac{x}{x + 1}} \cdot \sqrt[3]{\frac{x}{x + 1}}\right) \cdot \left(\sqrt[3]{\frac{x}{x + 1}}\right) + \left(-\left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right) \cdot \frac{x + 1}{{x}^{3} - {1}^{3}}\right))_* + (\left(-\left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right)\right) \cdot \left(\frac{x + 1}{{x}^{3} - {1}^{3}}\right) + \left(\left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right) \cdot \frac{x + 1}{{x}^{3} - {1}^{3}}\right))_*}\]
Simplified0.8
\[\leadsto \color{blue}{(\left(\frac{-\left(1 + x\right)}{(x \cdot \left(x \cdot x\right) + \left(-1\right))_*}\right) \cdot \left((\left(1 + x\right) \cdot x + 1)_*\right) + \left(\frac{x}{1 + x}\right))_*} + (\left(-\left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right)\right) \cdot \left(\frac{x + 1}{{x}^{3} - {1}^{3}}\right) + \left(\left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right) \cdot \frac{x + 1}{{x}^{3} - {1}^{3}}\right))_*\]
Simplified0.8
\[\leadsto (\left(\frac{-\left(1 + x\right)}{(x \cdot \left(x \cdot x\right) + \left(-1\right))_*}\right) \cdot \left((\left(1 + x\right) \cdot x + 1)_*\right) + \left(\frac{x}{1 + x}\right))_* + \color{blue}{0}\]
if -2.7541621944514563e-13 < (fma (+ 1 (/ 3 x)) (/ (- 1) (* x x)) (/ (- 3) x)) < 2.7142619465265833e-06
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(1 + \frac{3}{x}\right) \cdot \left(\frac{-1}{x \cdot x}\right) + \left(\frac{-3}{x}\right))_*}\]
if 2.7142619465265833e-06 < (fma (+ 1 (/ 3 x)) (/ (- 1) (* x x)) (/ (- 3) x))
Initial program 0.1
\[\frac{x}{x + 1} - \frac{x + 1}{x - 1}\]
- Using strategy
rm Applied frac-sub0.1
\[\leadsto \color{blue}{\frac{x \cdot \left(x - 1\right) - \left(x + 1\right) \cdot \left(x + 1\right)}{\left(x + 1\right) \cdot \left(x - 1\right)}}\]
- Recombined 3 regimes into one program.
Final simplification0.2
\[\leadsto \begin{array}{l}
\mathbf{if}\;(\left(\frac{3}{x} + 1\right) \cdot \left(\frac{-1}{x \cdot x}\right) + \left(-\frac{3}{x}\right))_* \le -2.7541621944514563 \cdot 10^{-13}:\\
\;\;\;\;(\left(\frac{-\left(1 + x\right)}{(x \cdot \left(x \cdot x\right) + \left(-1\right))_*}\right) \cdot \left((\left(1 + x\right) \cdot x + 1)_*\right) + \left(\frac{x}{1 + x}\right))_*\\
\mathbf{elif}\;(\left(\frac{3}{x} + 1\right) \cdot \left(\frac{-1}{x \cdot x}\right) + \left(-\frac{3}{x}\right))_* \le 2.7142619465265833 \cdot 10^{-06}:\\
\;\;\;\;(\left(\frac{3}{x} + 1\right) \cdot \left(\frac{-1}{x \cdot x}\right) + \left(-\frac{3}{x}\right))_*\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot \left(x - 1\right) - \left(1 + x\right) \cdot \left(1 + x\right)}{\left(x - 1\right) \cdot \left(1 + x\right)}\\
\end{array}\]