-\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)
\frac{-4 \cdot \log \left(\frac{{\left(e^{-0.25}\right)}^{\left(\pi \cdot f\right)} + e^{f \cdot \frac{\pi}{4}}}{f \cdot \left(\pi \cdot 0.5\right)}\right)}{\pi}
(FPCore (f)
: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)))))))))(FPCore (f)
:precision binary64
(/
(*
-4.0
(log
(/
(+ (pow (exp -0.25) (* PI f)) (exp (* f (/ PI 4.0))))
(* f (* PI 0.5)))))
PI))double code(double f) {
return -((1.0 / (((double) M_PI) / 4.0)) * log((exp((((double) M_PI) / 4.0) * f) + exp(-((((double) M_PI) / 4.0) * f))) / (exp((((double) M_PI) / 4.0) * f) - exp(-((((double) M_PI) / 4.0) * f)))));
}
double code(double f) {
return (-4.0 * log((pow(exp(-0.25), (((double) M_PI) * f)) + exp(f * (((double) M_PI) / 4.0))) / (f * (((double) M_PI) * 0.5)))) / ((double) M_PI);
}



Bits error versus f
Results
Initial program 61.6
Simplified61.6
Taylor expanded around 0 2.8
Simplified2.8
rmApplied associate-*r/_binary642.7
Simplified2.7
Final simplification2.7
herbie shell --seed 2021196
(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)))))))))