\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}
\sqrt{\frac{\mathsf{expm1}\left(x + x\right)}{\mathsf{expm1}\left(x\right)}}
(FPCore (x) :precision binary64 (sqrt (/ (- (exp (* 2.0 x)) 1.0) (- (exp x) 1.0))))
(FPCore (x) :precision binary64 (sqrt (/ (expm1 (+ x x)) (expm1 x))))
double code(double x) {
return sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0)));
}
double code(double x) {
return sqrt((expm1((x + x)) / expm1(x)));
}



Bits error versus x
Results
Initial program 40.9
Simplified0.0
Applied egg-rr0.0
Final simplification0.0
herbie shell --seed 2022127
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
:precision binary64
(sqrt (/ (- (exp (* 2.0 x)) 1.0) (- (exp x) 1.0))))