\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\begin{array}{l}
\mathbf{if}\;\frac{\varepsilon \cdot \left(e^{\varepsilon \cdot \left(a + b\right)} - 1\right)}{\left(e^{\varepsilon \cdot a} - 1\right) \cdot \left(e^{\varepsilon \cdot b} - 1\right)} \leq -\infty \lor \neg \left(\frac{\varepsilon \cdot \left(e^{\varepsilon \cdot \left(a + b\right)} - 1\right)}{\left(e^{\varepsilon \cdot a} - 1\right) \cdot \left(e^{\varepsilon \cdot b} - 1\right)} \leq 1.0694759911074818 \cdot 10^{-13}\right):\\
\;\;\;\;\frac{1}{b}\\
\mathbf{else}:\\
\;\;\;\;\frac{\varepsilon \cdot \left(e^{\varepsilon \cdot \left(a + b\right)} - 1\right)}{\left(e^{\varepsilon \cdot a} - 1\right) \cdot \left(e^{\varepsilon \cdot b} - 1\right)}\\
\end{array}double code(double a, double b, double eps) {
return (((double) (eps * ((double) (((double) exp(((double) (((double) (a + b)) * eps)))) - 1.0)))) / ((double) (((double) (((double) exp(((double) (a * eps)))) - 1.0)) * ((double) (((double) exp(((double) (b * eps)))) - 1.0)))));
}
double code(double a, double b, double eps) {
double VAR;
if ((((((double) (eps * ((double) (((double) exp(((double) (eps * ((double) (a + b)))))) - 1.0)))) / ((double) (((double) (((double) exp(((double) (eps * a)))) - 1.0)) * ((double) (((double) exp(((double) (eps * b)))) - 1.0))))) <= ((double) -(((double) INFINITY)))) || !((((double) (eps * ((double) (((double) exp(((double) (eps * ((double) (a + b)))))) - 1.0)))) / ((double) (((double) (((double) exp(((double) (eps * a)))) - 1.0)) * ((double) (((double) exp(((double) (eps * b)))) - 1.0))))) <= 1.0694759911074818e-13))) {
VAR = (1.0 / b);
} else {
VAR = (((double) (eps * ((double) (((double) exp(((double) (eps * ((double) (a + b)))))) - 1.0)))) / ((double) (((double) (((double) exp(((double) (eps * a)))) - 1.0)) * ((double) (((double) exp(((double) (eps * b)))) - 1.0)))));
}
return VAR;
}




Bits error versus a




Bits error versus b




Bits error versus eps
Results
| Original | 60.1 |
|---|---|
| Target | 15.6 |
| Herbie | 29.7 |
if (/ (* eps (- (exp (* (+ a b) eps)) 1.0)) (* (- (exp (* a eps)) 1.0) (- (exp (* b eps)) 1.0))) < -inf.0 or 1.06947599110748181e-13 < (/ (* eps (- (exp (* (+ a b) eps)) 1.0)) (* (- (exp (* a eps)) 1.0) (- (exp (* b eps)) 1.0))) Initial program Error: 63.8 bits
Taylor expanded around 0 Error: 58.2 bits
SimplifiedError: 57.9 bits
rmApplied associate-*l*Error: 57.7 bits
SimplifiedError: 57.7 bits
Taylor expanded around inf Error: 57.7 bits
SimplifiedError: 58.3 bits
Taylor expanded around 0 Error: 31.4 bits
if -inf.0 < (/ (* eps (- (exp (* (+ a b) eps)) 1.0)) (* (- (exp (* a eps)) 1.0) (- (exp (* b eps)) 1.0))) < 1.06947599110748181e-13Initial program Error: 3.9 bits
Final simplificationError: 29.7 bits
herbie shell --seed 2020200
(FPCore (a b eps)
:name "expq3 (problem 3.4.2)"
:precision binary64
:pre (and (< -1.0 eps) (< eps 1.0))
:herbie-target
(/ (+ a b) (* a b))
(/ (* eps (- (exp (* (+ a b) eps)) 1.0)) (* (- (exp (* a eps)) 1.0) (- (exp (* b eps)) 1.0))))