Average Error: 32.9 → 2.6
Time: 3.1m
Precision: 64
Internal Precision: 1344
\[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
\[\begin{array}{l} \mathbf{if}\;\left(\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}\right) \cdot \left(\sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}} \cdot \sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}}\right) \le -4.957119147862979 \cdot 10^{-06}:\\ \;\;\;\;e^{\frac{\log_* (1 + x)}{n}} - {x}^{\left(\frac{1}{n}\right)}\\ \mathbf{if}\;\left(\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}\right) \cdot \left(\sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}} \cdot \sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}}\right) \le -8.644342371771867 \cdot 10^{-294}:\\ \;\;\;\;(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*\\ \mathbf{if}\;\left(\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}\right) \cdot \left(\sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*} \cdot \sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}} \cdot \sqrt[3]{\sqrt[3]{(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*}}\right) \le 2.313164721782636 \cdot 10^{-300}:\\ \;\;\;\;(\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}\\ \mathbf{else}:\\ \;\;\;\;(e^{\frac{\log_* (1 + x)}{n}} - 1)^* - (\left(\frac{\frac{\frac{1}{2}}{n}}{n}\right) \cdot \left(\log x \cdot \log x\right) + \left(\frac{\log x}{n}\right))_*\\ \end{array}\]

Error

Bits error versus x

Bits error versus n

Derivation

  1. Split input into 3 regimes
  2. if (* (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))) (* (cbrt (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))))) (cbrt (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))))) < -4.957119147862979e-06

    1. Initial program 2.0

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

      \[\leadsto {\color{blue}{\left(e^{\log \left(x + 1\right)}\right)}}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
    4. Applied pow-exp2.1

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

      \[\leadsto e^{\color{blue}{\frac{\log_* (1 + x)}{n}}} - {x}^{\left(\frac{1}{n}\right)}\]

    if -4.957119147862979e-06 < (* (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))) (* (cbrt (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))))) (cbrt (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))))) < -8.644342371771867e-294 or 2.313164721782636e-300 < (* (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))) (* (cbrt (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))))) (cbrt (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))))))

    1. Initial program 59.1

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

      \[\leadsto {\color{blue}{\left(e^{\log \left(x + 1\right)}\right)}}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]
    4. Applied pow-exp59.1

      \[\leadsto \color{blue}{e^{\log \left(x + 1\right) \cdot \frac{1}{n}}} - {x}^{\left(\frac{1}{n}\right)}\]
    5. Applied simplify59.1

      \[\leadsto e^{\color{blue}{\frac{\log_* (1 + x)}{n}}} - {x}^{\left(\frac{1}{n}\right)}\]
    6. Taylor expanded around inf 59.7

      \[\leadsto e^{\frac{\log_* (1 + x)}{n}} - \color{blue}{\left(\left(\frac{1}{2} \cdot \frac{{\left(\log \left(\frac{1}{x}\right)\right)}^{2}}{{n}^{2}} + 1\right) - \frac{\log \left(\frac{1}{x}\right)}{n}\right)}\]
    7. Applied simplify3.5

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

    if -8.644342371771867e-294 < (* (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))) (* (cbrt (* (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))) (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n)))))) (cbrt (cbrt (- (expm1 (/ (log1p x) n)) (fma (/ (/ 1/2 n) n) (* (log x) (log x)) (/ (log x) n))))))) < 2.313164721782636e-300

    1. Initial program 29.7

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

      \[\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)}\]
    3. Applied simplify3.1

      \[\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}}\]
  3. Recombined 3 regimes into one program.

Runtime

Time bar (total: 3.1m)Debug logProfile

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