\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 r79241 = x;
double r79242 = exp(r79241);
double r79243 = 1.0;
double r79244 = r79242 - r79243;
double r79245 = r79242 / r79244;
return r79245;
}
double f(double x) {
double r79246 = x;
double r79247 = exp(r79246);
double r79248 = 0.0;
bool r79249 = r79247 <= r79248;
double r79250 = 1.0;
double r79251 = 1.0;
double r79252 = r79251 / r79247;
double r79253 = r79250 - r79252;
double r79254 = r79250 / r79253;
double r79255 = 0.08333333333333333;
double r79256 = r79250 / r79246;
double r79257 = fma(r79255, r79246, r79256);
double r79258 = 0.5;
double r79259 = r79257 + r79258;
double r79260 = r79249 ? r79254 : r79259;
return r79260;
}




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