\frac{1}{2} \cdot \log \left(\frac{1 + x}{1 - x}\right)\frac{1}{2} \cdot \mathsf{fma}\left(2, x, \mathsf{fma}\left(0.66666666666666652, {x}^{3}, 2 \cdot \log 1\right)\right)double f(double x) {
double r62362 = 1.0;
double r62363 = 2.0;
double r62364 = r62362 / r62363;
double r62365 = x;
double r62366 = r62362 + r62365;
double r62367 = r62362 - r62365;
double r62368 = r62366 / r62367;
double r62369 = log(r62368);
double r62370 = r62364 * r62369;
return r62370;
}
double f(double x) {
double r62371 = 1.0;
double r62372 = 2.0;
double r62373 = r62371 / r62372;
double r62374 = x;
double r62375 = 0.6666666666666665;
double r62376 = 3.0;
double r62377 = pow(r62374, r62376);
double r62378 = 2.0;
double r62379 = log(r62371);
double r62380 = r62378 * r62379;
double r62381 = fma(r62375, r62377, r62380);
double r62382 = fma(r62372, r62374, r62381);
double r62383 = r62373 * r62382;
return r62383;
}



Bits error versus x
Initial program 58.7
rmApplied flip3--58.7
Applied associate-/r/58.7
Applied log-prod58.7
Simplified58.7
Taylor expanded around 0 0.3
Simplified0.3
Taylor expanded around 0 0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2020043 +o rules:numerics
(FPCore (x)
:name "Hyperbolic arc-(co)tangent"
:precision binary64
(* (/ 1 2) (log (/ (+ 1 x) (- 1 x)))))