(FPCore (x) :precision binary64 (/ (exp x) (- (exp x) 1.0)))
(FPCore (x) :precision binary64 (* (exp x) (/ 1.0 (expm1 x))))
double code(double x) {
return exp(x) / (exp(x) - 1.0);
}
double code(double x) {
return exp(x) * (1.0 / expm1(x));
}
public static double code(double x) {
return Math.exp(x) / (Math.exp(x) - 1.0);
}
public static double code(double x) {
return Math.exp(x) * (1.0 / Math.expm1(x));
}
def code(x): return math.exp(x) / (math.exp(x) - 1.0)
def code(x): return math.exp(x) * (1.0 / math.expm1(x))
function code(x) return Float64(exp(x) / Float64(exp(x) - 1.0)) end
function code(x) return Float64(exp(x) * Float64(1.0 / expm1(x))) end
code[x_] := N[(N[Exp[x], $MachinePrecision] / N[(N[Exp[x], $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]
code[x_] := N[(N[Exp[x], $MachinePrecision] * N[(1.0 / N[(Exp[x] - 1), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\frac{e^{x}}{e^{x} - 1}
e^{x} \cdot \frac{1}{\mathsf{expm1}\left(x\right)}




Bits error versus x
Results
| Original | 41.1 |
|---|---|
| Target | 40.7 |
| Herbie | 0.5 |
Initial program 41.1
Simplified0.5
Applied div-inv_binary640.5
Final simplification0.5
herbie shell --seed 2022131
(FPCore (x)
:name "expq2 (section 3.11)"
:precision binary64
:herbie-target
(/ 1.0 (- 1.0 (exp (- x))))
(/ (exp x) (- (exp x) 1.0)))