\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}e^{\log \left(\sqrt{1 \cdot \mathsf{fma}\left(\sqrt[3]{e^{x}} \cdot \sqrt[3]{e^{x}}, \sqrt[3]{e^{x}}, 1\right)}\right)}double f(double x) {
double r13324 = 2.0;
double r13325 = x;
double r13326 = r13324 * r13325;
double r13327 = exp(r13326);
double r13328 = 1.0;
double r13329 = r13327 - r13328;
double r13330 = exp(r13325);
double r13331 = r13330 - r13328;
double r13332 = r13329 / r13331;
double r13333 = sqrt(r13332);
return r13333;
}
double f(double x) {
double r13334 = 1.0;
double r13335 = x;
double r13336 = exp(r13335);
double r13337 = cbrt(r13336);
double r13338 = r13337 * r13337;
double r13339 = fma(r13338, r13337, r13334);
double r13340 = r13334 * r13339;
double r13341 = sqrt(r13340);
double r13342 = log(r13341);
double r13343 = exp(r13342);
return r13343;
}



Bits error versus x
Initial program 4.3
rmApplied flip--3.9
Applied associate-/r/3.9
Simplified2.8
Taylor expanded around 0 0.1
rmApplied add-exp-log0.1
rmApplied add-cube-cbrt0.1
Applied fma-def0.1
Final simplification0.1
herbie shell --seed 2020024 +o rules:numerics
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
:precision binary64
(sqrt (/ (- (exp (* 2 x)) 1) (- (exp x) 1))))