\frac{e^{x} - 1}{x}\begin{array}{l}
\mathbf{if}\;x \le -9.202491378555592886016173403973539279832 \cdot 10^{-5}:\\
\;\;\;\;\frac{\frac{{\left(e^{x}\right)}^{3} \cdot {\left(e^{x}\right)}^{3} - {1}^{3} \cdot {1}^{3}}{\left(1 \cdot \left(1 + e^{x}\right) + e^{x + x}\right) \cdot \left({\left(e^{x}\right)}^{3} + {1}^{3}\right)}}{x}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{6} \cdot {x}^{2} + \left(\frac{1}{2} \cdot x + 1\right)\\
\end{array}double f(double x) {
double r87538 = x;
double r87539 = exp(r87538);
double r87540 = 1.0;
double r87541 = r87539 - r87540;
double r87542 = r87541 / r87538;
return r87542;
}
double f(double x) {
double r87543 = x;
double r87544 = -9.202491378555593e-05;
bool r87545 = r87543 <= r87544;
double r87546 = exp(r87543);
double r87547 = 3.0;
double r87548 = pow(r87546, r87547);
double r87549 = r87548 * r87548;
double r87550 = 1.0;
double r87551 = pow(r87550, r87547);
double r87552 = r87551 * r87551;
double r87553 = r87549 - r87552;
double r87554 = r87550 + r87546;
double r87555 = r87550 * r87554;
double r87556 = r87543 + r87543;
double r87557 = exp(r87556);
double r87558 = r87555 + r87557;
double r87559 = r87548 + r87551;
double r87560 = r87558 * r87559;
double r87561 = r87553 / r87560;
double r87562 = r87561 / r87543;
double r87563 = 0.16666666666666666;
double r87564 = 2.0;
double r87565 = pow(r87543, r87564);
double r87566 = r87563 * r87565;
double r87567 = 0.5;
double r87568 = r87567 * r87543;
double r87569 = 1.0;
double r87570 = r87568 + r87569;
double r87571 = r87566 + r87570;
double r87572 = r87545 ? r87562 : r87571;
return r87572;
}




Bits error versus x
Results
| Original | 40.0 |
|---|---|
| Target | 40.4 |
| Herbie | 0.3 |
if x < -9.202491378555593e-05Initial program 0.0
rmApplied flip3--0.0
Simplified0.0
rmApplied flip--0.0
Applied associate-/l/0.0
if -9.202491378555593e-05 < x Initial program 60.3
Taylor expanded around 0 0.4
Final simplification0.3
herbie shell --seed 2019353
(FPCore (x)
:name "Kahan's exp quotient"
:precision binary64
:herbie-target
(if (and (< x 1) (> x -1)) (/ (- (exp x) 1) (log (exp x))) (/ (- (exp x) 1) x))
(/ (- (exp x) 1) x))