\frac{e^{x}}{e^{x} - 1}\begin{array}{l}
\mathbf{if}\;e^{x} \le 0.9770380934088124247338669192686211317778:\\
\;\;\;\;\frac{e^{x}}{\frac{\frac{{\left(e^{x}\right)}^{6} + \left(-{1}^{6}\right)}{{\left(e^{x}\right)}^{3} + {1}^{3}}}{1 \cdot \left(1 + e^{x}\right) + e^{x + x}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2} + \left(\frac{1}{12} \cdot x + \frac{1}{x}\right)\\
\end{array}double f(double x) {
double r90838 = x;
double r90839 = exp(r90838);
double r90840 = 1.0;
double r90841 = r90839 - r90840;
double r90842 = r90839 / r90841;
return r90842;
}
double f(double x) {
double r90843 = x;
double r90844 = exp(r90843);
double r90845 = 0.9770380934088124;
bool r90846 = r90844 <= r90845;
double r90847 = 6.0;
double r90848 = pow(r90844, r90847);
double r90849 = 1.0;
double r90850 = pow(r90849, r90847);
double r90851 = -r90850;
double r90852 = r90848 + r90851;
double r90853 = 3.0;
double r90854 = pow(r90844, r90853);
double r90855 = pow(r90849, r90853);
double r90856 = r90854 + r90855;
double r90857 = r90852 / r90856;
double r90858 = r90849 + r90844;
double r90859 = r90849 * r90858;
double r90860 = r90843 + r90843;
double r90861 = exp(r90860);
double r90862 = r90859 + r90861;
double r90863 = r90857 / r90862;
double r90864 = r90844 / r90863;
double r90865 = 0.5;
double r90866 = 0.08333333333333333;
double r90867 = r90866 * r90843;
double r90868 = 1.0;
double r90869 = r90868 / r90843;
double r90870 = r90867 + r90869;
double r90871 = r90865 + r90870;
double r90872 = r90846 ? r90864 : r90871;
return r90872;
}




Bits error versus x
Results
| Original | 41.4 |
|---|---|
| Target | 41.0 |
| Herbie | 0.7 |
if (exp x) < 0.9770380934088124Initial program 0.0
rmApplied flip3--0.0
Simplified0.0
rmApplied flip--0.0
Simplified0.0
if 0.9770380934088124 < (exp x) Initial program 61.6
Taylor expanded around 0 1.0
Final simplification0.7
herbie shell --seed 2019318
(FPCore (x)
:name "expq2 (section 3.11)"
:precision binary64
:herbie-target
(/ 1 (- 1 (exp (- x))))
(/ (exp x) (- (exp x) 1)))