Average Error: 29.7 → 0.8
Time: 2.8m
Precision: 64
Internal Precision: 128
\[\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{-\left(1 - \varepsilon\right) \cdot x} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{-\left(1 + \varepsilon\right) \cdot x}}{2}\]
↓
\[\begin{array}{l} \mathbf{if}\;e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) \le -5.894359694351766 \cdot 10^{+17}:\\ \;\;\;\;\frac{\frac{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}{\left(1 + {x}^{4} \cdot \frac{1}{8}\right) + {x}^{2} \cdot \frac{1}{2}}}{2}\\ \mathbf{elif}\;e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) \le 0.9999889407307174:\\ \;\;\;\;\frac{e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) - \left(\sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}} \cdot \left(\sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}} \cdot \sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}}\right)\right) \cdot \left(\frac{1}{\varepsilon} - 1\right)}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}{\left(\sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}} \cdot \sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}}\right) \cdot \sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}}}}{2}\\ \end{array}\]

Error

Bits error versus x

Bits error versus eps

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 3 regimes

  2. if (* (+ 1 (/ 1 eps)) (exp (- (* (- 1 eps) x)))) < -5.894359694351766e+17

    1. Initial program 62.0

      \[\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{-\left(1 - \varepsilon\right) \cdot x} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{-\left(1 + \varepsilon\right) \cdot x}}{2}\]

    2. Taylor expanded around 0 0.6

      \[\leadsto \frac{\color{blue}{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2}}}{2}\]
    3. Using strategy rm

    4. Applied flip--0.6

      \[\leadsto \frac{\color{blue}{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}}}{2}\]
    5. Using strategy rm

    6. Applied add-sqr-sqrt0.7

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

    7. Applied associate-/l*0.7

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

    8. Taylor expanded around 0 0.7

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

    if -5.894359694351766e+17 < (* (+ 1 (/ 1 eps)) (exp (- (* (- 1 eps) x)))) < 0.9999889407307174

    1. Initial program 0.4

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

    3. Applied add-cube-cbrt0.5

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

    if 0.9999889407307174 < (* (+ 1 (/ 1 eps)) (exp (- (* (- 1 eps) x))))

    1. Initial program 30.1

      \[\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{-\left(1 - \varepsilon\right) \cdot x} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{-\left(1 + \varepsilon\right) \cdot x}}{2}\]

    2. Taylor expanded around 0 1.0

      \[\leadsto \frac{\color{blue}{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2}}}{2}\]
    3. Using strategy rm

    4. Applied flip--1.0

      \[\leadsto \frac{\color{blue}{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}}}{2}\]
    5. Using strategy rm

    6. Applied add-sqr-sqrt1.0

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

    7. Applied associate-/l*1.0

      \[\leadsto \frac{\color{blue}{\frac{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}}}}{2}\]
    8. Using strategy rm

    9. Applied add-cube-cbrt1.0

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

  4. Final simplification0.8

    \[\leadsto \begin{array}{l} \mathbf{if}\;e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) \le -5.894359694351766 \cdot 10^{+17}:\\ \;\;\;\;\frac{\frac{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}{\left(1 + {x}^{4} \cdot \frac{1}{8}\right) + {x}^{2} \cdot \frac{1}{2}}}{2}\\ \mathbf{elif}\;e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) \le 0.9999889407307174:\\ \;\;\;\;\frac{e^{\left(-x\right) \cdot \left(1 - \varepsilon\right)} \cdot \left(1 + \frac{1}{\varepsilon}\right) - \left(\sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}} \cdot \left(\sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}} \cdot \sqrt[3]{e^{\left(\varepsilon + 1\right) \cdot \left(-x\right)}}\right)\right) \cdot \left(\frac{1}{\varepsilon} - 1\right)}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}{\left(\sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}} \cdot \sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}}\right) \cdot \sqrt[3]{\frac{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) + {x}^{2}}{\sqrt{\left(\frac{2}{3} \cdot {x}^{3} + 2\right) \cdot \left(\frac{2}{3} \cdot {x}^{3} + 2\right) - {x}^{2} \cdot {x}^{2}}}}}}{2}\\ \end{array}\]

Runtime

Time bar (total: 2.8m)Debug logProfile

herbie shell --seed 2018277 
(FPCore (x eps)
  :name "NMSE Section 6.1 mentioned, A"
  (/ (- (* (+ 1 (/ 1 eps)) (exp (- (* (- 1 eps) x)))) (* (- (/ 1 eps) 1) (exp (- (* (+ 1 eps) x))))) 2))