\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}\begin{array}{l}
\mathbf{if}\;x \le -1.5763013077646677 \cdot 10^{-5}:\\
\;\;\;\;\sqrt{\frac{e^{2 \cdot x} - 1}{\frac{\mathsf{fma}\left(-1, 1, e^{x + x}\right)}{e^{x} + 1}}}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(0.5, {x}^{2}, \mathsf{fma}\left(1, x, 2\right)\right)}\\
\end{array}double code(double x) {
return sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0)));
}
double code(double x) {
double VAR;
if ((x <= -1.5763013077646677e-05)) {
VAR = sqrt(((exp((2.0 * x)) - 1.0) / (fma(-1.0, 1.0, exp((x + x))) / (exp(x) + 1.0))));
} else {
VAR = sqrt(fma(0.5, pow(x, 2.0), fma(1.0, x, 2.0)));
}
return VAR;
}



Bits error versus x
Results
if x < -1.5763013077646677e-05Initial program 0.1
rmApplied flip--0.0
Simplified0.0
if -1.5763013077646677e-05 < x Initial program 33.7
Taylor expanded around 0 6.0
Simplified6.0
Final simplification0.8
herbie shell --seed 2020106 +o rules:numerics
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
:precision binary64
(sqrt (/ (- (exp (* 2 x)) 1) (- (exp x) 1))))