Average Error: 29.4 → 1.0
Time: 4.4s
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 124.28153962528454:\\ \;\;\;\;\frac{e^{\log \left(\left(0.6666666666666666 \cdot {x}^{3} + 2\right) - x \cdot x\right)}}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(\sqrt[3]{1 + \frac{1}{\varepsilon}} \cdot \sqrt[3]{1 + \frac{1}{\varepsilon}}\right) \cdot \frac{\sqrt[3]{1 + \frac{1}{\varepsilon}}}{e^{x \cdot \left(1 - \varepsilon\right)}} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{x \cdot \left(-1 - \varepsilon\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 124.28153962528454:\\
\;\;\;\;\frac{e^{\log \left(\left(0.6666666666666666 \cdot {x}^{3} + 2\right) - x \cdot x\right)}}{2}\\

\mathbf{else}:\\
\;\;\;\;\frac{\left(\sqrt[3]{1 + \frac{1}{\varepsilon}} \cdot \sqrt[3]{1 + \frac{1}{\varepsilon}}\right) \cdot \frac{\sqrt[3]{1 + \frac{1}{\varepsilon}}}{e^{x \cdot \left(1 - \varepsilon\right)}} - \left(\frac{1}{\varepsilon} - 1\right) \cdot e^{x \cdot \left(-1 - \varepsilon\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 124.28153962528454)
   (/ (exp (log (- (+ (* 0.6666666666666666 (pow x 3.0)) 2.0) (* x x)))) 2.0)
   (/
    (-
     (*
      (* (cbrt (+ 1.0 (/ 1.0 eps))) (cbrt (+ 1.0 (/ 1.0 eps))))
      (/ (cbrt (+ 1.0 (/ 1.0 eps))) (exp (* x (- 1.0 eps)))))
     (* (- (/ 1.0 eps) 1.0) (exp (* x (- -1.0 eps)))))
    2.0)))
double code(double x, double eps) {
	return (((double) (((double) (((double) (1.0 + (1.0 / eps))) * ((double) exp(((double) -(((double) (((double) (1.0 - eps)) * x)))))))) - ((double) (((double) ((1.0 / eps) - 1.0)) * ((double) exp(((double) -(((double) (((double) (1.0 + eps)) * x)))))))))) / 2.0);
}
↓
double code(double x, double eps) {
	double tmp;
	if ((x <= 124.28153962528454)) {
		tmp = (((double) exp(((double) log(((double) (((double) (((double) (0.6666666666666666 * ((double) pow(x, 3.0)))) + 2.0)) - ((double) (x * x)))))))) / 2.0);
	} else {
		tmp = (((double) (((double) (((double) (((double) cbrt(((double) (1.0 + (1.0 / eps))))) * ((double) cbrt(((double) (1.0 + (1.0 / eps))))))) * (((double) cbrt(((double) (1.0 + (1.0 / eps))))) / ((double) exp(((double) (x * ((double) (1.0 - eps))))))))) - ((double) (((double) ((1.0 / eps) - 1.0)) * ((double) exp(((double) (x * ((double) (-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 < 124.281539625284537

    1. Initial program 38.5

      \[\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(0.6666666666666666 \cdot {x}^{3} + 2\right) - x \cdot x}}{2}\]
    4. Using strategy rm

    5. Applied add-exp-log_binary641.3

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

    if 124.281539625284537 < x

    1. Initial program 0.2

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

      \[\leadsto \frac{\color{blue}{\left(\left(\sqrt[3]{1 + \frac{1}{\varepsilon}} \cdot \sqrt[3]{1 + \frac{1}{\varepsilon}}\right) \cdot \sqrt[3]{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}\]

    4. Applied associate-*l*_binary640.2

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

    5. Simplified0.2

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

  4. Final simplification1.0

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

Reproduce

herbie shell --seed 2020219 
(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))