Average Error: 29.8 → 1.0
Time: 4.8s
Precision: binary64
\[\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}\;x \leq 389.54422545557793:\\ \;\;\;\;\frac{\left(\left(\sqrt[3]{{x}^{3}} \cdot \sqrt[3]{{x}^{3}}\right) \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \sqrt[3]{x \cdot 0.6666666666666666}\right)\right) + 2\right) - x \cdot x}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{x \cdot \left(\varepsilon + -1\right)} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{\sqrt[3]{x} \cdot \left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \left(-1 - \varepsilon\right)\right)}}{2}\\ \end{array}\]
\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}\;x \leq 389.54422545557793:\\
\;\;\;\;\frac{\left(\left(\sqrt[3]{{x}^{3}} \cdot \sqrt[3]{{x}^{3}}\right) \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \sqrt[3]{x \cdot 0.6666666666666666}\right)\right) + 2\right) - x \cdot x}{2}\\

\mathbf{else}:\\
\;\;\;\;\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{x \cdot \left(\varepsilon + -1\right)} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{\sqrt[3]{x} \cdot \left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \left(-1 - \varepsilon\right)\right)}}{2}\\

\end{array}
(FPCore (x eps)
 :precision binary64
 (/
  (-
   (* (+ 1.0 (/ 1.0 eps)) (exp (- (* (- 1.0 eps) x))))
   (* (- (/ 1.0 eps) 1.0) (exp (- (* (+ 1.0 eps) x)))))
  2.0))
↓
(FPCore (x eps)
 :precision binary64
 (if (<= x 389.54422545557793)
   (/
    (-
     (+
      (*
       (* (cbrt (pow x 3.0)) (cbrt (pow x 3.0)))
       (*
        (cbrt (* x 0.6666666666666666))
        (* (cbrt (* x 0.6666666666666666)) (cbrt (* x 0.6666666666666666)))))
      2.0)
     (* x x))
    2.0)
   (/
    (-
     (* (+ 1.0 (/ 1.0 eps)) (exp (* x (+ eps -1.0))))
     (*
      (- (/ 1.0 eps) 1.0)
      (exp (* (cbrt x) (* (* (cbrt x) (cbrt x)) (- -1.0 eps))))))
    2.0)))
double code(double x, double eps) {
	return (((1.0 + (1.0 / eps)) * exp(-((1.0 - eps) * x))) - (((1.0 / eps) - 1.0) * exp(-((1.0 + eps) * x)))) / 2.0;
}
↓
double code(double x, double eps) {
	double tmp;
	if (x <= 389.54422545557793) {
		tmp = ((((cbrt(pow(x, 3.0)) * cbrt(pow(x, 3.0))) * (cbrt(x * 0.6666666666666666) * (cbrt(x * 0.6666666666666666) * cbrt(x * 0.6666666666666666)))) + 2.0) - (x * x)) / 2.0;
	} else {
		tmp = (((1.0 + (1.0 / eps)) * exp(x * (eps + -1.0))) - (((1.0 / eps) - 1.0) * exp(cbrt(x) * ((cbrt(x) * cbrt(x)) * (-1.0 - eps))))) / 2.0;
	}
	return tmp;
}

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 2 regimes

  2. if x < 389.54422545557793

    1. Initial program 39.6

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

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

    3. Simplified1.3

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

    5. Applied add-cube-cbrt_binary641.3

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

    6. Applied associate-*l*_binary641.3

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

    7. Simplified1.3

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

    9. Applied add-cube-cbrt_binary641.3

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

    if 389.54422545557793 < x

    1. Initial program 0.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. Using strategy rm

    3. Applied add-cube-cbrt_binary640.1

      \[\leadsto \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 \color{blue}{\left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \sqrt[3]{x}\right)}}}{2}\]

    4. Applied associate-*r*_binary640.1

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

  4. Final simplification1.0

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 389.54422545557793:\\ \;\;\;\;\frac{\left(\left(\sqrt[3]{{x}^{3}} \cdot \sqrt[3]{{x}^{3}}\right) \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \left(\sqrt[3]{x \cdot 0.6666666666666666} \cdot \sqrt[3]{x \cdot 0.6666666666666666}\right)\right) + 2\right) - x \cdot x}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(1 + \frac{1}{\varepsilon}\right) \cdot e^{x \cdot \left(\varepsilon + -1\right)} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{\sqrt[3]{x} \cdot \left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \left(-1 - \varepsilon\right)\right)}}{2}\\ \end{array}\]

Reproduce

herbie shell --seed 2020253 
(FPCore (x eps)
  :name "NMSE Section 6.1 mentioned, A"
  :precision binary64
  (/ (- (* (+ 1.0 (/ 1.0 eps)) (exp (- (* (- 1.0 eps) x)))) (* (- (/ 1.0 eps) 1.0) (exp (- (* (+ 1.0 eps) x))))) 2.0))