{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\begin{array}{l}
\mathbf{if}\;\frac{1}{n} \le -4.895039802440850170454212278486686446129 \cdot 10^{-17}:\\
\;\;\;\;\sqrt[3]{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}}\right)\right)} \cdot \left(\sqrt[3]{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}}\right)\right)} \cdot \sqrt[3]{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \left(\sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt[3]{{\left(\sqrt[3]{\sqrt[3]{x}} \cdot \left(\sqrt[3]{\sqrt[3]{x}} \cdot \sqrt[3]{\sqrt[3]{x}}\right)\right)}^{\left(\frac{1}{n}\right)}}\right)\right)}\right)\\
\mathbf{elif}\;\frac{1}{n} \le 1.260859621565214258622089794815744532231 \cdot 10^{-44}:\\
\;\;\;\;\left(\frac{1}{x \cdot n} - \frac{\frac{0.5}{n}}{x \cdot x}\right) + \frac{\log x \cdot 1}{\left(n \cdot n\right) \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}}\\
\end{array}double f(double x, double n) {
double r3892857 = x;
double r3892858 = 1.0;
double r3892859 = r3892857 + r3892858;
double r3892860 = n;
double r3892861 = r3892858 / r3892860;
double r3892862 = pow(r3892859, r3892861);
double r3892863 = pow(r3892857, r3892861);
double r3892864 = r3892862 - r3892863;
return r3892864;
}
double f(double x, double n) {
double r3892865 = 1.0;
double r3892866 = n;
double r3892867 = r3892865 / r3892866;
double r3892868 = -4.89503980244085e-17;
bool r3892869 = r3892867 <= r3892868;
double r3892870 = x;
double r3892871 = r3892870 + r3892865;
double r3892872 = pow(r3892871, r3892867);
double r3892873 = cbrt(r3892870);
double r3892874 = r3892873 * r3892873;
double r3892875 = pow(r3892874, r3892867);
double r3892876 = cbrt(r3892873);
double r3892877 = r3892876 * r3892876;
double r3892878 = r3892876 * r3892877;
double r3892879 = pow(r3892878, r3892867);
double r3892880 = cbrt(r3892879);
double r3892881 = r3892880 * r3892880;
double r3892882 = r3892880 * r3892881;
double r3892883 = r3892875 * r3892882;
double r3892884 = r3892872 - r3892883;
double r3892885 = cbrt(r3892884);
double r3892886 = r3892885 * r3892885;
double r3892887 = r3892885 * r3892886;
double r3892888 = 1.2608596215652143e-44;
bool r3892889 = r3892867 <= r3892888;
double r3892890 = r3892870 * r3892866;
double r3892891 = r3892865 / r3892890;
double r3892892 = 0.5;
double r3892893 = r3892892 / r3892866;
double r3892894 = r3892870 * r3892870;
double r3892895 = r3892893 / r3892894;
double r3892896 = r3892891 - r3892895;
double r3892897 = log(r3892870);
double r3892898 = r3892897 * r3892865;
double r3892899 = r3892866 * r3892866;
double r3892900 = r3892899 * r3892870;
double r3892901 = r3892898 / r3892900;
double r3892902 = r3892896 + r3892901;
double r3892903 = pow(r3892873, r3892867);
double r3892904 = r3892875 * r3892903;
double r3892905 = r3892872 - r3892904;
double r3892906 = sqrt(r3892905);
double r3892907 = r3892906 * r3892906;
double r3892908 = r3892889 ? r3892902 : r3892907;
double r3892909 = r3892869 ? r3892887 : r3892908;
return r3892909;
}



Bits error versus x



Bits error versus n
Results
if (/ 1.0 n) < -4.89503980244085e-17Initial program 2.2
rmApplied add-cube-cbrt2.2
Applied unpow-prod-down2.2
rmApplied add-cube-cbrt2.3
rmApplied add-cube-cbrt2.3
rmApplied add-cube-cbrt2.3
if -4.89503980244085e-17 < (/ 1.0 n) < 1.2608596215652143e-44Initial program 44.5
Taylor expanded around inf 32.2
Simplified32.2
if 1.2608596215652143e-44 < (/ 1.0 n) Initial program 30.5
rmApplied add-cube-cbrt30.5
Applied unpow-prod-down30.6
rmApplied add-sqr-sqrt30.6
Final simplification23.1
herbie shell --seed 2019172
(FPCore (x n)
:name "2nthrt (problem 3.4.6)"
(- (pow (+ x 1.0) (/ 1.0 n)) (pow x (/ 1.0 n))))