{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\begin{array}{l}
\mathbf{if}\;n \le -3.1647883017738754 \cdot 10^{+21}:\\
\;\;\;\;\frac{1}{x \cdot n} - \left(\frac{\frac{\frac{1}{2}}{n}}{x \cdot x} - \frac{\frac{\log x}{n \cdot n}}{x}\right)\\
\mathbf{elif}\;n \le 7547414330764314.0:\\
\;\;\;\;\sqrt[3]{\left({x}^{\left(\frac{\frac{1}{n}}{2}\right)} + \sqrt{{\left(1 + x\right)}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\sqrt{{\left(1 + x\right)}^{\left(\frac{1}{n}\right)}} - {x}^{\left(\frac{\frac{1}{n}}{2}\right)}}\right)} \cdot \left(\sqrt[3]{{\left(1 + x\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{\left(1 + x\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x \cdot n} - \left(\frac{\frac{\frac{1}{2}}{n}}{x \cdot x} - \frac{\frac{\log x}{n \cdot n}}{x}\right)\\
\end{array}double f(double x, double n) {
double r3106683 = x;
double r3106684 = 1.0;
double r3106685 = r3106683 + r3106684;
double r3106686 = n;
double r3106687 = r3106684 / r3106686;
double r3106688 = pow(r3106685, r3106687);
double r3106689 = pow(r3106683, r3106687);
double r3106690 = r3106688 - r3106689;
return r3106690;
}
double f(double x, double n) {
double r3106691 = n;
double r3106692 = -3.1647883017738754e+21;
bool r3106693 = r3106691 <= r3106692;
double r3106694 = 1.0;
double r3106695 = x;
double r3106696 = r3106695 * r3106691;
double r3106697 = r3106694 / r3106696;
double r3106698 = 0.5;
double r3106699 = r3106698 / r3106691;
double r3106700 = r3106695 * r3106695;
double r3106701 = r3106699 / r3106700;
double r3106702 = log(r3106695);
double r3106703 = r3106691 * r3106691;
double r3106704 = r3106702 / r3106703;
double r3106705 = r3106704 / r3106695;
double r3106706 = r3106701 - r3106705;
double r3106707 = r3106697 - r3106706;
double r3106708 = 7547414330764314.0;
bool r3106709 = r3106691 <= r3106708;
double r3106710 = r3106694 / r3106691;
double r3106711 = 2.0;
double r3106712 = r3106710 / r3106711;
double r3106713 = pow(r3106695, r3106712);
double r3106714 = r3106694 + r3106695;
double r3106715 = pow(r3106714, r3106710);
double r3106716 = sqrt(r3106715);
double r3106717 = r3106713 + r3106716;
double r3106718 = r3106716 - r3106713;
double r3106719 = exp(r3106718);
double r3106720 = log(r3106719);
double r3106721 = r3106717 * r3106720;
double r3106722 = cbrt(r3106721);
double r3106723 = pow(r3106695, r3106710);
double r3106724 = r3106715 - r3106723;
double r3106725 = cbrt(r3106724);
double r3106726 = r3106725 * r3106725;
double r3106727 = r3106722 * r3106726;
double r3106728 = r3106709 ? r3106727 : r3106707;
double r3106729 = r3106693 ? r3106707 : r3106728;
return r3106729;
}



Bits error versus x



Bits error versus n
Results
if n < -3.1647883017738754e+21 or 7547414330764314.0 < n Initial program 44.8
Taylor expanded around inf 32.2
Simplified32.2
if -3.1647883017738754e+21 < n < 7547414330764314.0Initial program 10.8
rmApplied add-cube-cbrt10.8
rmApplied sqr-pow10.7
Applied add-sqr-sqrt10.7
Applied difference-of-squares10.7
rmApplied add-log-exp10.8
Final simplification22.8
herbie shell --seed 2019163
(FPCore (x n)
:name "2nthrt (problem 3.4.6)"
(- (pow (+ x 1) (/ 1 n)) (pow x (/ 1 n))))