Average Error: 29.9 → 23.1
Time: 32.2s
Precision: 64
\[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
\[\begin{array}{l} \mathbf{if}\;\frac{1}{n} \le -1.573264323221321940469903236644308698369 \cdot 10^{-23}:\\ \;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(2 \cdot \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right) + \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\right)\\ \mathbf{elif}\;\frac{1}{n} \le 2.331213512681894439398036102681617494142 \cdot 10^{-13}:\\ \;\;\;\;\frac{1}{x} \cdot \left(\frac{1}{n} - \frac{-\log x}{{n}^{2}}\right) - \frac{0.5}{{x}^{2} \cdot n}\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\frac{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} + \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}\right)\\ \end{array}\]
{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}
\begin{array}{l}
\mathbf{if}\;\frac{1}{n} \le -1.573264323221321940469903236644308698369 \cdot 10^{-23}:\\
\;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(2 \cdot \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right) + \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\right)\\

\mathbf{elif}\;\frac{1}{n} \le 2.331213512681894439398036102681617494142 \cdot 10^{-13}:\\
\;\;\;\;\frac{1}{x} \cdot \left(\frac{1}{n} - \frac{-\log x}{{n}^{2}}\right) - \frac{0.5}{{x}^{2} \cdot n}\\

\mathbf{else}:\\
\;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\frac{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} + \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}\right)\\

\end{array}
double f(double x, double n) {
        double r71537 = x;
        double r71538 = 1.0;
        double r71539 = r71537 + r71538;
        double r71540 = n;
        double r71541 = r71538 / r71540;
        double r71542 = pow(r71539, r71541);
        double r71543 = pow(r71537, r71541);
        double r71544 = r71542 - r71543;
        return r71544;
}

double f(double x, double n) {
        double r71545 = 1.0;
        double r71546 = n;
        double r71547 = r71545 / r71546;
        double r71548 = -1.573264323221322e-23;
        bool r71549 = r71547 <= r71548;
        double r71550 = x;
        double r71551 = r71550 + r71545;
        double r71552 = pow(r71551, r71547);
        double r71553 = sqrt(r71552);
        double r71554 = pow(r71550, r71547);
        double r71555 = sqrt(r71554);
        double r71556 = r71553 + r71555;
        double r71557 = 2.0;
        double r71558 = r71553 - r71555;
        double r71559 = exp(r71558);
        double r71560 = cbrt(r71559);
        double r71561 = log(r71560);
        double r71562 = r71557 * r71561;
        double r71563 = r71562 + r71561;
        double r71564 = r71556 * r71563;
        double r71565 = 2.3312135126818944e-13;
        bool r71566 = r71547 <= r71565;
        double r71567 = r71545 / r71550;
        double r71568 = 1.0;
        double r71569 = r71568 / r71546;
        double r71570 = log(r71550);
        double r71571 = -r71570;
        double r71572 = pow(r71546, r71557);
        double r71573 = r71571 / r71572;
        double r71574 = r71569 - r71573;
        double r71575 = r71567 * r71574;
        double r71576 = 0.5;
        double r71577 = pow(r71550, r71557);
        double r71578 = r71577 * r71546;
        double r71579 = r71576 / r71578;
        double r71580 = r71575 - r71579;
        double r71581 = r71552 - r71554;
        double r71582 = r71555 + r71553;
        double r71583 = r71581 / r71582;
        double r71584 = exp(r71583);
        double r71585 = log(r71584);
        double r71586 = r71556 * r71585;
        double r71587 = r71566 ? r71580 : r71586;
        double r71588 = r71549 ? r71564 : r71587;
        return r71588;
}

Error

Bits error versus x

