\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}\begin{array}{l}
\mathbf{if}\;x \le -4.03478909525966286 \cdot 10^{-6}:\\
\;\;\;\;\sqrt{\frac{e^{2 \cdot x} - 1}{\mathsf{fma}\left(-1, 1, e^{x + x}\right)} \cdot \mathsf{fma}\left(\sqrt{e^{x}}, \sqrt{e^{x}}, 1\right)}\\
\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 <= -4.034789095259663e-06)) {
VAR = sqrt((((exp((2.0 * x)) - 1.0) / fma(-1.0, 1.0, exp((x + x)))) * fma(sqrt(exp(x)), sqrt(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 < -4.034789095259663e-06Initial program 0.1
rmApplied flip--0.1
Applied associate-/r/0.1
Simplified0.0
rmApplied add-sqr-sqrt0.0
Applied fma-def0.0
if -4.034789095259663e-06 < x Initial program 35.6
Taylor expanded around 0 5.6
Simplified5.6
Final simplification0.7
herbie shell --seed 2020078 +o rules:numerics
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
:precision binary64
(sqrt (/ (- (exp (* 2 x)) 1) (- (exp x) 1))))