\left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) \cdot e^{-x}
\frac{e^{\log \left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right)}}{e^{x}}
(FPCore (x) :precision binary64 (* (fmod (exp x) (sqrt (cos x))) (exp (- x))))
(FPCore (x) :precision binary64 (/ (exp (log (fmod (exp x) (sqrt (cos x))))) (exp x)))
double code(double x) {
return fmod(exp(x), sqrt(cos(x))) * exp(-x);
}
double code(double x) {
return exp(log(fmod(exp(x), sqrt(cos(x))))) / exp(x);
}



Bits error versus x
Initial program 59.4
Simplified59.4
Applied add-exp-log_binary6459.4
Final simplification59.4
herbie shell --seed 2022088
(FPCore (x)
:name "expfmod"
:precision binary64
(* (fmod (exp x) (sqrt (cos x))) (exp (- x))))