Bits error versus n

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 3 regimes
  2. if (/ 1.0 n) < -1.573264323221322e-23

    1. Initial program 3.5

      \[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
    2. Using strategy rm
    3. Applied add-sqr-sqrt3.6

      \[\leadsto {\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - \color{blue}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{x}^{\left(\frac{1}{n}\right)}}}\]
    4. Applied add-sqr-sqrt3.5

      \[\leadsto \color{blue}{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{x}^{\left(\frac{1}{n}\right)}}\]
    5. Applied difference-of-squares3.5

      \[\leadsto \color{blue}{\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right)}\]
    6. Using strategy rm
    7. Applied add-log-exp3.8

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \color{blue}{\log \left(e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)}\right)\]
    8. Applied add-log-exp3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\color{blue}{\log \left(e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}\right)} - \log \left(e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)\right)\]
    9. Applied diff-log3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \color{blue}{\log \left(\frac{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}{e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)}\]
    10. Simplified3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \color{blue}{\left(e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)}\]
    11. Using strategy rm
    12. Applied add-cube-cbrt3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \color{blue}{\left(\left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}} \cdot \sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right) \cdot \sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)}\]
    13. Applied log-prod3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \color{blue}{\left(\log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}} \cdot \sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right) + \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\right)}\]
    14. Simplified3.7

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\color{blue}{2 \cdot \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)} + \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\right)\]

    if -1.573264323221322e-23 < (/ 1.0 n) < 2.3312135126818944e-13

    1. Initial program 44.8

      \[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
    2. Taylor expanded around inf 32.6

      \[\leadsto \color{blue}{1 \cdot \frac{1}{x \cdot n} - \left(0.5 \cdot \frac{1}{{x}^{2} \cdot n} + 1 \cdot \frac{\log \left(\frac{1}{x}\right)}{x \cdot {n}^{2}}\right)}\]
    3. Simplified31.9

      \[\leadsto \color{blue}{\frac{1}{x} \cdot \left(\frac{1}{n} - \frac{-\log x}{{n}^{2}}\right) - \frac{0.5}{{x}^{2} \cdot n}}\]

    if 2.3312135126818944e-13 < (/ 1.0 n)

    1. Initial program 25.2

      \[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
    2. Using strategy rm
    3. Applied add-sqr-sqrt25.3

      \[\leadsto {\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - \color{blue}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{x}^{\left(\frac{1}{n}\right)}}}\]
    4. Applied add-sqr-sqrt25.2

      \[\leadsto \color{blue}{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{x}^{\left(\frac{1}{n}\right)}}\]
    5. Applied difference-of-squares25.2

      \[\leadsto \color{blue}{\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right)}\]
    6. Using strategy rm
    7. Applied add-log-exp25.3

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \color{blue}{\log \left(e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)}\right)\]
    8. Applied add-log-exp25.3

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(\color{blue}{\log \left(e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}\right)} - \log \left(e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)\right)\]
    9. Applied diff-log25.3

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \color{blue}{\log \left(\frac{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}{e^{\sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)}\]
    10. Simplified25.3

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \color{blue}{\left(e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}\right)}\]
    11. Using strategy rm
    12. Applied flip--28.0

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\color{blue}{\frac{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}} \cdot \sqrt{{x}^{\left(\frac{1}{n}\right)}}}{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}}\right)\]
    13. Simplified28.0

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\frac{\color{blue}{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}}{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\]
    14. Simplified28.0

      \[\leadsto \left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\frac{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}{\color{blue}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} + \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}}\right)\]
  3. Recombined 3 regimes into one program.
  4. Final simplification23.1

    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{1}{n} \le -1.573264323221321940469903236644308698369 \cdot 10^{-23}:\\ \;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \left(2 \cdot \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right) + \log \left(\sqrt[3]{e^{\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} - \sqrt{{x}^{\left(\frac{1}{n}\right)}}}}\right)\right)\\ \mathbf{elif}\;\frac{1}{n} \le 2.331213512681894439398036102681617494142 \cdot 10^{-13}:\\ \;\;\;\;\frac{1}{x} \cdot \left(\frac{1}{n} - \frac{-\log x}{{n}^{2}}\right) - \frac{0.5}{{x}^{2} \cdot n}\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}} + \sqrt{{x}^{\left(\frac{1}{n}\right)}}\right) \cdot \log \left(e^{\frac{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}}{\sqrt{{x}^{\left(\frac{1}{n}\right)}} + \sqrt{{\left(x + 1\right)}^{\left(\frac{1}{n}\right)}}}}\right)\\ \end{array}\]

Reproduce

herbie shell --seed 2019326 +o rules:numerics
(FPCore (x n)
  :name "2nthrt (problem 3.4.6)"
  :precision binary64
  (- (pow (+ x 1) (/ 1 n)) (pow x (/ 1 n))))