\left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) \cdot e^{-x}e^{\log \left(\left(e^{x}\right) \bmod \left(\log \left(\sqrt[3]{e^{\sqrt{\cos x}}}\right) + 2 \cdot \log \left(\sqrt[3]{e^{\sqrt{\cos x}}}\right)\right)\right) - x}(FPCore (x) :precision binary64 (* (fmod (exp x) (sqrt (cos x))) (exp (- x))))
(FPCore (x)
:precision binary64
(exp
(-
(log
(fmod
(exp x)
(+
(log (cbrt (exp (sqrt (cos x)))))
(* 2.0 (log (cbrt (exp (sqrt (cos x)))))))))
x)))double code(double x) {
return fmod(exp(x), sqrt(cos(x))) * exp(-x);
}
double code(double x) {
return exp(log(fmod(exp(x), (log(cbrt(exp(sqrt(cos(x))))) + (2.0 * log(cbrt(exp(sqrt(cos(x))))))))) - x);
}



Bits error versus x
Initial program 59.5
Simplified59.5
rmApplied add-log-exp_binary64_79959.5
rmApplied add-cube-cbrt_binary64_79536.4
Applied log-prod_binary64_84636.4
Simplified36.4
rmApplied add-exp-log_binary64_79836.4
Applied div-exp_binary64_81136.4
Final simplification36.4
herbie shell --seed 2021090
(FPCore (x)
:name "expfmod"
:precision binary64
(* (fmod (exp x) (sqrt (cos x))) (exp (- x))))