{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\begin{array}{l}
\mathbf{if}\;n \le -5.374271620846741 \cdot 10^{+21}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\frac{\frac{1}{x}}{x}}{n}, \frac{-1}{2}, \left(\frac{\frac{-2}{3}}{n \cdot n} + \frac{\frac{-1}{3}}{n \cdot n}\right) \cdot \frac{\log \left(\frac{1}{x}\right)}{x} + \frac{\frac{1}{n}}{x}\right) + \mathsf{fma}\left(-{\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\\
\mathbf{elif}\;n \le 2.44541556257196 \cdot 10^{-310}:\\
\;\;\;\;\sqrt[3]{\left(\mathsf{fma}\left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(-{\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\right) \cdot \mathsf{fma}\left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(-{\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\right)\right) \cdot \mathsf{fma}\left({\left(\sqrt[3]{1 + x} \cdot \sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{1 + x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot \left(-{\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\right)} + \mathsf{fma}\left(-{\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\\
\mathbf{elif}\;n \le 2.054730747417339 \cdot 10^{+31}:\\
\;\;\;\;e^{\frac{\mathsf{log1p}\left(x\right)}{n}} - {x}^{\left(\frac{1}{n}\right)}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\frac{\frac{1}{x}}{x}}{n}, \frac{-1}{2}, \left(\frac{\frac{-2}{3}}{n \cdot n} + \frac{\frac{-1}{3}}{n \cdot n}\right) \cdot \frac{\log \left(\frac{1}{x}\right)}{x} + \frac{\frac{1}{n}}{x}\right) + \mathsf{fma}\left(-{\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}, {\left(\sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)} \cdot {\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right)}^{\left(\frac{1}{n}\right)}\right)\\
\end{array}double f(double x, double n) {
double r3930119 = x;
double r3930120 = 1.0;
double r3930121 = r3930119 + r3930120;
double r3930122 = n;
double r3930123 = r3930120 / r3930122;
double r3930124 = pow(r3930121, r3930123);
double r3930125 = pow(r3930119, r3930123);
double r3930126 = r3930124 - r3930125;
return r3930126;
}
double f(double x, double n) {
double r3930127 = n;
double r3930128 = -5.374271620846741e+21;
bool r3930129 = r3930127 <= r3930128;
double r3930130 = 1.0;
double r3930131 = x;
double r3930132 = r3930130 / r3930131;
double r3930133 = r3930132 / r3930131;
double r3930134 = r3930133 / r3930127;
double r3930135 = -0.5;
double r3930136 = -0.6666666666666666;
double r3930137 = r3930127 * r3930127;
double r3930138 = r3930136 / r3930137;
double r3930139 = -0.3333333333333333;
double r3930140 = r3930139 / r3930137;
double r3930141 = r3930138 + r3930140;
double r3930142 = log(r3930132);
double r3930143 = r3930142 / r3930131;
double r3930144 = r3930141 * r3930143;
double r3930145 = r3930130 / r3930127;
double r3930146 = r3930145 / r3930131;
double r3930147 = r3930144 + r3930146;
double r3930148 = fma(r3930134, r3930135, r3930147);
double r3930149 = cbrt(r3930131);
double r3930150 = pow(r3930149, r3930145);
double r3930151 = -r3930150;
double r3930152 = r3930149 * r3930149;
double r3930153 = pow(r3930152, r3930145);
double r3930154 = r3930150 * r3930153;
double r3930155 = fma(r3930151, r3930153, r3930154);
double r3930156 = r3930148 + r3930155;
double r3930157 = 2.44541556257196e-310;
bool r3930158 = r3930127 <= r3930157;
double r3930159 = r3930130 + r3930131;
double r3930160 = cbrt(r3930159);
double r3930161 = r3930160 * r3930160;
double r3930162 = pow(r3930161, r3930145);
double r3930163 = pow(r3930160, r3930145);
double r3930164 = -r3930153;
double r3930165 = r3930150 * r3930164;
double r3930166 = fma(r3930162, r3930163, r3930165);
double r3930167 = r3930166 * r3930166;
double r3930168 = r3930167 * r3930166;
double r3930169 = cbrt(r3930168);
double r3930170 = r3930169 + r3930155;
double r3930171 = 2.054730747417339e+31;
bool r3930172 = r3930127 <= r3930171;
double r3930173 = log1p(r3930131);
double r3930174 = r3930173 / r3930127;
double r3930175 = exp(r3930174);
double r3930176 = pow(r3930131, r3930145);
double r3930177 = r3930175 - r3930176;
double r3930178 = r3930172 ? r3930177 : r3930156;
double r3930179 = r3930158 ? r3930170 : r3930178;
double r3930180 = r3930129 ? r3930156 : r3930179;
return r3930180;
}



Bits error versus x



Bits error versus n
if n < -5.374271620846741e+21 or 2.054730747417339e+31 < n Initial program 44.8
rmApplied add-cube-cbrt44.8
Applied unpow-prod-down44.8
Applied add-cube-cbrt44.8
Applied unpow-prod-down44.8
Applied prod-diff44.8
Taylor expanded around inf 33.3
Simplified32.7
if -5.374271620846741e+21 < n < 2.44541556257196e-310Initial program 2.9
rmApplied add-cube-cbrt2.9
Applied unpow-prod-down2.9
Applied add-cube-cbrt2.9
Applied unpow-prod-down2.9
Applied prod-diff2.9
rmApplied add-cbrt-cube2.9
if 2.44541556257196e-310 < n < 2.054730747417339e+31Initial program 29.0
rmApplied add-exp-log29.0
Applied pow-exp29.0
Simplified8.7
Final simplification19.9
herbie shell --seed 2019146 +o rules:numerics
(FPCore (x n)
:name "2nthrt (problem 3.4.6)"
(- (pow (+ x 1) (/ 1 n)) (pow x (/ 1 n))))