-\frac{1}{\frac{\pi}{4}} \cdot \log \left(\frac{e^{\frac{\pi}{4} \cdot f} + e^{-\frac{\pi}{4} \cdot f}}{e^{\frac{\pi}{4} \cdot f} - e^{-\frac{\pi}{4} \cdot f}}\right)\sqrt{\frac{1}{\frac{\pi}{4}}} \cdot \left(\log \left(\frac{\sqrt[3]{\cosh \left(\frac{\pi}{4} \cdot f\right)}}{\sqrt{\sinh \left(\frac{\pi}{4} \cdot f\right)}} \cdot \left(\sqrt[3]{\cosh \left(\frac{\pi}{4} \cdot f\right)} \cdot \frac{\sqrt[3]{\cosh \left(\frac{\pi}{4} \cdot f\right)}}{\sqrt{\sinh \left(\frac{\pi}{4} \cdot f\right)}}\right)\right) \cdot \left(-\sqrt{4 \cdot \frac{1}{\pi}}\right)\right)double code(double f) {
return ((double) -(((double) ((1.0 / (((double) M_PI) / 4.0)) * ((double) log((((double) (((double) exp(((double) ((((double) M_PI) / 4.0) * f)))) + ((double) exp(((double) -(((double) ((((double) M_PI) / 4.0) * f)))))))) / ((double) (((double) exp(((double) ((((double) M_PI) / 4.0) * f)))) - ((double) exp(((double) -(((double) ((((double) M_PI) / 4.0) * f)))))))))))))));
}
double code(double f) {
return ((double) (((double) sqrt((1.0 / (((double) M_PI) / 4.0)))) * ((double) (((double) log(((double) ((((double) cbrt(((double) cosh(((double) ((((double) M_PI) / 4.0) * f)))))) / ((double) sqrt(((double) sinh(((double) ((((double) M_PI) / 4.0) * f))))))) * ((double) (((double) cbrt(((double) cosh(((double) ((((double) M_PI) / 4.0) * f)))))) * (((double) cbrt(((double) cosh(((double) ((((double) M_PI) / 4.0) * f)))))) / ((double) sqrt(((double) sinh(((double) ((((double) M_PI) / 4.0) * f))))))))))))) * ((double) -(((double) sqrt(((double) (4.0 * (1.0 / ((double) M_PI))))))))))));
}



Bits error versus f
Results
Initial program 61.6
rmApplied sinh-undef1.9
Applied associate-/r*1.9
Simplified1.9
rmApplied add-sqr-sqrt2.2
Applied associate-*l*1.8
Simplified1.8
rmApplied add-sqr-sqrt1.9
Applied add-cube-cbrt1.9
Applied times-frac1.9
Simplified1.9
Final simplification1.9
herbie shell --seed 2020199
(FPCore (f)
:name "VandenBroeck and Keller, Equation (20)"
:precision binary64
(- (* (/ 1.0 (/ PI 4.0)) (log (/ (+ (exp (* (/ PI 4.0) f)) (exp (- (* (/ PI 4.0) f)))) (- (exp (* (/ PI 4.0) f)) (exp (- (* (/ PI 4.0) f)))))))))