\frac{e^{x}}{e^{x} - 1}\begin{array}{l}
\mathbf{if}\;e^{x} \le 0.0:\\
\;\;\;\;\frac{1}{1 - \frac{1}{e^{x}}}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{1}{12}, x, \frac{1}{x}\right) + \frac{1}{2}\\
\end{array}double f(double x) {
double r106991 = x;
double r106992 = exp(r106991);
double r106993 = 1.0;
double r106994 = r106992 - r106993;
double r106995 = r106992 / r106994;
return r106995;
}
double f(double x) {
double r106996 = x;
double r106997 = exp(r106996);
double r106998 = 0.0;
bool r106999 = r106997 <= r106998;
double r107000 = 1.0;
double r107001 = 1.0;
double r107002 = r107001 / r106997;
double r107003 = r107000 - r107002;
double r107004 = r107000 / r107003;
double r107005 = 0.08333333333333333;
double r107006 = r107000 / r106996;
double r107007 = fma(r107005, r106996, r107006);
double r107008 = 0.5;
double r107009 = r107007 + r107008;
double r107010 = r106999 ? r107004 : r107009;
return r107010;
}




Bits error versus x
| Original | 41.2 |
|---|---|
| Target | 40.8 |
| Herbie | 0.7 |
if (exp x) < 0.0Initial program 0
rmApplied clear-num0
Simplified0
if 0.0 < (exp x) Initial program 61.6
Taylor expanded around 0 1.1
Simplified1.1
Final simplification0.7
herbie shell --seed 2020018 +o rules:numerics
(FPCore (x)
:name "expq2 (section 3.11)"
:precision binary64
:herbie-target
(/ 1 (- 1 (exp (- x))))
(/ (exp x) (- (exp x) 1)))