\log \left(\frac{\log \left(\frac{1 + {e}^{x}}{1 - {e}^{x}}\right)}{2}\right)double code(double e, double x) {
return ((double) log(((double) (((double) log(((double) (((double) (1.0 + ((double) pow(e, x)))) / ((double) (1.0 - ((double) pow(e, x)))))))) / 2.0))));
}
herbie shell --seed 2020152
(FPCore (e x)
:name "(log (/ (log (/ (+ 1 (pow e x)) (- 1 (pow e x)))) 2))"
:precision binary64
(log (/ (log (/ (+ 1.0 (pow e x)) (- 1.0 (pow e x)))) 2.0)))