\frac{e^{x} - 1}{x}
\mathsf{log1p}\left(\mathsf{expm1}\left(\frac{\mathsf{expm1}\left(x\right)}{x}\right)\right)
(FPCore (x) :precision binary64 (/ (- (exp x) 1.0) x))
(FPCore (x) :precision binary64 (log1p (expm1 (/ (expm1 x) x))))
double code(double x) {
return (exp(x) - 1.0) / x;
}
double code(double x) {
return log1p(expm1(expm1(x) / x));
}




Bits error versus x
Results
| Original | 39.7 |
|---|---|
| Target | 40.2 |
| Herbie | 0.1 |
Initial program 39.7
Simplified0.0
Applied log1p-expm1-u_binary640.1
Final simplification0.1
herbie shell --seed 2021357
(FPCore (x)
:name "Kahan's exp quotient"
:precision binary64
:herbie-target
(if (and (< x 1.0) (> x -1.0)) (/ (- (exp x) 1.0) (log (exp x))) (/ (- (exp x) 1.0) x))
(/ (- (exp x) 1.0) x))