\frac{2}{e^{x} + e^{-x}}\log \left(e^{\frac{2}{e^{x} + e^{-x}}}\right)double f(double x) {
double r2566034 = 2.0;
double r2566035 = x;
double r2566036 = exp(r2566035);
double r2566037 = -r2566035;
double r2566038 = exp(r2566037);
double r2566039 = r2566036 + r2566038;
double r2566040 = r2566034 / r2566039;
return r2566040;
}
double f(double x) {
double r2566041 = 2.0;
double r2566042 = x;
double r2566043 = exp(r2566042);
double r2566044 = -r2566042;
double r2566045 = exp(r2566044);
double r2566046 = r2566043 + r2566045;
double r2566047 = r2566041 / r2566046;
double r2566048 = exp(r2566047);
double r2566049 = log(r2566048);
return r2566049;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-log-exp0.2
Final simplification0.2
herbie shell --seed 2019158
(FPCore (x)
:name "Hyperbolic secant"
(/ 2 (+ (exp x) (exp (- x)))))