\frac{e^{x} - 1}{x}\begin{array}{l}
\mathbf{if}\;\frac{e^{x} - 1}{x} \le -0.0 \lor \neg \left(\frac{e^{x} - 1}{x} \le 8.5931795027175715 \cdot 10^{-7} \lor \neg \left(\frac{e^{x} - 1}{x} \le 1.0122055456987034\right)\right):\\
\;\;\;\;\frac{{\left(\frac{1}{6} \cdot {x}^{2}\right)}^{3} + {\left(\frac{1}{2} \cdot x + 1\right)}^{3}}{\left(\frac{1}{2} \cdot x + 1\right) \cdot \left(\left(\frac{1}{2} \cdot x + 1\right) - \frac{1}{6} \cdot {x}^{2}\right) + \frac{1}{36} \cdot \left({x}^{2} \cdot {x}^{2}\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt[3]{{\left(e^{x} - 1\right)}^{3}}}{x}\\
\end{array}double code(double x) {
return ((double) (((double) (((double) exp(x)) - 1.0)) / x));
}
double code(double x) {
double VAR;
if (((((double) (((double) (((double) exp(x)) - 1.0)) / x)) <= -0.0) || !((((double) (((double) (((double) exp(x)) - 1.0)) / x)) <= 8.593179502717572e-07) || !(((double) (((double) (((double) exp(x)) - 1.0)) / x)) <= 1.0122055456987034)))) {
VAR = ((double) (((double) (((double) pow(((double) (0.16666666666666666 * ((double) pow(x, 2.0)))), 3.0)) + ((double) pow(((double) (((double) (0.5 * x)) + 1.0)), 3.0)))) / ((double) (((double) (((double) (((double) (0.5 * x)) + 1.0)) * ((double) (((double) (((double) (0.5 * x)) + 1.0)) - ((double) (0.16666666666666666 * ((double) pow(x, 2.0)))))))) + ((double) (0.027777777777777776 * ((double) (((double) pow(x, 2.0)) * ((double) pow(x, 2.0))))))))));
} else {
VAR = ((double) (((double) cbrt(((double) pow(((double) (((double) exp(x)) - 1.0)), 3.0)))) / x));
}
return VAR;
}




Bits error versus x
Results
| Original | 39.8 |
|---|---|
| Target | 40.3 |
| Herbie | 0.6 |
if (/ (- (exp x) 1.0) x) < -0.0 or 8.5931795027175715e-7 < (/ (- (exp x) 1.0) x) < 1.0122055456987034Initial program 59.8
Taylor expanded around 0 0.7
rmApplied flip3-+0.7
Simplified0.7
if -0.0 < (/ (- (exp x) 1.0) x) < 8.5931795027175715e-7 or 1.0122055456987034 < (/ (- (exp x) 1.0) x) Initial program 0.3
rmApplied add-cbrt-cube0.4
Simplified0.4
Final simplification0.6
herbie shell --seed 2020150
(FPCore (x)
:name "Kahan's exp quotient"
:precision binary64
:herbie-target
(if (and (< x 1.0) (> x -1.0)) (/ (- (exp x) 1.0) (log (exp x))) (/ (- (exp x) 1.0) x))
(/ (- (exp x) 1.0) x))