- Split input into 3 regimes
if (- (+ (/ 1 (* n x)) (+ 1 (/ (log x) n))) (pow x (/ 1 n))) < -0.010295450963190445
Initial program 19.8
\[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
- Using strategy
rm Applied add-cube-cbrt19.9
\[\leadsto {\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - \color{blue}{\left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}}\]
Applied add-cube-cbrt19.9
\[\leadsto {\color{blue}{\left(\left(\sqrt[3]{x + 1} \cdot \sqrt[3]{x + 1}\right) \cdot \sqrt[3]{x + 1}\right)}}^{\left(\frac{1}{n}\right)} - \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\]
Applied unpow-prod-down19.9
\[\leadsto \color{blue}{{\left(\sqrt[3]{x + 1} \cdot \sqrt[3]{x + 1}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x + 1}\right)}^{\left(\frac{1}{n}\right)}} - \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\]
Applied prod-diff19.9
\[\leadsto \color{blue}{(\left({\left(\sqrt[3]{x + 1} \cdot \sqrt[3]{x + 1}\right)}^{\left(\frac{1}{n}\right)}\right) \cdot \left({\left(\sqrt[3]{x + 1}\right)}^{\left(\frac{1}{n}\right)}\right) + \left(-\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right)\right))_* + (\left(-\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) + \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right)\right))_*}\]
Simplified19.8
\[\leadsto \color{blue}{(\left({\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) \cdot \left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) + \left(-{x}^{\left(\frac{1}{n}\right)}\right))_*} + (\left(-\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right) + \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{x}^{\left(\frac{1}{n}\right)}}\right)\right))_*\]
Simplified19.8
\[\leadsto (\left({\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) \cdot \left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) + \left(-{x}^{\left(\frac{1}{n}\right)}\right))_* + \color{blue}{0}\]
if -0.010295450963190445 < (- (+ (/ 1 (* n x)) (+ 1 (/ (log x) n))) (pow x (/ 1 n))) < 5.206381854628619e-296
Initial program 40.7
\[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
Taylor expanded around inf 22.3
\[\leadsto \color{blue}{\frac{1}{x \cdot n} - \left(\frac{\log \left(\frac{1}{x}\right)}{x \cdot {n}^{2}} + \frac{1}{2} \cdot \frac{1}{{x}^{2} \cdot n}\right)}\]
Simplified22.3
\[\leadsto \color{blue}{(\left(\frac{1}{n \cdot x}\right) \cdot \left(-\frac{\frac{1}{2}}{x}\right) + \left(\frac{1}{n \cdot x}\right))_* + \frac{\frac{\log x}{n \cdot x}}{n}}\]
if 5.206381854628619e-296 < (- (+ (/ 1 (* n x)) (+ 1 (/ (log x) n))) (pow x (/ 1 n)))
Initial program 31.2
\[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
- Using strategy
rm Applied add-exp-log31.2
\[\leadsto {\color{blue}{\left(e^{\log \left(x + 1\right)}\right)}}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
Applied pow-exp31.2
\[\leadsto \color{blue}{e^{\log \left(x + 1\right) \cdot \frac{1}{n}}} - {x}^{\left(\frac{1}{n}\right)}\]
Simplified29.7
\[\leadsto e^{\color{blue}{\frac{\log_* (1 + x)}{n}}} - {x}^{\left(\frac{1}{n}\right)}\]
- Recombined 3 regimes into one program.
Final simplification23.0
\[\leadsto \begin{array}{l}
\mathbf{if}\;\left(\left(1 + \frac{\log x}{n}\right) + \frac{1}{x \cdot n}\right) - {x}^{\left(\frac{1}{n}\right)} \le -0.010295450963190445:\\
\;\;\;\;(\left({\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) \cdot \left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}\right) + \left(-{x}^{\left(\frac{1}{n}\right)}\right))_*\\
\mathbf{elif}\;\left(\left(1 + \frac{\log x}{n}\right) + \frac{1}{x \cdot n}\right) - {x}^{\left(\frac{1}{n}\right)} \le 5.206381854628619 \cdot 10^{-296}:\\
\;\;\;\;(\left(\frac{1}{x \cdot n}\right) \cdot \left(-\frac{\frac{1}{2}}{x}\right) + \left(\frac{1}{x \cdot n}\right))_* + \frac{\frac{\log x}{x \cdot n}}{n}\\
\mathbf{else}:\\
\;\;\;\;e^{\frac{\log_* (1 + x)}{n}} - {x}^{\left(\frac{1}{n}\right)}\\
\end{array}\]