\left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) \cdot e^{-x}
\begin{array}{l}
t_0 := \sqrt{\cos x}\\
\frac{\left(\left(e^{x}\right) \bmod \left({\left(\sqrt[3]{0.6666666666666666 \cdot t_0}\right)}^{3} + \log \left(\sqrt[3]{e^{t_0}}\right)\right)\right)}{e^{x}}
\end{array}
(FPCore (x) :precision binary64 (* (fmod (exp x) (sqrt (cos x))) (exp (- x))))
(FPCore (x)
:precision binary64
(let* ((t_0 (sqrt (cos x))))
(/
(fmod
(exp x)
(+ (pow (cbrt (* 0.6666666666666666 t_0)) 3.0) (log (cbrt (exp t_0)))))
(exp x))))double code(double x) {
return fmod(exp(x), sqrt(cos(x))) * exp(-x);
}
double code(double x) {
double t_0 = sqrt(cos(x));
return fmod(exp(x), (pow(cbrt((0.6666666666666666 * t_0)), 3.0) + log(cbrt(exp(t_0))))) / exp(x);
}



Bits error versus x
Initial program 59.6
Simplified59.6
Applied egg-rr37.2
Applied egg-rr37.1
Final simplification37.1
herbie shell --seed 2022130
(FPCore (x)
:name "expfmod"
:precision binary64
(* (fmod (exp x) (sqrt (cos x))) (exp (- x))))