\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}\sqrt{\log \left(e^{e^{x}} \cdot e\right)}double f(double x) {
double r503123 = 2.0;
double r503124 = x;
double r503125 = r503123 * r503124;
double r503126 = exp(r503125);
double r503127 = 1.0;
double r503128 = r503126 - r503127;
double r503129 = exp(r503124);
double r503130 = r503129 - r503127;
double r503131 = r503128 / r503130;
double r503132 = sqrt(r503131);
return r503132;
}
double f(double x) {
double r503133 = x;
double r503134 = exp(r503133);
double r503135 = exp(r503134);
double r503136 = exp(1.0);
double r503137 = r503135 * r503136;
double r503138 = log(r503137);
double r503139 = sqrt(r503138);
return r503139;
}



Bits error versus x
Results
Initial program 4.3
Simplified0.1
rmApplied add-log-exp0.1
Applied add-log-exp0.4
Applied sum-log0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019143 +o rules:numerics
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
(sqrt (/ (- (exp (* 2 x)) 1) (- (exp x) 1))))