Average Error: 32.9 → 2.1
Time: 2.5m
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(\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]{\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 \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 -6.436422285650918 \cdot 10^{-05}:\\ \;\;\;\;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(\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]{\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 \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 -1.189451359605305 \cdot 10^{-302}:\\ \;\;\;\;(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(\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]{\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 \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 1.15003338541643 \cdot 10^{-308}:\\ \;\;\;\;\frac{\frac{\log x}{n \cdot n}}{x} - \left(\frac{\frac{\frac{1}{2}}{n}}{x \cdot x} - \frac{1}{x \cdot n}\right)\\ \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 (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))))))) < -6.436422285650918e-05

    1. Initial program 1.9

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

    3. Applied add-exp-log1.9

      \[\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-exp1.9

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

    5. Applied simplify0.8

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

    if -6.436422285650918e-05 < (* (* (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 (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.189451359605305e-302 or 1.15003338541643e-308 < (* (* (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 (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 58.8

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

    3. Applied add-exp-log58.8

      \[\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-exp58.8

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

    5. Applied simplify58.8

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

    6. Taylor expanded around inf 59.4

      \[\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.4

      \[\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 -1.189451359605305e-302 < (* (* (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 (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.15003338541643e-308

    1. Initial program 28.5

      \[{\left(x + 1\right)}^{\left(\frac{1}{n}\right)} - {x}^{\left(\frac{1}{n}\right)}\]

    2. Taylor expanded around inf 1.5

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

    3. Applied simplify1.5

      \[\leadsto \color{blue}{\frac{\frac{\log x}{n \cdot n}}{x} - \left(\frac{\frac{\frac{1}{2}}{n}}{x \cdot x} - \frac{1}{x \cdot n}\right)}\]
  3. Recombined 3 regimes into one program.

Runtime

Time bar (total: 2.5m)Debug logProfile

herbie shell --seed '#(1071948828 1180510430 2986424009 997076509 406109801 420189285)' +o rules:numerics
(FPCore (x n)
  :name "2nthrt (problem 3.4.6)"
  (- (pow (+ x 1) (/ 1 n)) (pow x (/ 1 n))))