\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 r109921 = x;
double r109922 = exp(r109921);
double r109923 = 1.0;
double r109924 = r109922 - r109923;
double r109925 = r109922 / r109924;
return r109925;
}
double f(double x) {
double r109926 = x;
double r109927 = exp(r109926);
double r109928 = 0.0;
bool r109929 = r109927 <= r109928;
double r109930 = 1.0;
double r109931 = 1.0;
double r109932 = r109931 / r109927;
double r109933 = r109930 - r109932;
double r109934 = r109930 / r109933;
double r109935 = 0.08333333333333333;
double r109936 = r109930 / r109926;
double r109937 = fma(r109935, r109926, r109936);
double r109938 = 0.5;
double r109939 = r109937 + r109938;
double r109940 = r109929 ? r109934 : r109939;
return r109940;
}




Bits error versus x
| Original | 41.4 |
|---|---|
| Target | 41.0 |
| 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.3
Simplified1.3
Final simplification0.9
herbie shell --seed 2020046 +o rules:numerics
(FPCore (x)
:name "expq2 (section 3.11)"
:precision binary64
:herbie-target
(/ 1 (- 1 (exp (- x))))
(/ (exp x) (- (exp x) 1)))